(<=> (Relsent ?X) (Exists (?R ?Tlist) (And (Or (Relconst ?R) (Funconst ?R)) (List ?Tlist) (>= (Length ?Tlist) 1) (=> (Item ?T ?Tlist) (Term ?T)) (= ?X (Cons ?R ?Tlist)))))
(=> (Equation ?X) (Relsent ?X)) (=> (Inequality ?X) (Relsent ?X))
(<=> (Equation ?X) (And (Relsent ?X) (Exists (?T1 ?T2) (And (Term ?T1) (Term ?T2) (= ?X (Listof '= ?T1 ?T2)))))) (<=> (Inequality ?X) (And (Relsent ?X) (Exists (?T1 ?T2) (And (Term ?T1) (Term ?T2) (= ?X (Listof '/= ?T1 ?T2))))))