Proof of Theorem tgmircgrg
| Step | Hyp | Ref
| Expression |
| 1 | | tgmircgrg.p |
. 2
⊢ 𝑃 = (Base‘𝐺) |
| 2 | | tgmircgrg.m |
. 2
⊢ − =
(dist‘𝐺) |
| 3 | | eqid 2760 |
. 2
⊢
(cgrG‘𝐺) =
(cgrG‘𝐺) |
| 4 | | tgmircgrg.g |
. 2
⊢ (𝜑 → 𝐺 ∈ TarskiG) |
| 5 | | tgmircgrg.c |
. 2
⊢ (𝜑 → 𝐶 ∈ 𝑃) |
| 6 | | tgmircgrg.a |
. 2
⊢ (𝜑 → 𝐴 ∈ 𝑃) |
| 7 | | tgmircgrg.b |
. 2
⊢ (𝜑 → 𝐵 ∈ 𝑃) |
| 8 | | tgmircgrg.i |
. . 3
⊢ 𝐼 = (Itv‘𝐺) |
| 9 | | tgmircgrg.l |
. . 3
⊢ 𝐿 = (LineG‘𝐺) |
| 10 | | eqid 2760 |
. . 3
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 11 | | tgmircgrg.ncol |
. . . . 5
⊢ (𝜑 → ¬ (𝐴 ∈ (𝐵𝐿𝐶) ∨ 𝐵 = 𝐶)) |
| 12 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . 4
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 13 | 1, 2, 8, 4, 12, 6,
5 | midcl 29282 |
. . 3
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 14 | | eqid 2760 |
. . 3
⊢
((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) = ((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) |
| 15 | 1, 2, 8, 9, 10, 4,
13, 14, 7 | mircl 29133 |
. 2
⊢ (𝜑 → (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵) ∈ 𝑃) |
| 16 | | eqidd 2761 |
. . 3
⊢ (𝜑 → (𝐴 − 𝐶) = (𝐴 − 𝐶)) |
| 17 | 1, 2, 8, 4, 6, 5, 6, 5, 16 | tgcgrcoml 28941 |
. 2
⊢ (𝜑 → (𝐶 − 𝐴) = (𝐴 − 𝐶)) |
| 18 | | eqidd 2761 |
. . . . . 6
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) = (𝐴(midG‘𝐺)𝐶)) |
| 19 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . . 7
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 20 | | eqid 2760 |
. . . . . . 7
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 21 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . . . 8
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 22 | 1, 2, 8, 4, 21, 6,
5 | midcl 29282 |
. . . . . . 7
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 23 | 1, 2, 8, 4, 19, 6,
5, 20, 22 | ismidb 29283 |
. . . . . 6
⊢ (𝜑 → (𝐶 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐶) = (𝐴(midG‘𝐺)𝐶))) |
| 24 | 18, 23 | mpbird 260 |
. . . . 5
⊢ (𝜑 → 𝐶 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴)) |
| 25 | 24 | oveq1d 7435 |
. . . 4
⊢ (𝜑 → (𝐶 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵)) = ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴) − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵))) |
| 26 | | eqid 2760 |
. . . . 5
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 27 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . 6
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 28 | 1, 2, 8, 4, 27, 6,
5 | midcl 29282 |
. . . . 5
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 29 | | eqid 2760 |
. . . . 5
⊢
((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) = ((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) |
| 30 | 1, 2, 8, 9, 26, 4,
28, 29, 6, 7 | miriso 29142 |
. . . 4
⊢ (𝜑 → ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴) − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵)) = (𝐴 − 𝐵)) |
| 31 | 25, 30 | eqtrd 2795 |
. . 3
⊢ (𝜑 → (𝐶 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵)) = (𝐴 − 𝐵)) |
| 32 | 31 | eqcomd 2766 |
. 2
⊢ (𝜑 → (𝐴 − 𝐵) = (𝐶 − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵))) |
| 33 | | eqid 2760 |
. . . 4
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 34 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . 5
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 35 | 1, 2, 8, 4, 34, 6,
5 | midcl 29282 |
. . . 4
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 36 | | eqid 2760 |
. . . 4
⊢
((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) = ((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) |
| 37 | 1, 2, 8, 9, 33, 4,
35, 36, 7, 5 | miriso 29142 |
. . 3
⊢ (𝜑 → ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵) − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐶)) = (𝐵 − 𝐶)) |
| 38 | | eqidd 2761 |
. . . . . . 7
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) = (𝐴(midG‘𝐺)𝐶)) |
| 39 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . . . 8
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 40 | | eqid 2760 |
. . . . . . . 8
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 41 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . . . . 9
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 42 | 1, 2, 8, 4, 41, 6,
5 | midcl 29282 |
. . . . . . . 8
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 43 | 1, 2, 8, 4, 39, 6,
5, 40, 42 | ismidb 29283 |
. . . . . . 7
⊢ (𝜑 → (𝐶 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴) ↔ (𝐴(midG‘𝐺)𝐶) = (𝐴(midG‘𝐺)𝐶))) |
| 44 | 38, 43 | mpbird 260 |
. . . . . 6
⊢ (𝜑 → 𝐶 = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴)) |
| 45 | 44 | fveq2d 6889 |
. . . . 5
⊢ (𝜑 → (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐶) = (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘(((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴))) |
| 46 | | eqid 2760 |
. . . . . 6
⊢
(pInvG‘𝐺) =
(pInvG‘𝐺) |
| 47 | 1, 9, 8, 4, 7, 5, 6, 11 | ncoltgdim2 29028 |
. . . . . . 7
⊢ (𝜑 → 𝐺DimTarskiG≥2) |
| 48 | 1, 2, 8, 4, 47, 6,
5 | midcl 29282 |
. . . . . 6
⊢ (𝜑 → (𝐴(midG‘𝐺)𝐶) ∈ 𝑃) |
| 49 | | eqid 2760 |
. . . . . 6
⊢
((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) = ((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶)) |
| 50 | 1, 2, 8, 9, 46, 4,
48, 49, 6 | mirmir 29134 |
. . . . 5
⊢ (𝜑 → (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘(((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐴)) = 𝐴) |
| 51 | 45, 50 | eqtrd 2795 |
. . . 4
⊢ (𝜑 → (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐶) = 𝐴) |
| 52 | 51 | oveq2d 7436 |
. . 3
⊢ (𝜑 → ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵) − (((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐶)) = ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵) − 𝐴)) |
| 53 | 37, 52 | eqtr3d 2797 |
. 2
⊢ (𝜑 → (𝐵 − 𝐶) = ((((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵) − 𝐴)) |
| 54 | 1, 2, 3, 4, 5, 6, 7, 6, 5, 15,
17, 32, 53 | trgcgr 28979 |
1
⊢ (𝜑 → 〈“𝐶𝐴𝐵”〉(cgrG‘𝐺)〈“𝐴𝐶(((pInvG‘𝐺)‘(𝐴(midG‘𝐺)𝐶))‘𝐵)”〉) |