ligo/test/contracts/assert_ge.tz

5 lines
121 B
Plaintext
Raw Normal View History

parameter (pair int int);
storage unit;
return unit;
code {CAR; DUP; CAR; DIP{CDR}; COMPARE; ASSERT_GE; UNIT; DUP; PAIR}