Theorem cdlemk20 38888

Description: Part of proof of Lemma K of [Crawley] p. 118. Line 22, p. 119 for the i=2, j=1 case. Note typo on line 22: f should be f_i. Our 𝐷, 𝐶, 𝑂, 𝑄, 𝑈, 𝑉 represent their f₁, f₂, k₁, k₂, sigma₁, sigma₂. (Contributed by NM, 5-Jul-2013.)

Hypotheses

Ref	Expression
cdlemk1.b	⊢ 𝐵 = (Base‘𝐾)
cdlemk1.l	⊢ ≤ = (le‘𝐾)
cdlemk1.j	⊢ ∨ = (join‘𝐾)
cdlemk1.m	⊢ ∧ = (meet‘𝐾)
cdlemk1.a	⊢ 𝐴 = (Atoms‘𝐾)
cdlemk1.h	⊢ 𝐻 = (LHyp‘𝐾)
cdlemk1.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk1.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk1.s	⊢ 𝑆 = (𝑓 ∈ 𝑇 ↦ (℩𝑖 ∈ 𝑇 (𝑖‘𝑃) = ((𝑃 ∨ (𝑅‘𝑓)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑓 ∘ ◡𝐹))))))
cdlemk1.o	⊢ 𝑂 = (𝑆‘𝐷)
cdlemk1.u	⊢ 𝑈 = (𝑒 ∈ 𝑇 ↦ (℩𝑗 ∈ 𝑇 (𝑗‘𝑃) = ((𝑃 ∨ (𝑅‘𝑒)) ∧ ((𝑂‘𝑃) ∨ (𝑅‘(𝑒 ∘ ◡𝐷))))))
cdlemk2a.q	⊢ 𝑄 = (𝑆‘𝐶)

Assertion

Ref	Expression
cdlemk20	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑈‘𝐶)‘𝑃) = (𝑄‘𝑃))

Distinct variable groups:   𝑓,𝑖, ∧   ≤ ,𝑖   ∨ ,𝑓,𝑖   𝐴,𝑖   𝐷,𝑓,𝑖   𝑓,𝐹,𝑖   𝑖,𝐻   𝑖,𝐾   𝑓,𝑁,𝑖   𝑃,𝑓,𝑖   𝑅,𝑓,𝑖   𝑇,𝑓,𝑖   𝑓,𝑊,𝑖   ∧ ,𝑒   ∨ ,𝑒   𝐷,𝑒,𝑗   𝑒,𝑂   𝑃,𝑒   𝑅,𝑒   𝑇,𝑒   𝑒,𝑊   ∧ ,𝑗   ≤ ,𝑗   ∨ ,𝑗   𝐴,𝑗   𝐷,𝑗   𝑗,𝐹   𝑗,𝐻   𝑗,𝐾   𝑗,𝑁   𝑗,𝑂   𝑃,𝑗   𝑅,𝑗   𝑇,𝑗   𝑗,𝑊   𝑒,𝐹,𝑓,𝑖   𝐶,𝑒   𝑓,𝑗,𝐶,𝑖

Allowed substitution hints:   𝐴(𝑒,𝑓)   𝐵(𝑒,𝑓,𝑖,𝑗)   𝑄(𝑒,𝑓,𝑖,𝑗)   𝑆(𝑒,𝑓,𝑖,𝑗)   𝑈(𝑒,𝑓,𝑖,𝑗)   𝐻(𝑒,𝑓)   𝐾(𝑒,𝑓)   ≤ (𝑒,𝑓)   𝑁(𝑒)   𝑂(𝑓,𝑖)

Proof of Theorem cdlemk20

Step	Hyp	Ref	Expression
1		simp11 1202	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		simp23 1207	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘𝐹) = (𝑅‘𝑁))
3		simp21r 1290	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐶 ∈ 𝑇)
4		simp12 1203	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐹 ∈ 𝑇)
5		simp13 1204	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐷 ∈ 𝑇)
6		simp21l 1289	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝑁 ∈ 𝑇)
7		simp3r1 1280	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘𝐷) ≠ (𝑅‘𝐹))
8		simp3r3 1282	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘𝐶) ≠ (𝑅‘𝐷))
9	8	necomd 2999	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘𝐷) ≠ (𝑅‘𝐶))
10	7, 9	jca 512	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐷) ≠ (𝑅‘𝐶)))
11		simp3l1 1277	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐹 ≠ ( I ↾ 𝐵))
12		simp3l3 1279	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐶 ≠ ( I ↾ 𝐵))
13		simp3l2 1278	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → 𝐷 ≠ ( I ↾ 𝐵))
14	11, 12, 13	3jca 1127	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)))
15		simp22 1206	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
16		cdlemk1.b	. . . 4 ⊢ 𝐵 = (Base‘𝐾)
17		cdlemk1.l	. . . 4 ⊢ ≤ = (le‘𝐾)
18		cdlemk1.j	. . . 4 ⊢ ∨ = (join‘𝐾)
19		cdlemk1.m	. . . 4 ⊢ ∧ = (meet‘𝐾)
20		cdlemk1.a	. . . 4 ⊢ 𝐴 = (Atoms‘𝐾)
21		cdlemk1.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
22		cdlemk1.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
23		cdlemk1.r	. . . 4 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
24		cdlemk1.s	. . . 4 ⊢ 𝑆 = (𝑓 ∈ 𝑇 ↦ (℩𝑖 ∈ 𝑇 (𝑖‘𝑃) = ((𝑃 ∨ (𝑅‘𝑓)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑓 ∘ ◡𝐹))))))
25		cdlemk1.o	. . . 4 ⊢ 𝑂 = (𝑆‘𝐷)
26		cdlemk1.u	. . . 4 ⊢ 𝑈 = (𝑒 ∈ 𝑇 ↦ (℩𝑗 ∈ 𝑇 (𝑗‘𝑃) = ((𝑃 ∨ (𝑅‘𝑒)) ∧ ((𝑂‘𝑃) ∨ (𝑅‘(𝑒 ∘ ◡𝐷))))))
27	16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26	cdlemkuv2 38881	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁) ∧ 𝐶 ∈ 𝑇) ∧ (𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇) ∧ (((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐷) ≠ (𝑅‘𝐶)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))) → ((𝑈‘𝐶)‘𝑃) = ((𝑃 ∨ (𝑅‘𝐶)) ∧ ((𝑂‘𝑃) ∨ (𝑅‘(𝐶 ∘ ◡𝐷)))))
28	1, 2, 3, 4, 5, 6, 10, 14, 15, 27	syl333anc 1401	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑈‘𝐶)‘𝑃) = ((𝑃 ∨ (𝑅‘𝐶)) ∧ ((𝑂‘𝑃) ∨ (𝑅‘(𝐶 ∘ ◡𝐷)))))
29	17, 18, 20, 21, 22, 23	trljat1 38180	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐶 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) → (𝑃 ∨ (𝑅‘𝐶)) = (𝑃 ∨ (𝐶‘𝑃)))
30	1, 3, 15, 29	syl3anc 1370	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑃 ∨ (𝑅‘𝐶)) = (𝑃 ∨ (𝐶‘𝑃)))
31	25	fveq1i 6775	. . . . 5 ⊢ (𝑂‘𝑃) = ((𝑆‘𝐷)‘𝑃)
32	31	a1i 11	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑂‘𝑃) = ((𝑆‘𝐷)‘𝑃))
33	21, 22, 23	trlcocnv 38734	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐶 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) → (𝑅‘(𝐶 ∘ ◡𝐷)) = (𝑅‘(𝐷 ∘ ◡𝐶)))
34	1, 3, 5, 33	syl3anc 1370	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘(𝐶 ∘ ◡𝐷)) = (𝑅‘(𝐷 ∘ ◡𝐶)))
35	32, 34	oveq12d 7293	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑂‘𝑃) ∨ (𝑅‘(𝐶 ∘ ◡𝐷))) = (((𝑆‘𝐷)‘𝑃) ∨ (𝑅‘(𝐷 ∘ ◡𝐶))))
36	30, 35	oveq12d 7293	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑃 ∨ (𝑅‘𝐶)) ∧ ((𝑂‘𝑃) ∨ (𝑅‘(𝐶 ∘ ◡𝐷)))) = ((𝑃 ∨ (𝐶‘𝑃)) ∧ (((𝑆‘𝐷)‘𝑃) ∨ (𝑅‘(𝐷 ∘ ◡𝐶)))))
37		cdlemk2a.q	. . . 4 ⊢ 𝑄 = (𝑆‘𝐶)
38	37	fveq1i 6775	. . 3 ⊢ (𝑄‘𝑃) = ((𝑆‘𝐶)‘𝑃)
39	6, 5	jca 512	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑁 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇))
40		simp3r2 1281	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → (𝑅‘𝐶) ≠ (𝑅‘𝐹))
41	40, 7	jca 512	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐷) ≠ (𝑅‘𝐹)))
42	16, 17, 18, 20, 21, 22, 23, 19, 24	cdlemk12 38864	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐷) ≠ (𝑅‘𝐹)) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷))) → ((𝑆‘𝐶)‘𝑃) = ((𝑃 ∨ (𝐶‘𝑃)) ∧ (((𝑆‘𝐷)‘𝑃) ∨ (𝑅‘(𝐷 ∘ ◡𝐶)))))
43	1, 4, 3, 39, 15, 2, 14, 41, 8, 42	syl333anc 1401	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑆‘𝐶)‘𝑃) = ((𝑃 ∨ (𝐶‘𝑃)) ∧ (((𝑆‘𝐷)‘𝑃) ∨ (𝑅‘(𝐷 ∘ ◡𝐶)))))
44	38, 43	eqtr2id 2791	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑃 ∨ (𝐶‘𝑃)) ∧ (((𝑆‘𝐷)‘𝑃) ∨ (𝑅‘(𝐷 ∘ ◡𝐶)))) = (𝑄‘𝑃))
45	28, 36, 44	3eqtrd 2782	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐷 ∈ 𝑇) ∧ ((𝑁 ∈ 𝑇 ∧ 𝐶 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐶 ≠ ( I ↾ 𝐵)) ∧ ((𝑅‘𝐷) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝐶) ≠ (𝑅‘𝐷)))) → ((𝑈‘𝐶)‘𝑃) = (𝑄‘𝑃))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   ∧ w3a 1086   = wceq 1539   ∈ wcel 2106   ≠ wne 2943   class class class wbr 5074   ↦ cmpt 5157   I cid 5488  ^◡ccnv 5588   ↾ cres 5591   ∘ ccom 5593  ‘cfv 6433  ℩crio 7231  (class class class)co 7275  Basecbs 16912  lecple 16969  joincjn 18029  meetcmee 18030  Atomscatm 37277  HLchlt 37364  LHypclh 37998  LTrncltrn 38115  trLctrl 38172

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  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 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-riotaBAD 36967

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-iin 4927  df-br 5075  df-opab 5137  df-mpt 5158  df-id 5489  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-1st 7831  df-2nd 7832  df-undef 8089  df-map 8617  df-proset 18013  df-poset 18031  df-plt 18048  df-lub 18064  df-glb 18065  df-join 18066  df-meet 18067  df-p0 18143  df-p1 18144  df-lat 18150  df-clat 18217  df-oposet 37190  df-ol 37192  df-oml 37193  df-covers 37280  df-ats 37281  df-atl 37312  df-cvlat 37336  df-hlat 37365  df-llines 37512  df-lplanes 37513  df-lvols 37514  df-lines 37515  df-psubsp 37517  df-pmap 37518  df-padd 37810  df-lhyp 38002  df-laut 38003  df-ldil 38118  df-ltrn 38119  df-trl 38173

This theorem is referenced by:  cdlemk20-2N  38906  cdlemk22  38907