1 2 3 4
SymmetricRelation ? (\x,y -> oppositeDirection x y) IrreflexiveRelation ? (\x,y -> oppositeDirection x y)