ligo/src/bin_client/test/contracts_macros/assert_eq.tz

parameter (pair int int);
storage unit;
code {CAR; DUP; CAR; DIP{CDR}; COMPARE; ASSERT_EQ; UNIT; NIL operation; PAIR}