7 lines
171 B
Plaintext
7 lines
171 B
Plaintext
parameter (pair tez tez);
|
|
storage unit;
|
|
return (pair tez tez);
|
|
code {CAR; DUP; DUP; CAR; DIP{CDR}; ADD;
|
|
DIP{DUP; CAR; DIP{CDR}; SUB};
|
|
PAIR; UNIT; SWAP; PAIR};
|