(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. 'a : S
2. x : ('a)
3. x' : 'a List
4. x = rep_list('a;x')
  f:('a), n:. x = <m:. if m<n then f(m) else @x:'a. true fi ,n>
By: ((H 4 0) THEN (Unab [`rep_list`])) THEN StrongAuto
THEN
Try (Complete (Unfold `label` 0))

Generated subgoal:

1 4. x = <n:. if n<||x'|| then x'[n] else arb('a) fi ,||x'||>
  f:('a), n:.
  <n:. if n<||x'|| then x'[n] else arb('a) fi ,||x'||>
  =
  <m:. if m<n then f(m) else @x:'a. true fi ,n>
6 steps

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