IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
list iso2311111 1. 'a : S
2. x' : 'a List
(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 )
By:
Analyze THEN StrongAuto THEN Try (Complete (Unfold `label` 0))