(9steps total) PrintForm Definitions Lemmas hol bool Sections HOLlib Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: hcond def 1

1. 'a : S
  (b:p:'aq:'a. if b then p else q fi )
  =
  (t:t1:'at2:'a. @x:'a
  (t:t1:'at2:'a. @((t = true)(x = t1)
  (t:t1:'at2:'a. @(t = false)(x = t2)))


By: Simpset [`ext`] THEN Simp THEN StrongAuto


Generated subgoal:

1 2. t : 
3. t1 : 'a
4. t2 : 'a
  if t then t1 else t2 fi 
  =
  (@x:'a. ((t = true)(x = t1)(t = false)(x = t2)))

7 steps

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

(9steps total) PrintForm Definitions Lemmas hol bool Sections HOLlib Doc