Theorem lncmp 36921

Description: If two lines are comparable, they are equal. (Contributed by NM, 30-Apr-2012.)

Hypotheses

Ref	Expression
lncmp.b	⊢ 𝐵 = (Base‘𝐾)
lncmp.l	⊢ ≤ = (le‘𝐾)
lncmp.n	⊢ 𝑁 = (Lines‘𝐾)
lncmp.m	⊢ 𝑀 = (pmap‘𝐾)

Assertion

Ref	Expression
lncmp	⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → (𝑋 ≤ 𝑌 ↔ 𝑋 = 𝑌))

Proof of Theorem lncmp

Dummy variables 𝑞 𝑝 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simplrl 775	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → (𝑀‘𝑋) ∈ 𝑁)
2		simpll1 1208	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → 𝐾 ∈ HL)
3		simpll2 1209	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → 𝑋 ∈ 𝐵)
4		lncmp.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
5		eqid 2823	. . . . . . 7 ⊢ (join‘𝐾) = (join‘𝐾)
6		eqid 2823	. . . . . . 7 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
7		lncmp.n	. . . . . . 7 ⊢ 𝑁 = (Lines‘𝐾)
8		lncmp.m	. . . . . . 7 ⊢ 𝑀 = (pmap‘𝐾)
9	4, 5, 6, 7, 8	isline3 36914	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵) → ((𝑀‘𝑋) ∈ 𝑁 ↔ ∃𝑝 ∈ (Atoms‘𝐾)∃𝑞 ∈ (Atoms‘𝐾)(𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞))))
10	2, 3, 9	syl2anc 586	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → ((𝑀‘𝑋) ∈ 𝑁 ↔ ∃𝑝 ∈ (Atoms‘𝐾)∃𝑞 ∈ (Atoms‘𝐾)(𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞))))
11	1, 10	mpbid 234	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → ∃𝑝 ∈ (Atoms‘𝐾)∃𝑞 ∈ (Atoms‘𝐾)(𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))
12		simp3rr 1243	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑋 = (𝑝(join‘𝐾)𝑞))
13		simp1l1 1262	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝐾 ∈ HL)
14		simp1l3 1264	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑌 ∈ 𝐵)
15		simp1rr 1235	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → (𝑀‘𝑌) ∈ 𝑁)
16		simp3ll 1240	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ∈ (Atoms‘𝐾))
17		simp3lr 1241	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑞 ∈ (Atoms‘𝐾))
18		simp3rl 1242	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ≠ 𝑞)
19		lncmp.l	. . . . . . . . . 10 ⊢ ≤ = (le‘𝐾)
20	13	hllatd 36502	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝐾 ∈ Lat)
21	4, 6	atbase 36427	. . . . . . . . . . 11 ⊢ (𝑝 ∈ (Atoms‘𝐾) → 𝑝 ∈ 𝐵)
22	16, 21	syl 17	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ∈ 𝐵)
23		simp1l2 1263	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑋 ∈ 𝐵)
24	19, 5, 6	hlatlej1 36513	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ HL ∧ 𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → 𝑝 ≤ (𝑝(join‘𝐾)𝑞))
25	13, 16, 17, 24	syl3anc 1367	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ≤ (𝑝(join‘𝐾)𝑞))
26	25, 12	breqtrrd 5096	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ≤ 𝑋)
27		simp2 1133	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑋 ≤ 𝑌)
28	4, 19, 20, 22, 23, 14, 26, 27	lattrd 17670	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑝 ≤ 𝑌)
29	4, 6	atbase 36427	. . . . . . . . . . 11 ⊢ (𝑞 ∈ (Atoms‘𝐾) → 𝑞 ∈ 𝐵)
30	17, 29	syl 17	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑞 ∈ 𝐵)
31	19, 5, 6	hlatlej2 36514	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ HL ∧ 𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → 𝑞 ≤ (𝑝(join‘𝐾)𝑞))
32	13, 16, 17, 31	syl3anc 1367	. . . . . . . . . . 11 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑞 ≤ (𝑝(join‘𝐾)𝑞))
33	32, 12	breqtrrd 5096	. . . . . . . . . 10 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑞 ≤ 𝑋)
34	4, 19, 20, 30, 23, 14, 33, 27	lattrd 17670	. . . . . . . . 9 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑞 ≤ 𝑌)
35	4, 19, 5, 6, 7, 8	lneq2at 36916	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑌 ∈ 𝐵 ∧ (𝑀‘𝑌) ∈ 𝑁) ∧ (𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾) ∧ 𝑝 ≠ 𝑞) ∧ (𝑝 ≤ 𝑌 ∧ 𝑞 ≤ 𝑌)) → 𝑌 = (𝑝(join‘𝐾)𝑞))
36	13, 14, 15, 16, 17, 18, 28, 34, 35	syl332anc 1397	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑌 = (𝑝(join‘𝐾)𝑞))
37	12, 36	eqtr4d 2861	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌 ∧ ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)))) → 𝑋 = 𝑌)
38	37	3expia 1117	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → (((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) ∧ (𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞))) → 𝑋 = 𝑌))
39	38	expd 418	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → ((𝑝 ∈ (Atoms‘𝐾) ∧ 𝑞 ∈ (Atoms‘𝐾)) → ((𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)) → 𝑋 = 𝑌)))
40	39	rexlimdvv 3295	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → (∃𝑝 ∈ (Atoms‘𝐾)∃𝑞 ∈ (Atoms‘𝐾)(𝑝 ≠ 𝑞 ∧ 𝑋 = (𝑝(join‘𝐾)𝑞)) → 𝑋 = 𝑌))
41	11, 40	mpd 15	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) ∧ 𝑋 ≤ 𝑌) → 𝑋 = 𝑌)
42	41	ex 415	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → (𝑋 ≤ 𝑌 → 𝑋 = 𝑌))
43		simpl1 1187	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → 𝐾 ∈ HL)
44	43	hllatd 36502	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → 𝐾 ∈ Lat)
45		simpl2 1188	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → 𝑋 ∈ 𝐵)
46	4, 19	latref 17665	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵) → 𝑋 ≤ 𝑋)
47	44, 45, 46	syl2anc 586	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → 𝑋 ≤ 𝑋)
48		breq2 5072	. . 3 ⊢ (𝑋 = 𝑌 → (𝑋 ≤ 𝑋 ↔ 𝑋 ≤ 𝑌))
49	47, 48	syl5ibcom 247	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → (𝑋 = 𝑌 → 𝑋 ≤ 𝑌))
50	42, 49	impbid 214	1 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ ((𝑀‘𝑋) ∈ 𝑁 ∧ (𝑀‘𝑌) ∈ 𝑁)) → (𝑋 ≤ 𝑌 ↔ 𝑋 = 𝑌))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3018  ∃wrex 3141   class class class wbr 5068  ‘cfv 6357  (class class class)co 7158  Basecbs 16485  lecple 16574  joincjn 17556  Latclat 17657  Atomscatm 36401  HLchlt 36488  Linesclines 36632  pmapcpmap 36635

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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-ral 3145  df-rex 3146  df-reu 3147  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-proset 17540  df-poset 17558  df-plt 17570  df-lub 17586  df-glb 17587  df-join 17588  df-meet 17589  df-p0 17651  df-lat 17658  df-clat 17720  df-oposet 36314  df-ol 36316  df-oml 36317  df-covers 36404  df-ats 36405  df-atl 36436  df-cvlat 36460  df-hlat 36489  df-lines 36639  df-pmap 36642

This theorem is referenced by:  2lnat  36922