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 38717
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 1191 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (𝐾 ∈ HL ∧ π‘Š ∈ 𝐻))
2 simpl3 1193 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐺 ∈ 𝑇)
3 eqid 2731 . . . . . . . . . . . . . . 15 (Baseβ€˜πΎ) = (Baseβ€˜πΎ)
4 ltrneq2.h . . . . . . . . . . . . . . 15 𝐻 = (LHypβ€˜πΎ)
5 ltrneq2.t . . . . . . . . . . . . . . 15 𝑇 = ((LTrnβ€˜πΎ)β€˜π‘Š)
63, 4, 5ltrn1o 38693 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) β†’ 𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
71, 2, 6syl2anc 584 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
8 simpl2 1192 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐹 ∈ 𝑇)
9 simpr3 1196 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ π‘ž ∈ 𝐴)
10 eqid 2731 . . . . . . . . . . . . . . . 16 (leβ€˜πΎ) = (leβ€˜πΎ)
11 ltrneq2.a . . . . . . . . . . . . . . . 16 𝐴 = (Atomsβ€˜πΎ)
1210, 11, 4, 5ltrncnvat 38710 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ π‘ž ∈ 𝐴) β†’ (β—‘πΉβ€˜π‘ž) ∈ 𝐴)
131, 8, 9, 12syl3anc 1371 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΉβ€˜π‘ž) ∈ 𝐴)
143, 11atbase 37857 . . . . . . . . . . . . . 14 ((β—‘πΉβ€˜π‘ž) ∈ 𝐴 β†’ (β—‘πΉβ€˜π‘ž) ∈ (Baseβ€˜πΎ))
1513, 14syl 17 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΉβ€˜π‘ž) ∈ (Baseβ€˜πΎ))
16 f1ocnvfv1 7242 . . . . . . . . . . . . 13 ((𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) ∧ (β—‘πΉβ€˜π‘ž) ∈ (Baseβ€˜πΎ)) β†’ (β—‘πΊβ€˜(πΊβ€˜(β—‘πΉβ€˜π‘ž))) = (β—‘πΉβ€˜π‘ž))
177, 15, 16syl2anc 584 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΊβ€˜(πΊβ€˜(β—‘πΉβ€˜π‘ž))) = (β—‘πΉβ€˜π‘ž))
18 simpr2 1195 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘))
19 fveq2 6862 . . . . . . . . . . . . . . . . 17 (𝑝 = (β—‘πΉβ€˜π‘ž) β†’ (πΉβ€˜π‘) = (πΉβ€˜(β—‘πΉβ€˜π‘ž)))
20 fveq2 6862 . . . . . . . . . . . . . . . . 17 (𝑝 = (β—‘πΉβ€˜π‘ž) β†’ (πΊβ€˜π‘) = (πΊβ€˜(β—‘πΉβ€˜π‘ž)))
2119, 20eqeq12d 2747 . . . . . . . . . . . . . . . 16 (𝑝 = (β—‘πΉβ€˜π‘ž) β†’ ((πΉβ€˜π‘) = (πΊβ€˜π‘) ↔ (πΉβ€˜(β—‘πΉβ€˜π‘ž)) = (πΊβ€˜(β—‘πΉβ€˜π‘ž))))
2221rspcv 3591 . . . . . . . . . . . . . . 15 ((β—‘πΉβ€˜π‘ž) ∈ 𝐴 β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ (πΉβ€˜(β—‘πΉβ€˜π‘ž)) = (πΊβ€˜(β—‘πΉβ€˜π‘ž))))
2313, 18, 22sylc 65 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (πΉβ€˜(β—‘πΉβ€˜π‘ž)) = (πΊβ€˜(β—‘πΉβ€˜π‘ž)))
243, 4, 5ltrn1o 38693 . . . . . . . . . . . . . . . 16 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) β†’ 𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
251, 8, 24syl2anc 584 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
263, 11atbase 37857 . . . . . . . . . . . . . . . 16 (π‘ž ∈ 𝐴 β†’ π‘ž ∈ (Baseβ€˜πΎ))
279, 26syl 17 . . . . . . . . . . . . . . 15 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ π‘ž ∈ (Baseβ€˜πΎ))
28 f1ocnvfv2 7243 . . . . . . . . . . . . . . 15 ((𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) ∧ π‘ž ∈ (Baseβ€˜πΎ)) β†’ (πΉβ€˜(β—‘πΉβ€˜π‘ž)) = π‘ž)
2925, 27, 28syl2anc 584 . . . . . . . . . . . . . 14 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (πΉβ€˜(β—‘πΉβ€˜π‘ž)) = π‘ž)
3023, 29eqtr3d 2773 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (πΊβ€˜(β—‘πΉβ€˜π‘ž)) = π‘ž)
3130fveq2d 6866 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΊβ€˜(πΊβ€˜(β—‘πΉβ€˜π‘ž))) = (β—‘πΊβ€˜π‘ž))
3217, 31eqtr3d 2773 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΉβ€˜π‘ž) = (β—‘πΊβ€˜π‘ž))
3332breq1d 5135 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ ((β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)π‘₯ ↔ (β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)π‘₯))
34 simpr1 1194 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ π‘₯ ∈ (Baseβ€˜πΎ))
35 f1ocnvfv1 7242 . . . . . . . . . . . 12 ((𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (β—‘πΉβ€˜(πΉβ€˜π‘₯)) = π‘₯)
3625, 34, 35syl2anc 584 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΉβ€˜(πΉβ€˜π‘₯)) = π‘₯)
3736breq2d 5137 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ ((β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΉβ€˜(πΉβ€˜π‘₯)) ↔ (β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)π‘₯))
38 f1ocnvfv1 7242 . . . . . . . . . . . 12 ((𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (β—‘πΊβ€˜(πΊβ€˜π‘₯)) = π‘₯)
397, 34, 38syl2anc 584 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (β—‘πΊβ€˜(πΊβ€˜π‘₯)) = π‘₯)
4039breq2d 5137 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ ((β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΊβ€˜(πΊβ€˜π‘₯)) ↔ (β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)π‘₯))
4133, 37, 403bitr4d 310 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ ((β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΉβ€˜(πΉβ€˜π‘₯)) ↔ (β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΊβ€˜(πΊβ€˜π‘₯))))
42 simpl1l 1224 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐾 ∈ HL)
43 eqid 2731 . . . . . . . . . . . 12 (LAutβ€˜πΎ) = (LAutβ€˜πΎ)
444, 43, 5ltrnlaut 38692 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) β†’ 𝐹 ∈ (LAutβ€˜πΎ))
451, 8, 44syl2anc 584 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐹 ∈ (LAutβ€˜πΎ))
463, 4, 5ltrncl 38694 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (πΉβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
471, 8, 34, 46syl3anc 1371 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (πΉβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
483, 10, 43lautcnvle 38658 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝐹 ∈ (LAutβ€˜πΎ)) ∧ (π‘ž ∈ (Baseβ€˜πΎ) ∧ (πΉβ€˜π‘₯) ∈ (Baseβ€˜πΎ))) β†’ (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ (β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΉβ€˜(πΉβ€˜π‘₯))))
4942, 45, 27, 47, 48syl22anc 837 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ (β—‘πΉβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΉβ€˜(πΉβ€˜π‘₯))))
504, 43, 5ltrnlaut 38692 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) β†’ 𝐺 ∈ (LAutβ€˜πΎ))
511, 2, 50syl2anc 584 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ 𝐺 ∈ (LAutβ€˜πΎ))
523, 4, 5ltrncl 38694 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (πΊβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
531, 2, 34, 52syl3anc 1371 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (πΊβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
543, 10, 43lautcnvle 38658 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝐺 ∈ (LAutβ€˜πΎ)) ∧ (π‘ž ∈ (Baseβ€˜πΎ) ∧ (πΊβ€˜π‘₯) ∈ (Baseβ€˜πΎ))) β†’ (π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯) ↔ (β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΊβ€˜(πΊβ€˜π‘₯))))
5542, 51, 27, 53, 54syl22anc 837 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯) ↔ (β—‘πΊβ€˜π‘ž)(leβ€˜πΎ)(β—‘πΊβ€˜(πΊβ€˜π‘₯))))
5641, 49, 553bitr4d 310 . . . . . . . 8 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (π‘₯ ∈ (Baseβ€˜πΎ) ∧ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ∧ π‘ž ∈ 𝐴)) β†’ (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯)))
57563exp2 1354 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ (π‘₯ ∈ (Baseβ€˜πΎ) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ (π‘ž ∈ 𝐴 β†’ (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯))))))
5857imp 407 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ (π‘ž ∈ 𝐴 β†’ (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯)))))
5958ralrimdv 3151 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ βˆ€π‘ž ∈ 𝐴 (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯))))
60 simpl1l 1224 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ 𝐾 ∈ HL)
61 simpl1 1191 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (𝐾 ∈ HL ∧ π‘Š ∈ 𝐻))
62 simpl2 1192 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ 𝐹 ∈ 𝑇)
63 simpr 485 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ π‘₯ ∈ (Baseβ€˜πΎ))
6461, 62, 63, 46syl3anc 1371 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (πΉβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
65 simpl3 1193 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ 𝐺 ∈ 𝑇)
6661, 65, 63, 52syl3anc 1371 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (πΊβ€˜π‘₯) ∈ (Baseβ€˜πΎ))
673, 10, 11hlateq 37968 . . . . . 6 ((𝐾 ∈ HL ∧ (πΉβ€˜π‘₯) ∈ (Baseβ€˜πΎ) ∧ (πΊβ€˜π‘₯) ∈ (Baseβ€˜πΎ)) β†’ (βˆ€π‘ž ∈ 𝐴 (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯)) ↔ (πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
6860, 64, 66, 67syl3anc 1371 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (βˆ€π‘ž ∈ 𝐴 (π‘ž(leβ€˜πΎ)(πΉβ€˜π‘₯) ↔ π‘ž(leβ€˜πΎ)(πΊβ€˜π‘₯)) ↔ (πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
6959, 68sylibd 238 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ π‘₯ ∈ (Baseβ€˜πΎ)) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ (πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
7069ralrimdva 3153 . . 3 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ βˆ€π‘₯ ∈ (Baseβ€˜πΎ)(πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
71243adant3 1132 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ 𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
72 f1ofn 6805 . . . . 5 (𝐹:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) β†’ 𝐹 Fn (Baseβ€˜πΎ))
7371, 72syl 17 . . . 4 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ 𝐹 Fn (Baseβ€˜πΎ))
7463adant2 1131 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ 𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ))
75 f1ofn 6805 . . . . 5 (𝐺:(Baseβ€˜πΎ)–1-1-ontoβ†’(Baseβ€˜πΎ) β†’ 𝐺 Fn (Baseβ€˜πΎ))
7674, 75syl 17 . . . 4 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ 𝐺 Fn (Baseβ€˜πΎ))
77 eqfnfv 7002 . . . 4 ((𝐹 Fn (Baseβ€˜πΎ) ∧ 𝐺 Fn (Baseβ€˜πΎ)) β†’ (𝐹 = 𝐺 ↔ βˆ€π‘₯ ∈ (Baseβ€˜πΎ)(πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
7873, 76, 77syl2anc 584 . . 3 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ (𝐹 = 𝐺 ↔ βˆ€π‘₯ ∈ (Baseβ€˜πΎ)(πΉβ€˜π‘₯) = (πΊβ€˜π‘₯)))
7970, 78sylibrd 258 . 2 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) β†’ 𝐹 = 𝐺))
80 fveq1 6861 . . 3 (𝐹 = 𝐺 β†’ (πΉβ€˜π‘) = (πΊβ€˜π‘))
8180ralrimivw 3149 . 2 (𝐹 = 𝐺 β†’ βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘))
8279, 81impbid1 224 1 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) β†’ (βˆ€π‘ ∈ 𝐴 (πΉβ€˜π‘) = (πΊβ€˜π‘) ↔ 𝐹 = 𝐺))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  βˆ€wral 3060   class class class wbr 5125  β—‘ccnv 5652   Fn wfn 6511  β€“1-1-ontoβ†’wf1o 6515  β€˜cfv 6516  Basecbs 17109  lecple 17169  Atomscatm 37831  HLchlt 37918  LHypclh 38553  LAutclaut 38554  LTrncltrn 38670
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5262  ax-sep 5276  ax-nul 5283  ax-pow 5340  ax-pr 5404  ax-un 7692
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-reu 3365  df-rab 3419  df-v 3461  df-sbc 3758  df-csb 3874  df-dif 3931  df-un 3933  df-in 3935  df-ss 3945  df-nul 4303  df-if 4507  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4886  df-iun 4976  df-br 5126  df-opab 5188  df-mpt 5209  df-id 5551  df-xp 5659  df-rel 5660  df-cnv 5661  df-co 5662  df-dm 5663  df-rn 5664  df-res 5665  df-ima 5666  df-iota 6468  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-riota 7333  df-ov 7380  df-oprab 7381  df-mpo 7382  df-map 8789  df-proset 18213  df-poset 18231  df-plt 18248  df-lub 18264  df-glb 18265  df-join 18266  df-meet 18267  df-p0 18343  df-lat 18350  df-clat 18417  df-oposet 37744  df-ol 37746  df-oml 37747  df-covers 37834  df-ats 37835  df-atl 37866  df-cvlat 37890  df-hlat 37919  df-lhyp 38557  df-laut 38558  df-ldil 38673  df-ltrn 38674
This theorem is referenced by:  ltrneq  38718  cdlemd  38776
  Copyright terms: Public domain W3C validator