Thm* 'a:S.
Thm* all
Thm* ( h1:'a. all
Thm* ( h1:'a. ( h2:'a. implies
Thm* ( h1:'a. ( h2:'a. (not(equal(h1,h2))
Thm* ( h1:'a. ( h2:'a. ,all
Thm* ( h1:'a. ( h2:'a. ,( l1:hlist('a). all
Thm* ( h1:'a. ( h2:'a. ,( l1:hlist('a). ( l2:hlist('a). not
Thm* ( h1:'a. ( h2:'a. ,( l1:hlist('a). ( l2:hlist('a). (equal
Thm* ( h1:'a. ( h2:'a. ,( l1:hlist('a). ( l2:hlist('a). ((cons(h1,l1)
Thm* ( h1:'a. ( h2:'a. ,( l1:hlist('a). ( l2:hlist('a). (,cons(h2,l2)))))))) | [hnot_eq_list] |