(37steps total) PrintForm Definitions Lemmas hol list 1 Sections HOLlib Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: list iso 2 3 1 1 1 1

1. 'a : S
2. x' : 'a List
  <n:. if n<||x'|| then x'[n] else arb('a) fi ,||x'||>
  =
  <m:. if m<||x'||
  <m:then if m<||x'|| then x'[m] else arb('a) fi 
  <m:else @x:'a. true
  <m:fi 
  ,||x'||>
   ('a)


By: Analyze THEN StrongAuto THEN Try (Complete (Unfold `label` 0))


Generated subgoal:

1   (n:. if n<||x'|| then x'[n] else arb('a) fi )
  =
  (m:. if m<||x'||
  (m:then if m<||x'|| then x'[m] else arb('a) fi 
  (m:else @x:'a. true
  (m:fi )

3 steps

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

(37steps total) PrintForm Definitions Lemmas hol list 1 Sections HOLlib Doc