At: fun preserves fin1111 S,T:Type.
(n:, f:(nS), g:(Sn). g o f = Id & f o g = Id)
& (n:, f:(nT), g:(Tn). g o f = Id & f o g = Id)
(n:, f:(nST), g:((ST)n). g o f = Id & f o g = Id) By: GenUnivCD Generated subgoal:
1. S: Type 2. T: Type 3. (n:, f:(nS), g:(Sn). g o f = Id & f o g = Id)
& (n:, f:(nT), g:(Tn). g o f = Id & f o g = Id) n:, f:(nST), g:((ST)n). g o f = Id & f o g = Id