trlcone - Mathbox for Norm Megill

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

Theorem trlcone 40195

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**
Step	Hyp	Ref	Expression
1		simpl3l 1226	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → (𝑅‘𝐹) ≠ (𝑅‘𝐺))
2		simp11 1201	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
3		simp12l 1284	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐹 ∈ 𝑇)
4		trlcone.h	. . . . . . . . . . 11 ⊢ 𝐻 = (LHyp‘𝐾)
5		trlcone.t	. . . . . . . . . . 11 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
6	4, 5	ltrncnv 39613	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ^◡𝐹 ∈ 𝑇)
7	2, 3, 6	syl2anc 583	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ^◡𝐹 ∈ 𝑇)
8		simp12r 1285	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐺 ∈ 𝑇)
9	4, 5	ltrnco 40186	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) → (𝐹 ∘ 𝐺) ∈ 𝑇)
10	2, 3, 8, 9	syl3anc 1369	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝐹 ∘ 𝐺) ∈ 𝑇)
11		eqid 2728	. . . . . . . . . 10 ⊢ (le‘𝐾) = (le‘𝐾)
12		eqid 2728	. . . . . . . . . 10 ⊢ (join‘𝐾) = (join‘𝐾)
13		trlcone.r	. . . . . . . . . 10 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
14	11, 12, 4, 5, 13	trlco 40194	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ^◡𝐹 ∈ 𝑇 ∧ (𝐹 ∘ 𝐺) ∈ 𝑇) → (𝑅‘(^◡𝐹 ∘ (𝐹 ∘ 𝐺)))(le‘𝐾)((𝑅‘^◡𝐹)(join‘𝐾)(𝑅‘(𝐹 ∘ 𝐺))))
15	2, 7, 10, 14	syl3anc 1369	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘(^◡𝐹 ∘ (𝐹 ∘ 𝐺)))(le‘𝐾)((𝑅‘^◡𝐹)(join‘𝐾)(𝑅‘(𝐹 ∘ 𝐺))))
16		trlcone.b	. . . . . . . . . . . . . . 15 ⊢ 𝐵 = (Base‘𝐾)
17	16, 4, 5	ltrn1o 39591	. . . . . . . . . . . . . 14 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐹:𝐵–1-1-onto→𝐵)
18	2, 3, 17	syl2anc 583	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐹:𝐵–1-1-onto→𝐵)
19		f1ococnv1 6862	. . . . . . . . . . . . 13 ⊢ (𝐹:𝐵–1-1-onto→𝐵 → (^◡𝐹 ∘ 𝐹) = ( I ↾ 𝐵))
20	18, 19	syl 17	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (^◡𝐹 ∘ 𝐹) = ( I ↾ 𝐵))
21	20	coeq1d 5858	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ((^◡𝐹 ∘ 𝐹) ∘ 𝐺) = (( I ↾ 𝐵) ∘ 𝐺))
22	16, 4, 5	ltrn1o 39591	. . . . . . . . . . . . 13 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) → 𝐺:𝐵–1-1-onto→𝐵)
23	2, 8, 22	syl2anc 583	. . . . . . . . . . . 12 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐺:𝐵–1-1-onto→𝐵)
24		f1of 6833	. . . . . . . . . . . 12 ⊢ (𝐺:𝐵–1-1-onto→𝐵 → 𝐺:𝐵⟶𝐵)
25		fcoi2 6766	. . . . . . . . . . . 12 ⊢ (𝐺:𝐵⟶𝐵 → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
26	23, 24, 25	3syl 18	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
27	21, 26	eqtrd 2768	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ((^◡𝐹 ∘ 𝐹) ∘ 𝐺) = 𝐺)
28		coass 6263	. . . . . . . . . 10 ⊢ ((^◡𝐹 ∘ 𝐹) ∘ 𝐺) = (^◡𝐹 ∘ (𝐹 ∘ 𝐺))
29	27, 28	eqtr3di 2783	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐺 = (^◡𝐹 ∘ (𝐹 ∘ 𝐺)))
30	29	fveq2d 6895	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐺) = (𝑅‘(^◡𝐹 ∘ (𝐹 ∘ 𝐺))))
31		simp11l 1282	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐾 ∈ HL)
32		simp2 1135	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐹) ∈ (Atoms‘𝐾))
33		eqid 2728	. . . . . . . . . . 11 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
34	12, 33	hlatjidm 38835	. . . . . . . . . 10 ⊢ ((𝐾 ∈ HL ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → ((𝑅‘𝐹)(join‘𝐾)(𝑅‘𝐹)) = (𝑅‘𝐹))
35	31, 32, 34	syl2anc 583	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ((𝑅‘𝐹)(join‘𝐾)(𝑅‘𝐹)) = (𝑅‘𝐹))
36	4, 5, 13	trlcnv 39632	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
37	2, 3, 36	syl2anc 583	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
38	37	eqcomd 2734	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐹) = (𝑅‘^◡𝐹))
39		simp3 1136	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺)))
40	38, 39	oveq12d 7432	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ((𝑅‘𝐹)(join‘𝐾)(𝑅‘𝐹)) = ((𝑅‘^◡𝐹)(join‘𝐾)(𝑅‘(𝐹 ∘ 𝐺))))
41	35, 40	eqtr3d 2770	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐹) = ((𝑅‘^◡𝐹)(join‘𝐾)(𝑅‘(𝐹 ∘ 𝐺))))
42	15, 30, 41	3brtr4d 5174	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐺)(le‘𝐾)(𝑅‘𝐹))
43		hlatl 38826	. . . . . . . . 9 ⊢ (𝐾 ∈ HL → 𝐾 ∈ AtLat)
44	31, 43	syl 17	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐾 ∈ AtLat)
45		simp13r 1287	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → 𝐺 ≠ ( I ↾ 𝐵))
46	16, 33, 4, 5, 13	trlnidat 39640	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ 𝐺 ≠ ( I ↾ 𝐵)) → (𝑅‘𝐺) ∈ (Atoms‘𝐾))
47	2, 8, 45, 46	syl3anc 1369	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐺) ∈ (Atoms‘𝐾))
48	11, 33	atcmp 38777	. . . . . . . 8 ⊢ ((𝐾 ∈ AtLat ∧ (𝑅‘𝐺) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → ((𝑅‘𝐺)(le‘𝐾)(𝑅‘𝐹) ↔ (𝑅‘𝐺) = (𝑅‘𝐹)))
49	44, 47, 32, 48	syl3anc 1369	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → ((𝑅‘𝐺)(le‘𝐾)(𝑅‘𝐹) ↔ (𝑅‘𝐺) = (𝑅‘𝐹)))
50	42, 49	mpbid 231	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐺) = (𝑅‘𝐹))
51	50	eqcomd 2734	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾) ∧ (𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺))) → (𝑅‘𝐹) = (𝑅‘𝐺))
52	51	3expia 1119	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → ((𝑅‘𝐹) = (𝑅‘(𝐹 ∘ 𝐺)) → (𝑅‘𝐹) = (𝑅‘𝐺)))
53	52	necon3d 2957	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → ((𝑅‘𝐹) ≠ (𝑅‘𝐺) → (𝑅‘𝐹) ≠ (𝑅‘(𝐹 ∘ 𝐺))))
54	1, 53	mpd 15	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) ∈ (Atoms‘𝐾)) → (𝑅‘𝐹) ≠ (𝑅‘(𝐹 ∘ 𝐺)))
55		simpl3r 1227	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → 𝐺 ≠ ( I ↾ 𝐵))
56		simpl1 1189	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
57		simpl2r 1225	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → 𝐺 ∈ 𝑇)
58		eqid 2728	. . . . . . . 8 ⊢ (0.‘𝐾) = (0.‘𝐾)
59	16, 58, 4, 5, 13	trlid0b 39645	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) → (𝐺 = ( I ↾ 𝐵) ↔ (𝑅‘𝐺) = (0.‘𝐾)))
60	56, 57, 59	syl2anc 583	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐺 = ( I ↾ 𝐵) ↔ (𝑅‘𝐺) = (0.‘𝐾)))
61	60	necon3bid 2981	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐺 ≠ ( I ↾ 𝐵) ↔ (𝑅‘𝐺) ≠ (0.‘𝐾)))
62	55, 61	mpbid 231	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝑅‘𝐺) ≠ (0.‘𝐾))
63	62	necomd 2992	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (0.‘𝐾) ≠ (𝑅‘𝐺))
64		simpr 484	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝑅‘𝐹) = (0.‘𝐾))
65		simpl2l 1224	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → 𝐹 ∈ 𝑇)
66	16, 58, 4, 5, 13	trlid0b 39645	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝐹 = ( I ↾ 𝐵) ↔ (𝑅‘𝐹) = (0.‘𝐾)))
67	56, 65, 66	syl2anc 583	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐹 = ( I ↾ 𝐵) ↔ (𝑅‘𝐹) = (0.‘𝐾)))
68	64, 67	mpbird 257	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → 𝐹 = ( I ↾ 𝐵))
69	68	coeq1d 5858	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐹 ∘ 𝐺) = (( I ↾ 𝐵) ∘ 𝐺))
70	56, 57, 22	syl2anc 583	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → 𝐺:𝐵–1-1-onto→𝐵)
71	70, 24, 25	3syl 18	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (( I ↾ 𝐵) ∘ 𝐺) = 𝐺)
72	69, 71	eqtrd 2768	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝐹 ∘ 𝐺) = 𝐺)
73	72	fveq2d 6895	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝑅‘(𝐹 ∘ 𝐺)) = (𝑅‘𝐺))
74	63, 64, 73	3netr4d 3014	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) ∧ (𝑅‘𝐹) = (0.‘𝐾)) → (𝑅‘𝐹) ≠ (𝑅‘(𝐹 ∘ 𝐺)))
75		simp1 1134	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
76		simp2l 1197	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → 𝐹 ∈ 𝑇)
77	58, 33, 4, 5, 13	trlator0 39638	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((𝑅‘𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅‘𝐹) = (0.‘𝐾)))
78	75, 76, 77	syl2anc 583	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → ((𝑅‘𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅‘𝐹) = (0.‘𝐾)))
79	54, 74, 78	mpjaodan 957	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ ((𝑅‘𝐹) ≠ (𝑅‘𝐺) ∧ 𝐺 ≠ ( I ↾ 𝐵))) → (𝑅‘𝐹) ≠ (𝑅‘(𝐹 ∘ 𝐺)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 ∨ wo 846 ∧ w3a 1085 = wceq 1534 ∈ wcel 2099 ≠ wne 2936 class class class wbr 5142 I cid 5569 ^◡ccnv 5671 ↾ cres 5674 ∘ ccom 5676 ⟶wf 6538 –1-1-onto→wf1o 6541 ‘cfv 6542 (class class class)co 7414 Basecbs 17173 lecple 17233 joincjn 18296 0.cp0 18408 Atomscatm 38729 AtLatcal 38730 HLchlt 38816 LHypclh 39451 LTrncltrn 39568 trLctrl 39625

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1790 ax-4 1804 ax-5 1906 ax-6 1964 ax-7 2004 ax-8 2101 ax-9 2109 ax-10 2130 ax-11 2147 ax-12 2167 ax-ext 2699 ax-rep 5279 ax-sep 5293 ax-nul 5300 ax-pow 5359 ax-pr 5423 ax-un 7734 ax-riotaBAD 38419

This theorem depends on definitions: df-bi 206 df-an 396 df-or 847 df-3or 1086 df-3an 1087 df-tru 1537 df-fal 1547 df-ex 1775 df-nf 1779 df-sb 2061 df-mo 2530 df-eu 2559 df-clab 2706 df-cleq 2720 df-clel 2806 df-nfc 2881 df-ne 2937 df-ral 3058 df-rex 3067 df-rmo 3372 df-reu 3373 df-rab 3429 df-v 3472 df-sbc 3776 df-csb 3891 df-dif 3948 df-un 3950 df-in 3952 df-ss 3962 df-nul 4319 df-if 4525 df-pw 4600 df-sn 4625 df-pr 4627 df-op 4631 df-uni 4904 df-iun 4993 df-iin 4994 df-br 5143 df-opab 5205 df-mpt 5226 df-id 5570 df-xp 5678 df-rel 5679 df-cnv 5680 df-co 5681 df-dm 5682 df-rn 5683 df-res 5684 df-ima 5685 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-riota 7370 df-ov 7417 df-oprab 7418 df-mpo 7419 df-1st 7987 df-2nd 7988 df-undef 8272 df-map 8840 df-proset 18280 df-poset 18298 df-plt 18315 df-lub 18331 df-glb 18332 df-join 18333 df-meet 18334 df-p0 18410 df-p1 18411 df-lat 18417 df-clat 18484 df-oposet 38642 df-ol 38644 df-oml 38645 df-covers 38732 df-ats 38733 df-atl 38764 df-cvlat 38788 df-hlat 38817 df-llines 38965 df-lplanes 38966 df-lvols 38967 df-lines 38968 df-psubsp 38970 df-pmap 38971 df-padd 39263 df-lhyp 39455 df-laut 39456 df-ldil 39571 df-ltrn 39572 df-trl 39626

This theorem is referenced by: trljco 40207 cdlemh2 40283 cdlemh 40284 cdlemk3 40300 cdlemk12 40317 cdlemk12u 40339 cdlemkfid1N 40388 cdlemk54 40425

W3C validator