(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 2 1 1 1 2 1 2 1

1. 'a : S
2. x : ('a)
3. f : 'a
4. n : 
5. x = <m:. if m<n then f(m) else @x:'a. true fi ,n>
6. ||f{n}|| = n-0
  (m:. if m<n then f(m) else @x:'a. true fi )
  =
  (n@0:. if n@0<||f{n}|| then (f{n})[n@0] else arb('a) fi )


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


Generated subgoal:

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

5 steps

About:
pairproductbtrueintnatural_numbersubtractapplyfunctionequal
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