(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. '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>
  =
  <n@0:. if n@0<||f{n}|| then (f{n})[n@0] else arb('a) fi ,||f{n}||>


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


Generated subgoal:

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

6 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