IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
card sigma1 1. A : Type
2. A' : Type
3. B : AType
4. B' : A'Type
5. f : AA' 6. g : A'A 7. F : x:AB(x)B'(f(x))
8. G : x:AB'(f(x))B(x)
9. InvFuns(A;A';f;g)
10. u:A. InvFuns(B(u);B'(f(u));F(u);G(u))
(x:AB(x)) ~ (x:A'B'(x))
By:
Witness: e.e/x,y. <f(x),F(x,y)> | e.e/x,y. <g(x),G(g(x),y)>
THENA
(ApFun: B' to: f(g(x)) = xA' THENA BackThru: Hyp:9)