Proof of Theorem cdlemn8
Step | Hyp | Ref
| Expression |
1 | | coass 6098 |
. . 3
⊢ ((◡𝐹 ∘ 𝐹) ∘ 𝑔) = (◡𝐹 ∘ (𝐹 ∘ 𝑔)) |
2 | | simp1 1137 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) |
3 | | cdlemn8.l |
. . . . . . . . . 10
⊢ ≤ =
(le‘𝐾) |
4 | | cdlemn8.a |
. . . . . . . . . 10
⊢ 𝐴 = (Atoms‘𝐾) |
5 | | cdlemn8.h |
. . . . . . . . . 10
⊢ 𝐻 = (LHyp‘𝐾) |
6 | | cdlemn8.p |
. . . . . . . . . 10
⊢ 𝑃 = ((oc‘𝐾)‘𝑊) |
7 | 3, 4, 5, 6 | lhpocnel2 37656 |
. . . . . . . . 9
⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) |
8 | 7 | 3ad2ant1 1134 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) |
9 | | simp2l 1200 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) |
10 | | cdlemn8.t |
. . . . . . . . 9
⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊) |
11 | | cdlemn8.f |
. . . . . . . . 9
⊢ 𝐹 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑄) |
12 | 3, 4, 5, 10, 11 | ltrniotacl 38216 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹 ∈ 𝑇) |
13 | 2, 8, 9, 12 | syl3anc 1372 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝐹 ∈ 𝑇) |
14 | | cdlemn8.b |
. . . . . . . 8
⊢ 𝐵 = (Base‘𝐾) |
15 | 14, 5, 10 | ltrn1o 37761 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹:𝐵–1-1-onto→𝐵) |
16 | 2, 13, 15 | syl2anc 587 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝐹:𝐵–1-1-onto→𝐵) |
17 | | f1ococnv1 6646 |
. . . . . 6
⊢ (𝐹:𝐵–1-1-onto→𝐵 → (◡𝐹 ∘ 𝐹) = ( I ↾ 𝐵)) |
18 | 16, 17 | syl 17 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (◡𝐹 ∘ 𝐹) = ( I ↾ 𝐵)) |
19 | 18 | coeq1d 5704 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → ((◡𝐹 ∘ 𝐹) ∘ 𝑔) = (( I ↾ 𝐵) ∘ 𝑔)) |
20 | | simp32 1211 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝑔 ∈ 𝑇) |
21 | 14, 5, 10 | ltrn1o 37761 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑔 ∈ 𝑇) → 𝑔:𝐵–1-1-onto→𝐵) |
22 | 2, 20, 21 | syl2anc 587 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝑔:𝐵–1-1-onto→𝐵) |
23 | | f1of 6618 |
. . . . 5
⊢ (𝑔:𝐵–1-1-onto→𝐵 → 𝑔:𝐵⟶𝐵) |
24 | | fcoi2 6553 |
. . . . 5
⊢ (𝑔:𝐵⟶𝐵 → (( I ↾ 𝐵) ∘ 𝑔) = 𝑔) |
25 | 22, 23, 24 | 3syl 18 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (( I ↾ 𝐵) ∘ 𝑔) = 𝑔) |
26 | 19, 25 | eqtr2d 2774 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝑔 = ((◡𝐹 ∘ 𝐹) ∘ 𝑔)) |
27 | | cdlemn8.o |
. . . . . . 7
⊢ 𝑂 = (ℎ ∈ 𝑇 ↦ ( I ↾ 𝐵)) |
28 | | cdlemn8.e |
. . . . . . 7
⊢ 𝐸 = ((TEndo‘𝐾)‘𝑊) |
29 | | cdlemn8.u |
. . . . . . 7
⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) |
30 | | cdlemn8.s |
. . . . . . 7
⊢ + =
(+g‘𝑈) |
31 | | cdlemn8.g |
. . . . . . 7
⊢ 𝐺 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑅) |
32 | 14, 3, 4, 5, 6, 27,
10, 28, 29, 30, 11, 31 | cdlemn7 38840 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝐺 = ((𝑠‘𝐹) ∘ 𝑔) ∧ ( I ↾ 𝑇) = 𝑠)) |
33 | 32 | simpld 498 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝐺 = ((𝑠‘𝐹) ∘ 𝑔)) |
34 | 32 | simprd 499 |
. . . . . . . 8
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → ( I ↾ 𝑇) = 𝑠) |
35 | 34 | fveq1d 6676 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (( I ↾ 𝑇)‘𝐹) = (𝑠‘𝐹)) |
36 | | fvresi 6945 |
. . . . . . . 8
⊢ (𝐹 ∈ 𝑇 → (( I ↾ 𝑇)‘𝐹) = 𝐹) |
37 | 13, 36 | syl 17 |
. . . . . . 7
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (( I ↾ 𝑇)‘𝐹) = 𝐹) |
38 | 35, 37 | eqtr3d 2775 |
. . . . . 6
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝑠‘𝐹) = 𝐹) |
39 | 38 | coeq1d 5704 |
. . . . 5
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → ((𝑠‘𝐹) ∘ 𝑔) = (𝐹 ∘ 𝑔)) |
40 | 33, 39 | eqtrd 2773 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝐺 = (𝐹 ∘ 𝑔)) |
41 | 40 | coeq2d 5705 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (◡𝐹 ∘ 𝐺) = (◡𝐹 ∘ (𝐹 ∘ 𝑔))) |
42 | 1, 26, 41 | 3eqtr4a 2799 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝑔 = (◡𝐹 ∘ 𝐺)) |
43 | 5, 10 | ltrncnv 37783 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ◡𝐹 ∈ 𝑇) |
44 | 2, 13, 43 | syl2anc 587 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → ◡𝐹 ∈ 𝑇) |
45 | | simp2r 1201 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) |
46 | 3, 4, 5, 10, 31 | ltrniotacl 38216 |
. . . 4
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 𝐺 ∈ 𝑇) |
47 | 2, 8, 45, 46 | syl3anc 1372 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝐺 ∈ 𝑇) |
48 | 5, 10 | ltrncom 38375 |
. . 3
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ◡𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) → (◡𝐹 ∘ 𝐺) = (𝐺 ∘ ◡𝐹)) |
49 | 2, 44, 47, 48 | syl3anc 1372 |
. 2
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → (◡𝐹 ∘ 𝐺) = (𝐺 ∘ ◡𝐹)) |
50 | 42, 49 | eqtrd 2773 |
1
⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) ∧ (𝑠 ∈ 𝐸 ∧ 𝑔 ∈ 𝑇 ∧ 〈𝐺, ( I ↾ 𝑇)〉 = (〈(𝑠‘𝐹), 𝑠〉 + 〈𝑔, 𝑂〉))) → 𝑔 = (𝐺 ∘ ◡𝐹)) |