5 lines
121 B
Plaintext
5 lines
121 B
Plaintext
parameter (pair int int);
|
|
storage unit;
|
|
return unit;
|
|
code {CAR; DUP; CAR; DIP{CDR}; COMPARE; ASSERT_LT; UNIT; DUP; PAIR}
|