ligo/test/contracts/and.tz

5 lines
110 B
Plaintext

parameter (pair bool bool);
return bool;
storage unit;
code {CAR; DUP; CAR; DIP{CDR}; AND; UNIT; SWAP; PAIR};