Proof of Theorem pj3lem1
| Step | Hyp | Ref
| Expression |
| 1 | | elin 1635 |
. . 3
⊢ (A
∈ (F ∩ (G ∩ H))
↔ (A ∈ F ∧ A ∈
(G ∩ H))) |
| 2 | | pjadj2co.1 |
. . . . . . 7
⊢ F
∈ Cℋ |
| 3 | 2 | chel 5137 |
. . . . . 6
⊢ (A
∈ F → A ∈ ℋ ) |
| 4 | 3 | adantr 306 |
. . . . 5
⊢ ((A
∈ F ∧ A ∈ (G
∩ H)) → A ∈ ℋ ) |
| 5 | 2 | pjf 5588 |
. . . . . 6
⊢ (Proj ‘F): ℋ –→ ℋ |
| 6 | | pjadj2co.2 |
. . . . . . . 8
⊢ G
∈ Cℋ |
| 7 | 6 | pjf 5588 |
. . . . . . 7
⊢ (Proj ‘G): ℋ –→ ℋ |
| 8 | | pjadj2co.3 |
. . . . . . . 8
⊢ H
∈ Cℋ |
| 9 | 8 | pjf 5588 |
. . . . . . 7
⊢ (Proj ‘H): ℋ –→ ℋ |
| 10 | 7, 9 | hocof 5600 |
. . . . . 6
⊢ ((Proj ‘G) ∘ (Proj ‘H)): ℋ –→ ℋ |
| 11 | 5, 10 | hoco 5598 |
. . . . 5
⊢ (A
∈ ℋ → (((Proj ‘F)
∘ ((Proj ‘G) ∘ (Proj
‘H))) ‘A) = ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A))) |
| 12 | 4, 11 | syl 12 |
. . . 4
⊢ ((A
∈ F ∧ A ∈ (G
∩ H)) → (((Proj ‘F) ∘ ((Proj ‘G) ∘ (Proj ‘H))) ‘A) =
((Proj ‘F) ‘(((Proj
‘G) ∘ (Proj ‘H)) ‘A))) |
| 13 | 6, 8 | pjclem4a 5652 |
. . . . . . 7
⊢ (A
∈ (G ∩ H) → (((Proj ‘G) ∘ (Proj ‘H)) ‘A) =
A) |
| 14 | | eleq1 1149 |
. . . . . . . . 9
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A) =
A → ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ F ↔ A ∈ F)) |
| 15 | 2 | chel 5137 |
. . . . . . . . . . 11
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ F → (((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ ℋ ) |
| 16 | | pjcht 5582 |
. . . . . . . . . . . 12
⊢ ((F
∈ Cℋ ∧ (((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ ℋ ) → ((((Proj ‘G)
∘ (Proj ‘H)) ‘A) ∈ F
↔ ((Proj ‘F) ‘(((Proj
‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A))) |
| 17 | 2, 16 | mpan 518 |
. . . . . . . . . . 11
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ ℋ → ((((Proj ‘G)
∘ (Proj ‘H)) ‘A) ∈ F
↔ ((Proj ‘F) ‘(((Proj
‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A))) |
| 18 | 15, 17 | syl 12 |
. . . . . . . . . 10
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ F → ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ F ↔ ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A))) |
| 19 | 18 | ibi 449 |
. . . . . . . . 9
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A)
∈ F → ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A)) |
| 20 | 14, 19 | syl6bir 188 |
. . . . . . . 8
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A) =
A → (A ∈ F
→ ((Proj ‘F) ‘(((Proj
‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A))) |
| 21 | | cleq2 1110 |
. . . . . . . 8
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A) =
A → (((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
(((Proj ‘G) ∘ (Proj
‘H)) ‘A) ↔ ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
A)) |
| 22 | 20, 21 | sylibd 177 |
. . . . . . 7
⊢ ((((Proj ‘G) ∘ (Proj ‘H)) ‘A) =
A → (A ∈ F
→ ((Proj ‘F) ‘(((Proj
‘G) ∘ (Proj ‘H)) ‘A)) =
A)) |
| 23 | 13, 22 | syl 12 |
. . . . . 6
⊢ (A
∈ (G ∩ H) → (A
∈ F → ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
A)) |
| 24 | 23 | com12 13 |
. . . . 5
⊢ (A
∈ F → (A ∈ (G
∩ H) → ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
A)) |
| 25 | 24 | imp 277 |
. . . 4
⊢ ((A
∈ F ∧ A ∈ (G
∩ H)) → ((Proj ‘F) ‘(((Proj ‘G) ∘ (Proj ‘H)) ‘A)) =
A) |
| 26 | 12, 25 | eqtrd 1128 |
. . 3
⊢ ((A
∈ F ∧ A ∈ (G
∩ H)) → (((Proj ‘F) ∘ ((Proj ‘G) ∘ (Proj ‘H))) ‘A) =
A) |
| 27 | 1, 26 | sylbi 174 |
. 2
⊢ (A
∈ (F ∩ (G ∩ H))
→ (((Proj ‘F) ∘ ((Proj
‘G) ∘ (Proj ‘H))) ‘A) =
A) |
| 28 | | inass 1650 |
. . 3
⊢ ((F
∩ G) ∩ H) = (F ∩
(G ∩ H)) |
| 29 | 28 | eleq2i 1153 |
. 2
⊢ (A
∈ ((F ∩ G) ∩ H)
↔ A ∈ (F ∩ (G ∩
H))) |
| 30 | | coass 2667 |
. . . 4
⊢ (((Proj ‘F) ∘ (Proj ‘G)) ∘ (Proj ‘H)) = ((Proj ‘F) ∘ ((Proj ‘G) ∘ (Proj ‘H))) |
| 31 | 30 | fveq1i 2833 |
. . 3
⊢ ((((Proj ‘F) ∘ (Proj ‘G)) ∘ (Proj ‘H)) ‘A) =
(((Proj ‘F) ∘ ((Proj
‘G) ∘ (Proj ‘H))) ‘A) |
| 32 | 31 | cleq1i 1108 |
. 2
⊢ (((((Proj ‘F) ∘ (Proj ‘G)) ∘ (Proj ‘H)) ‘A) =
A ↔ (((Proj ‘F) ∘ ((Proj ‘G) ∘ (Proj ‘H))) ‘A) =
A) |
| 33 | 27, 29, 32 | 3imtr4 192 |
1
⊢ (A
∈ ((F ∩ G) ∩ H)
→ ((((Proj ‘F) ∘ (Proj
‘G)) ∘ (Proj ‘H)) ‘A) =
A) |