% EXPECT: unsat
OPTION "logic" "ALL_SUPPORTED";
IntPair: TYPE = [INT, INT];
x : SET OF IntPair;
y : SET OF IntPair;

z : IntPair;
ASSERT z = (1,2);
zt : IntPair;
ASSERT zt = (2,1);

ASSERT z IS_IN x;
ASSERT (3, 4) IS_IN x;
ASSERT (3, 5) IS_IN x;
ASSERT (3, 3) IS_IN x;

ASSERT x = TRANSPOSE(y);

ASSERT NOT (zt IS_IN y);

ASSERT z IS_IN y;
ASSERT NOT (zt IS_IN (TRANSPOSE y));

CHECKSAT;