Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ltrneq2 Structured version   Visualization version   GIF version

Theorem ltrneq2 38089
Description: The equality of two translations is determined by their equality at atoms. (Contributed by NM, 2-Mar-2014.)
Hypotheses
Ref Expression
ltrneq2.a 𝐴 = (Atoms‘𝐾)
ltrneq2.h 𝐻 = (LHyp‘𝐾)
ltrneq2.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
Assertion
Ref Expression
ltrneq2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ↔ 𝐹 = 𝐺))
Distinct variable groups:   𝐴,𝑝   𝐹,𝑝   𝐺,𝑝
Allowed substitution hints:   𝑇(𝑝)   𝐻(𝑝)   𝐾(𝑝)   𝑊(𝑝)

Proof of Theorem ltrneq2
Dummy variables 𝑞 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpl1 1189 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simpl3 1191 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐺𝑇)
3 eqid 2738 . . . . . . . . . . . . . . 15 (Base‘𝐾) = (Base‘𝐾)
4 ltrneq2.h . . . . . . . . . . . . . . 15 𝐻 = (LHyp‘𝐾)
5 ltrneq2.t . . . . . . . . . . . . . . 15 𝑇 = ((LTrn‘𝐾)‘𝑊)
63, 4, 5ltrn1o 38065 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇) → 𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
71, 2, 6syl2anc 583 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
8 simpl2 1190 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐹𝑇)
9 simpr3 1194 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝑞𝐴)
10 eqid 2738 . . . . . . . . . . . . . . . 16 (le‘𝐾) = (le‘𝐾)
11 ltrneq2.a . . . . . . . . . . . . . . . 16 𝐴 = (Atoms‘𝐾)
1210, 11, 4, 5ltrncnvat 38082 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝑞𝐴) → (𝐹𝑞) ∈ 𝐴)
131, 8, 9, 12syl3anc 1369 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹𝑞) ∈ 𝐴)
143, 11atbase 37230 . . . . . . . . . . . . . 14 ((𝐹𝑞) ∈ 𝐴 → (𝐹𝑞) ∈ (Base‘𝐾))
1513, 14syl 17 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹𝑞) ∈ (Base‘𝐾))
16 f1ocnvfv1 7129 . . . . . . . . . . . . 13 ((𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ (𝐹𝑞) ∈ (Base‘𝐾)) → (𝐺‘(𝐺‘(𝐹𝑞))) = (𝐹𝑞))
177, 15, 16syl2anc 583 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐺‘(𝐺‘(𝐹𝑞))) = (𝐹𝑞))
18 simpr2 1193 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝))
19 fveq2 6756 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝐹𝑞) → (𝐹𝑝) = (𝐹‘(𝐹𝑞)))
20 fveq2 6756 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝐹𝑞) → (𝐺𝑝) = (𝐺‘(𝐹𝑞)))
2119, 20eqeq12d 2754 . . . . . . . . . . . . . . . 16 (𝑝 = (𝐹𝑞) → ((𝐹𝑝) = (𝐺𝑝) ↔ (𝐹‘(𝐹𝑞)) = (𝐺‘(𝐹𝑞))))
2221rspcv 3547 . . . . . . . . . . . . . . 15 ((𝐹𝑞) ∈ 𝐴 → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → (𝐹‘(𝐹𝑞)) = (𝐺‘(𝐹𝑞))))
2313, 18, 22sylc 65 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹‘(𝐹𝑞)) = (𝐺‘(𝐹𝑞)))
243, 4, 5ltrn1o 38065 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
251, 8, 24syl2anc 583 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
263, 11atbase 37230 . . . . . . . . . . . . . . . 16 (𝑞𝐴𝑞 ∈ (Base‘𝐾))
279, 26syl 17 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝑞 ∈ (Base‘𝐾))
28 f1ocnvfv2 7130 . . . . . . . . . . . . . . 15 ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑞 ∈ (Base‘𝐾)) → (𝐹‘(𝐹𝑞)) = 𝑞)
2925, 27, 28syl2anc 583 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹‘(𝐹𝑞)) = 𝑞)
3023, 29eqtr3d 2780 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐺‘(𝐹𝑞)) = 𝑞)
3130fveq2d 6760 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐺‘(𝐺‘(𝐹𝑞))) = (𝐺𝑞))
3217, 31eqtr3d 2780 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹𝑞) = (𝐺𝑞))
3332breq1d 5080 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → ((𝐹𝑞)(le‘𝐾)𝑥 ↔ (𝐺𝑞)(le‘𝐾)𝑥))
34 simpr1 1192 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝑥 ∈ (Base‘𝐾))
35 f1ocnvfv1 7129 . . . . . . . . . . . 12 ((𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑥 ∈ (Base‘𝐾)) → (𝐹‘(𝐹𝑥)) = 𝑥)
3625, 34, 35syl2anc 583 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹‘(𝐹𝑥)) = 𝑥)
3736breq2d 5082 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → ((𝐹𝑞)(le‘𝐾)(𝐹‘(𝐹𝑥)) ↔ (𝐹𝑞)(le‘𝐾)𝑥))
38 f1ocnvfv1 7129 . . . . . . . . . . . 12 ((𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾) ∧ 𝑥 ∈ (Base‘𝐾)) → (𝐺‘(𝐺𝑥)) = 𝑥)
397, 34, 38syl2anc 583 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐺‘(𝐺𝑥)) = 𝑥)
4039breq2d 5082 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → ((𝐺𝑞)(le‘𝐾)(𝐺‘(𝐺𝑥)) ↔ (𝐺𝑞)(le‘𝐾)𝑥))
4133, 37, 403bitr4d 310 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → ((𝐹𝑞)(le‘𝐾)(𝐹‘(𝐹𝑥)) ↔ (𝐺𝑞)(le‘𝐾)(𝐺‘(𝐺𝑥))))
42 simpl1l 1222 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐾 ∈ HL)
43 eqid 2738 . . . . . . . . . . . 12 (LAut‘𝐾) = (LAut‘𝐾)
444, 43, 5ltrnlaut 38064 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹 ∈ (LAut‘𝐾))
451, 8, 44syl2anc 583 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐹 ∈ (LAut‘𝐾))
463, 4, 5ltrncl 38066 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝑥 ∈ (Base‘𝐾)) → (𝐹𝑥) ∈ (Base‘𝐾))
471, 8, 34, 46syl3anc 1369 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐹𝑥) ∈ (Base‘𝐾))
483, 10, 43lautcnvle 38030 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝐹 ∈ (LAut‘𝐾)) ∧ (𝑞 ∈ (Base‘𝐾) ∧ (𝐹𝑥) ∈ (Base‘𝐾))) → (𝑞(le‘𝐾)(𝐹𝑥) ↔ (𝐹𝑞)(le‘𝐾)(𝐹‘(𝐹𝑥))))
4942, 45, 27, 47, 48syl22anc 835 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝑞(le‘𝐾)(𝐹𝑥) ↔ (𝐹𝑞)(le‘𝐾)(𝐹‘(𝐹𝑥))))
504, 43, 5ltrnlaut 38064 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇) → 𝐺 ∈ (LAut‘𝐾))
511, 2, 50syl2anc 583 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → 𝐺 ∈ (LAut‘𝐾))
523, 4, 5ltrncl 38066 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝑥 ∈ (Base‘𝐾)) → (𝐺𝑥) ∈ (Base‘𝐾))
531, 2, 34, 52syl3anc 1369 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝐺𝑥) ∈ (Base‘𝐾))
543, 10, 43lautcnvle 38030 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝐺 ∈ (LAut‘𝐾)) ∧ (𝑞 ∈ (Base‘𝐾) ∧ (𝐺𝑥) ∈ (Base‘𝐾))) → (𝑞(le‘𝐾)(𝐺𝑥) ↔ (𝐺𝑞)(le‘𝐾)(𝐺‘(𝐺𝑥))))
5542, 51, 27, 53, 54syl22anc 835 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝑞(le‘𝐾)(𝐺𝑥) ↔ (𝐺𝑞)(le‘𝐾)(𝐺‘(𝐺𝑥))))
5641, 49, 553bitr4d 310 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ (𝑥 ∈ (Base‘𝐾) ∧ ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ∧ 𝑞𝐴)) → (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥)))
57563exp2 1352 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (𝑥 ∈ (Base‘𝐾) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → (𝑞𝐴 → (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥))))))
5857imp 406 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → (𝑞𝐴 → (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥)))))
5958ralrimdv 3111 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → ∀𝑞𝐴 (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥))))
60 simpl1l 1222 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → 𝐾 ∈ HL)
61 simpl1 1189 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
62 simpl2 1190 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → 𝐹𝑇)
63 simpr 484 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → 𝑥 ∈ (Base‘𝐾))
6461, 62, 63, 46syl3anc 1369 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (𝐹𝑥) ∈ (Base‘𝐾))
65 simpl3 1191 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → 𝐺𝑇)
6661, 65, 63, 52syl3anc 1369 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (𝐺𝑥) ∈ (Base‘𝐾))
673, 10, 11hlateq 37340 . . . . . 6 ((𝐾 ∈ HL ∧ (𝐹𝑥) ∈ (Base‘𝐾) ∧ (𝐺𝑥) ∈ (Base‘𝐾)) → (∀𝑞𝐴 (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥)) ↔ (𝐹𝑥) = (𝐺𝑥)))
6860, 64, 66, 67syl3anc 1369 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (∀𝑞𝐴 (𝑞(le‘𝐾)(𝐹𝑥) ↔ 𝑞(le‘𝐾)(𝐺𝑥)) ↔ (𝐹𝑥) = (𝐺𝑥)))
6959, 68sylibd 238 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ 𝑥 ∈ (Base‘𝐾)) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → (𝐹𝑥) = (𝐺𝑥)))
7069ralrimdva 3112 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → ∀𝑥 ∈ (Base‘𝐾)(𝐹𝑥) = (𝐺𝑥)))
71243adant3 1130 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → 𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
72 f1ofn 6701 . . . . 5 (𝐹:(Base‘𝐾)–1-1-onto→(Base‘𝐾) → 𝐹 Fn (Base‘𝐾))
7371, 72syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → 𝐹 Fn (Base‘𝐾))
7463adant2 1129 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → 𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾))
75 f1ofn 6701 . . . . 5 (𝐺:(Base‘𝐾)–1-1-onto→(Base‘𝐾) → 𝐺 Fn (Base‘𝐾))
7674, 75syl 17 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → 𝐺 Fn (Base‘𝐾))
77 eqfnfv 6891 . . . 4 ((𝐹 Fn (Base‘𝐾) ∧ 𝐺 Fn (Base‘𝐾)) → (𝐹 = 𝐺 ↔ ∀𝑥 ∈ (Base‘𝐾)(𝐹𝑥) = (𝐺𝑥)))
7873, 76, 77syl2anc 583 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (𝐹 = 𝐺 ↔ ∀𝑥 ∈ (Base‘𝐾)(𝐹𝑥) = (𝐺𝑥)))
7970, 78sylibrd 258 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) → 𝐹 = 𝐺))
80 fveq1 6755 . . 3 (𝐹 = 𝐺 → (𝐹𝑝) = (𝐺𝑝))
8180ralrimivw 3108 . 2 (𝐹 = 𝐺 → ∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝))
8279, 81impbid1 224 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (∀𝑝𝐴 (𝐹𝑝) = (𝐺𝑝) ↔ 𝐹 = 𝐺))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  w3a 1085   = wceq 1539  wcel 2108  wral 3063   class class class wbr 5070  ccnv 5579   Fn wfn 6413  1-1-ontowf1o 6417  cfv 6418  Basecbs 16840  lecple 16895  Atomscatm 37204  HLchlt 37291  LHypclh 37925  LAutclaut 37926  LTrncltrn 38042
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-id 5480  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-map 8575  df-proset 17928  df-poset 17946  df-plt 17963  df-lub 17979  df-glb 17980  df-join 17981  df-meet 17982  df-p0 18058  df-lat 18065  df-clat 18132  df-oposet 37117  df-ol 37119  df-oml 37120  df-covers 37207  df-ats 37208  df-atl 37239  df-cvlat 37263  df-hlat 37292  df-lhyp 37929  df-laut 37930  df-ldil 38045  df-ltrn 38046
This theorem is referenced by:  ltrneq  38090  cdlemd  38148
  Copyright terms: Public domain W3C validator