IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
card nsub inj vs lopped11322 1. a : 2. b : 3. (f.<f(a-1),f>) (a injb)(i:b(a-1) inj {x:b| x = i })
4. (ie.ie/i,e. x.if x=a-1i else e(x) fi)
4. (i:b(a-1) inj {x:b| x = i })a injb 5. i : b 6. e : (a-1){x:b| x = i }
7. Inj((a-1); {x:b| x = i }; e)
(x.if x=a-1i else e(x) fi)
=
e (a-1) inj {x:b| x = if a-1=a-1i else e(a-1) fi }