(7steps total) PrintForm Definitions sqequal 1 Sections StandardLIB Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: eq atom eq true elim sqequal 1 1

1. x : Atom
2. y : Atom
3. x=yAtom ~ true
  x = y


By: p.
let x,y  dest_sqequal (h -1 p) in
(Assert (mk_equal_term bool_term y y)
(THENL
([Auto;SqSubstAtAddr [2] x -1 THENL [Trivial;Id]])
p


Generated subgoal:

1 4. x=yAtom = true
  x = y

1 step

About:
btrueatomequalsqequal
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html

(7steps total) PrintForm Definitions sqequal 1 Sections StandardLIB Doc