Metamath Proof Explorer


Theorem pjin2i

Description: Lemma for Theorem 1.22 of Mittelstaedt, p. 20. (Contributed by NM, 22-Apr-2001) (New usage is discouraged.)

Ref Expression
Hypotheses pjin1.1 G C
pjin1.2 H C
Assertion pjin2i proj G = proj G proj H proj H = proj H proj G proj G = proj H

Proof

Step Hyp Ref Expression
1 pjin1.1 G C
2 pjin1.2 H C
3 eqss G = H G H H G
4 1 2 pjss2coi G H proj G proj H = proj G
5 eqcom proj G proj H = proj G proj G = proj G proj H
6 4 5 bitri G H proj G = proj G proj H
7 2 1 pjss2coi H G proj H proj G = proj H
8 eqcom proj H proj G = proj H proj H = proj H proj G
9 7 8 bitri H G proj H = proj H proj G
10 6 9 anbi12i G H H G proj G = proj G proj H proj H = proj H proj G
11 3 10 bitr2i proj G = proj G proj H proj H = proj H proj G G = H
12 fveq2 G = H proj G = proj H
13 11 12 sylbi proj G = proj G proj H proj H = proj H proj G proj G = proj H
14 1 pjidmcoi proj G proj G = proj G
15 coeq2 proj G = proj H proj G proj G = proj G proj H
16 14 15 eqtr3id proj G = proj H proj G = proj G proj H
17 coeq2 proj G = proj H proj H proj G = proj H proj H
18 2 pjidmcoi proj H proj H = proj H
19 17 18 eqtr2di proj G = proj H proj H = proj H proj G
20 16 19 jca proj G = proj H proj G = proj G proj H proj H = proj H proj G
21 13 20 impbii proj G = proj G proj H proj H = proj H proj G proj G = proj H