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

Theorem trlcone 40847
Description: If two translations have different traces, the trace of their composition is also different. (Contributed by NM, 14-Jun-2013.)
Hypotheses
Ref Expression
trlcone.b 𝐵 = (Base‘𝐾)
trlcone.h 𝐻 = (LHyp‘𝐾)
trlcone.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
trlcone.r 𝑅 = ((trL‘𝐾)‘𝑊)
Assertion
Ref Expression
trlcone (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → (𝑅𝐹) ≠ (𝑅‘(𝐹𝐺)))

Proof of Theorem trlcone
StepHypRef Expression
1 simpl3l 1229 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝑅𝐹) ≠ (𝑅𝐺))
2 simp11 1204 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
3 simp12l 1287 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐹𝑇)
4 trlcone.h . . . . . . . . . . 11 𝐻 = (LHyp‘𝐾)
5 trlcone.t . . . . . . . . . . 11 𝑇 = ((LTrn‘𝐾)‘𝑊)
64, 5ltrncnv 40265 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹𝑇)
72, 3, 6syl2anc 584 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐹𝑇)
8 simp12r 1288 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐺𝑇)
94, 5ltrnco 40838 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) → (𝐹𝐺) ∈ 𝑇)
102, 3, 8, 9syl3anc 1373 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝐹𝐺) ∈ 𝑇)
11 eqid 2733 . . . . . . . . . 10 (le‘𝐾) = (le‘𝐾)
12 eqid 2733 . . . . . . . . . 10 (join‘𝐾) = (join‘𝐾)
13 trlcone.r . . . . . . . . . 10 𝑅 = ((trL‘𝐾)‘𝑊)
1411, 12, 4, 5, 13trlco 40846 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇 ∧ (𝐹𝐺) ∈ 𝑇) → (𝑅‘(𝐹 ∘ (𝐹𝐺)))(le‘𝐾)((𝑅𝐹)(join‘𝐾)(𝑅‘(𝐹𝐺))))
152, 7, 10, 14syl3anc 1373 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅‘(𝐹 ∘ (𝐹𝐺)))(le‘𝐾)((𝑅𝐹)(join‘𝐾)(𝑅‘(𝐹𝐺))))
16 trlcone.b . . . . . . . . . . . . . . 15 𝐵 = (Base‘𝐾)
1716, 4, 5ltrn1o 40243 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹:𝐵1-1-onto𝐵)
182, 3, 17syl2anc 584 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐹:𝐵1-1-onto𝐵)
19 f1ococnv1 6797 . . . . . . . . . . . . 13 (𝐹:𝐵1-1-onto𝐵 → (𝐹𝐹) = ( I ↾ 𝐵))
2018, 19syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝐹𝐹) = ( I ↾ 𝐵))
2120coeq1d 5805 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → ((𝐹𝐹) ∘ 𝐺) = (( I ↾ 𝐵) ∘ 𝐺))
2216, 4, 5ltrn1o 40243 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇) → 𝐺:𝐵1-1-onto𝐵)
232, 8, 22syl2anc 584 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐺:𝐵1-1-onto𝐵)
24 f1of 6768 . . . . . . . . . . . 12 (𝐺:𝐵1-1-onto𝐵𝐺:𝐵𝐵)
25 fcoi2 6703 . . . . . . . . . . . 12 (𝐺:𝐵𝐵 → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
2623, 24, 253syl 18 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
2721, 26eqtrd 2768 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → ((𝐹𝐹) ∘ 𝐺) = 𝐺)
28 coass 6218 . . . . . . . . . 10 ((𝐹𝐹) ∘ 𝐺) = (𝐹 ∘ (𝐹𝐺))
2927, 28eqtr3di 2783 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐺 = (𝐹 ∘ (𝐹𝐺)))
3029fveq2d 6832 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐺) = (𝑅‘(𝐹 ∘ (𝐹𝐺))))
31 simp11l 1285 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐾 ∈ HL)
32 simp2 1137 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) ∈ (Atoms‘𝐾))
33 eqid 2733 . . . . . . . . . . 11 (Atoms‘𝐾) = (Atoms‘𝐾)
3412, 33hlatjidm 39488 . . . . . . . . . 10 ((𝐾 ∈ HL ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → ((𝑅𝐹)(join‘𝐾)(𝑅𝐹)) = (𝑅𝐹))
3531, 32, 34syl2anc 584 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → ((𝑅𝐹)(join‘𝐾)(𝑅𝐹)) = (𝑅𝐹))
364, 5, 13trlcnv 40284 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → (𝑅𝐹) = (𝑅𝐹))
372, 3, 36syl2anc 584 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) = (𝑅𝐹))
3837eqcomd 2739 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) = (𝑅𝐹))
39 simp3 1138 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) = (𝑅‘(𝐹𝐺)))
4038, 39oveq12d 7370 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → ((𝑅𝐹)(join‘𝐾)(𝑅𝐹)) = ((𝑅𝐹)(join‘𝐾)(𝑅‘(𝐹𝐺))))
4135, 40eqtr3d 2770 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) = ((𝑅𝐹)(join‘𝐾)(𝑅‘(𝐹𝐺))))
4215, 30, 413brtr4d 5125 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐺)(le‘𝐾)(𝑅𝐹))
43 hlatl 39479 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
4431, 43syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐾 ∈ AtLat)
45 simp13r 1290 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → 𝐺 ≠ ( I ↾ 𝐵))
4616, 33, 4, 5, 13trlnidat 40292 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) → (𝑅𝐺) ∈ (Atoms‘𝐾))
472, 8, 45, 46syl3anc 1373 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐺) ∈ (Atoms‘𝐾))
4811, 33atcmp 39430 . . . . . . . 8 ((𝐾 ∈ AtLat ∧ (𝑅𝐺) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → ((𝑅𝐺)(le‘𝐾)(𝑅𝐹) ↔ (𝑅𝐺) = (𝑅𝐹)))
4944, 47, 32, 48syl3anc 1373 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → ((𝑅𝐺)(le‘𝐾)(𝑅𝐹) ↔ (𝑅𝐺) = (𝑅𝐹)))
5042, 49mpbid 232 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐺) = (𝑅𝐹))
5150eqcomd 2739 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅𝐹) = (𝑅‘(𝐹𝐺))) → (𝑅𝐹) = (𝑅𝐺))
52513expia 1121 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → ((𝑅𝐹) = (𝑅‘(𝐹𝐺)) → (𝑅𝐹) = (𝑅𝐺)))
5352necon3d 2950 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → ((𝑅𝐹) ≠ (𝑅𝐺) → (𝑅𝐹) ≠ (𝑅‘(𝐹𝐺))))
541, 53mpd 15 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝑅𝐹) ≠ (𝑅‘(𝐹𝐺)))
55 simpl3r 1230 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐺 ≠ ( I ↾ 𝐵))
56 simpl1 1192 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
57 simpl2r 1228 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐺𝑇)
58 eqid 2733 . . . . . . . 8 (0.‘𝐾) = (0.‘𝐾)
5916, 58, 4, 5, 13trlid0b 40297 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇) → (𝐺 = ( I ↾ 𝐵) ↔ (𝑅𝐺) = (0.‘𝐾)))
6056, 57, 59syl2anc 584 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐺 = ( I ↾ 𝐵) ↔ (𝑅𝐺) = (0.‘𝐾)))
6160necon3bid 2973 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐺 ≠ ( I ↾ 𝐵) ↔ (𝑅𝐺) ≠ (0.‘𝐾)))
6255, 61mpbid 232 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝐺) ≠ (0.‘𝐾))
6362necomd 2984 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (0.‘𝐾) ≠ (𝑅𝐺))
64 simpr 484 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝐹) = (0.‘𝐾))
65 simpl2l 1227 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐹𝑇)
6616, 58, 4, 5, 13trlid0b 40297 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → (𝐹 = ( I ↾ 𝐵) ↔ (𝑅𝐹) = (0.‘𝐾)))
6756, 65, 66syl2anc 584 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐹 = ( I ↾ 𝐵) ↔ (𝑅𝐹) = (0.‘𝐾)))
6864, 67mpbird 257 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐹 = ( I ↾ 𝐵))
6968coeq1d 5805 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐹𝐺) = (( I ↾ 𝐵) ∘ 𝐺))
7056, 57, 22syl2anc 584 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐺:𝐵1-1-onto𝐵)
7170, 24, 253syl 18 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
7269, 71eqtrd 2768 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐹𝐺) = 𝐺)
7372fveq2d 6832 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅‘(𝐹𝐺)) = (𝑅𝐺))
7463, 64, 733netr4d 3006 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝐹) ≠ (𝑅‘(𝐹𝐺)))
75 simp1 1136 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
76 simp2l 1200 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → 𝐹𝑇)
7758, 33, 4, 5, 13trlator0 40290 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → ((𝑅𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅𝐹) = (0.‘𝐾)))
7875, 76, 77syl2anc 584 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → ((𝑅𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅𝐹) = (0.‘𝐾)))
7954, 74, 78mpjaodan 960 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝑅𝐹) ≠ (𝑅𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → (𝑅𝐹) ≠ (𝑅‘(𝐹𝐺)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wo 847  w3a 1086   = wceq 1541  wcel 2113  wne 2929   class class class wbr 5093   I cid 5513  ccnv 5618  cres 5621  ccom 5623  wf 6482  1-1-ontowf1o 6485  cfv 6486  (class class class)co 7352  Basecbs 17122  lecple 17170  joincjn 18219  0.cp0 18329  Atomscatm 39382  AtLatcal 39383  HLchlt 39469  LHypclh 40103  LTrncltrn 40220  trLctrl 40277
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5219  ax-sep 5236  ax-nul 5246  ax-pow 5305  ax-pr 5372  ax-un 7674  ax-riotaBAD 39072
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-ral 3049  df-rex 3058  df-rmo 3347  df-reu 3348  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-nul 4283  df-if 4475  df-pw 4551  df-sn 4576  df-pr 4578  df-op 4582  df-uni 4859  df-iun 4943  df-iin 4944  df-br 5094  df-opab 5156  df-mpt 5175  df-id 5514  df-xp 5625  df-rel 5626  df-cnv 5627  df-co 5628  df-dm 5629  df-rn 5630  df-res 5631  df-ima 5632  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-riota 7309  df-ov 7355  df-oprab 7356  df-mpo 7357  df-1st 7927  df-2nd 7928  df-undef 8209  df-map 8758  df-proset 18202  df-poset 18221  df-plt 18236  df-lub 18252  df-glb 18253  df-join 18254  df-meet 18255  df-p0 18331  df-p1 18332  df-lat 18340  df-clat 18407  df-oposet 39295  df-ol 39297  df-oml 39298  df-covers 39385  df-ats 39386  df-atl 39417  df-cvlat 39441  df-hlat 39470  df-llines 39617  df-lplanes 39618  df-lvols 39619  df-lines 39620  df-psubsp 39622  df-pmap 39623  df-padd 39915  df-lhyp 40107  df-laut 40108  df-ldil 40223  df-ltrn 40224  df-trl 40278
This theorem is referenced by:  trljco  40859  cdlemh2  40935  cdlemh  40936  cdlemk3  40952  cdlemk12  40969  cdlemk12u  40991  cdlemkfid1N  41040  cdlemk54  41077
  Copyright terms: Public domain W3C validator