(<=> (Disjunction ?X)
(Exists (?Plist)
(And (List ?Plist)
(>= (Length ?Plist) 1)
(=> (Item ?P ?Plist) (Sentence ?P))
(= ?X (Cons (Quote Or) ?Plist)))))
(Exists (?Plist)
(And (List ?Plist)
(>= (Length ?Plist) 1)
(=> (Item ?P ?Plist) (Sentence ?P))
(= ?X (Cons (Quote Or) ?Plist))))
(Exhaustive-Subclass-Partition Logsent
(Setof Negation
Conjunction
Disjunction
Implication
Reverse-Implication
Equivalence))
(<=> (Disjunction ?X)
(Exists (?Plist)
(And (List ?Plist)
(>= (Length ?Plist) 1)
(=> (Item ?P ?Plist) (Sentence ?P))
(= ?X (Cons (Quote Or) ?Plist)))))