7 lines
124 B
Plaintext
7 lines
124 B
Plaintext
parameter (list int);
|
|
storage unit;
|
|
return int;
|
|
code { CAR; PUSH int 1; SWAP;
|
|
ITER { MUL };
|
|
UNIT; SWAP; PAIR}
|