Nuprl - Proof: inv pair inv 1 3 1 1

IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: inv pair inv 1 3 1 1

1. A : Type
2. B : Type
3. (

fg.fg/f,g. <f,g,(

x.*),(

y.*)>)

(A ~ B)
4. (

fga.fga/f,#. #/g,a. <f,g>)

(A ~ B)

B
5. fg : A

((fg/f,g. <f,g,(

x.*),(

y.*)>)/f,#. #/g,a. <f,g>) = fg

By:	Analyze5 THEN New:[f \| g] Analyze5 THEN Reduce Concl THEN Reduce Hyp:-1

Generated subgoal:

1 5. f : AB
6. g : BA
7. InvFuns(A;B;f;g)
<f,g> = <f,g> AB
2 steps

About:

IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html