IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
nat to nat pair inj12 1. a1 :
2. u:. u<a1 (a3:. nat_to_nat_pair(u) = nat_to_nat_pair(a3) u = a3)
3. a2 :
4. next_nat_pair(nat_to_nat_pair(a1-1)) = nat_to_nat_pair(a2)
5. a1 0
a1 = a2
By:
Compute-2 nat_to_nat_pair(a2) THEN SplitITE Hyp:-2