At: quo of quo122 1. T: Type 2. R: TTProp 3. EquivRel x,y:T. x R y 4. Q: (x,y:T//(x R y))(x,y:T//(x R y))Prop 5. EquivRel u,v:x,y:T//(x R y). u Q v 6. EquivRel x,y:T. x Q y 7. f: (x,y:T//(x Q y))(u,v:(x,y:T//(x R y))//(u Q v)) 8. f = (x.x)
f:((x,y:T//(x Q y))(u,v:(x,y:T//(x R y))//(u Q v)))
, g:((u,v:(x,y:T//(x R y))//(u Q v))(x,y:T//(x Q y))).
InvFuns(x,y:T//(x Q y); u,v:(x,y:T//(x R y))//(u Q v); f; g) By: Let (g = (x.x)) Generated subgoals: