21b2c993ba4467ad14509265270ad71ef59c4064Eugen Kuksa(iff (AllEq x y ...sm1)
21b2c993ba4467ad14509265270ad71ef59c4064Eugen Kuksa (and (= x y) (AllEq y ...sm1)))
21b2c993ba4467ad14509265270ad71ef59c4064Eugen Kuksa(iff (AllDiff x y ...sm2)
21b2c993ba4467ad14509265270ad71ef59c4064Eugen Kuksa (and (not (= x y)) (AllDiff x ...sm2) (AllDiff y ...sm2)))