Metamath Proof Explorer


Theorem cdlemk7

Description: Part of proof of Lemma K of Crawley p. 118. Line 5, p. 119. (Contributed by NM, 27-Jun-2013)

Ref Expression
Hypotheses cdlemk.b 𝐵 = ( Base ‘ 𝐾 )
cdlemk.l = ( le ‘ 𝐾 )
cdlemk.j = ( join ‘ 𝐾 )
cdlemk.a 𝐴 = ( Atoms ‘ 𝐾 )
cdlemk.h 𝐻 = ( LHyp ‘ 𝐾 )
cdlemk.t 𝑇 = ( ( LTrn ‘ 𝐾 ) ‘ 𝑊 )
cdlemk.r 𝑅 = ( ( trL ‘ 𝐾 ) ‘ 𝑊 )
cdlemk.m = ( meet ‘ 𝐾 )
cdlemk.s 𝑆 = ( 𝑓𝑇 ↦ ( 𝑖𝑇 ( 𝑖𝑃 ) = ( ( 𝑃 ( 𝑅𝑓 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑓 𝐹 ) ) ) ) ) )
cdlemk.v 𝑉 = ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) )
Assertion cdlemk7 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝐺 ) ‘ 𝑃 ) ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) 𝑉 ) )

Proof

Step Hyp Ref Expression
1 cdlemk.b 𝐵 = ( Base ‘ 𝐾 )
2 cdlemk.l = ( le ‘ 𝐾 )
3 cdlemk.j = ( join ‘ 𝐾 )
4 cdlemk.a 𝐴 = ( Atoms ‘ 𝐾 )
5 cdlemk.h 𝐻 = ( LHyp ‘ 𝐾 )
6 cdlemk.t 𝑇 = ( ( LTrn ‘ 𝐾 ) ‘ 𝑊 )
7 cdlemk.r 𝑅 = ( ( trL ‘ 𝐾 ) ‘ 𝑊 )
8 cdlemk.m = ( meet ‘ 𝐾 )
9 cdlemk.s 𝑆 = ( 𝑓𝑇 ↦ ( 𝑖𝑇 ( 𝑖𝑃 ) = ( ( 𝑃 ( 𝑅𝑓 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑓 𝐹 ) ) ) ) ) )
10 cdlemk.v 𝑉 = ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) )
11 simp1 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) )
12 simp2 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) )
13 simp311 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐹 ≠ ( I ↾ 𝐵 ) )
14 simp312 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐺 ≠ ( I ↾ 𝐵 ) )
15 simp32 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) )
16 simp33 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) )
17 15 16 jca ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) )
18 1 2 3 4 5 6 7 8 cdlemk6 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ ( ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) ) → ( ( 𝑃 ( 𝐺𝑃 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) ( ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) ) )
19 11 12 13 14 17 18 syl113anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑃 ( 𝐺𝑃 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) ( ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) ) )
20 simp21l ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑁𝑇 )
21 simp22 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) )
22 simp23 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑅𝐹 ) = ( 𝑅𝑁 ) )
23 20 21 22 3jca ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑁𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) )
24 1 2 3 4 5 6 7 8 9 cdlemksv2 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( 𝑁𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝐺 ) ‘ 𝑃 ) = ( ( 𝑃 ( 𝑅𝐺 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) )
25 11 23 13 14 15 24 syl113anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝐺 ) ‘ 𝑃 ) = ( ( 𝑃 ( 𝑅𝐺 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) )
26 simp11 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) )
27 simp13 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐺𝑇 )
28 2 3 4 5 6 7 trljat1 ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐺𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ) → ( 𝑃 ( 𝑅𝐺 ) ) = ( 𝑃 ( 𝐺𝑃 ) ) )
29 26 27 21 28 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑃 ( 𝑅𝐺 ) ) = ( 𝑃 ( 𝐺𝑃 ) ) )
30 29 oveq1d ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑃 ( 𝑅𝐺 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) = ( ( 𝑃 ( 𝐺𝑃 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) )
31 25 30 eqtrd ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝐺 ) ‘ 𝑃 ) = ( ( 𝑃 ( 𝐺𝑃 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ) ) )
32 simp11l ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐾 ∈ HL )
33 32 hllatd ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐾 ∈ Lat )
34 simp12 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝐹𝑇 )
35 simp21r ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑋𝑇 )
36 26 34 35 3jca ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝑋𝑇 ) )
37 simp313 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑋 ≠ ( I ↾ 𝐵 ) )
38 1 2 3 4 5 6 7 8 9 cdlemksat ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝑋𝑇 ) ∧ ( 𝑁𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐴 )
39 36 23 13 37 16 38 syl113anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐴 )
40 1 4 atbase ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐴 → ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐵 )
41 39 40 syl ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐵 )
42 simp11r ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑊𝐻 )
43 simp22l ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑃𝐴 )
44 1 2 3 4 5 6 7 8 10 cdlemkvcl ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ ( 𝐹𝑇𝐺𝑇𝑋𝑇 ) ∧ 𝑃𝐴 ) → 𝑉𝐵 )
45 32 42 34 27 35 43 44 syl231anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑉𝐵 )
46 1 3 latjcom ( ( 𝐾 ∈ Lat ∧ ( ( 𝑆𝑋 ) ‘ 𝑃 ) ∈ 𝐵𝑉𝐵 ) → ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) 𝑉 ) = ( 𝑉 ( ( 𝑆𝑋 ) ‘ 𝑃 ) ) )
47 33 41 45 46 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) 𝑉 ) = ( 𝑉 ( ( 𝑆𝑋 ) ‘ 𝑃 ) ) )
48 10 a1i ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → 𝑉 = ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) )
49 1 2 3 4 5 6 7 8 9 cdlemksv2 ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝑋𝑇 ) ∧ ( 𝑁𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) = ( ( 𝑃 ( 𝑅𝑋 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) )
50 36 23 13 37 16 49 syl113anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) = ( ( 𝑃 ( 𝑅𝑋 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) )
51 2 3 4 5 6 7 trljat1 ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝑋𝑇 ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ) → ( 𝑃 ( 𝑅𝑋 ) ) = ( 𝑃 ( 𝑋𝑃 ) ) )
52 26 35 21 51 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑃 ( 𝑅𝑋 ) ) = ( 𝑃 ( 𝑋𝑃 ) ) )
53 2 4 5 6 ltrnat ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝑋𝑇𝑃𝐴 ) → ( 𝑋𝑃 ) ∈ 𝐴 )
54 26 35 43 53 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑋𝑃 ) ∈ 𝐴 )
55 3 4 hlatjcom ( ( 𝐾 ∈ HL ∧ ( 𝑋𝑃 ) ∈ 𝐴𝑃𝐴 ) → ( ( 𝑋𝑃 ) 𝑃 ) = ( 𝑃 ( 𝑋𝑃 ) ) )
56 32 54 43 55 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑋𝑃 ) 𝑃 ) = ( 𝑃 ( 𝑋𝑃 ) ) )
57 52 56 eqtr4d ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑃 ( 𝑅𝑋 ) ) = ( ( 𝑋𝑃 ) 𝑃 ) )
58 2 4 5 6 ltrnat ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝑁𝑇𝑃𝐴 ) → ( 𝑁𝑃 ) ∈ 𝐴 )
59 26 20 43 58 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑁𝑃 ) ∈ 𝐴 )
60 35 34 jca ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑋𝑇𝐹𝑇 ) )
61 4 5 6 7 trlcocnvat ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ ( 𝑋𝑇𝐹𝑇 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) → ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ∈ 𝐴 )
62 26 60 16 61 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ∈ 𝐴 )
63 3 4 hlatjcom ( ( 𝐾 ∈ HL ∧ ( 𝑁𝑃 ) ∈ 𝐴 ∧ ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ∈ 𝐴 ) → ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) = ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) )
64 32 59 62 63 syl3anc ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) = ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) )
65 57 64 oveq12d ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑃 ( 𝑅𝑋 ) ) ( ( 𝑁𝑃 ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) = ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) )
66 50 65 eqtrd ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝑋 ) ‘ 𝑃 ) = ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) )
67 48 66 oveq12d ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( 𝑉 ( ( 𝑆𝑋 ) ‘ 𝑃 ) ) = ( ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) ) )
68 47 67 eqtrd ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) 𝑉 ) = ( ( ( ( 𝐺𝑃 ) ( 𝑋𝑃 ) ) ( ( 𝑅 ‘ ( 𝐺 𝐹 ) ) ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ) ) ( ( ( 𝑋𝑃 ) 𝑃 ) ( ( 𝑅 ‘ ( 𝑋 𝐹 ) ) ( 𝑁𝑃 ) ) ) ) )
69 19 31 68 3brtr4d ( ( ( ( 𝐾 ∈ HL ∧ 𝑊𝐻 ) ∧ 𝐹𝑇𝐺𝑇 ) ∧ ( ( 𝑁𝑇𝑋𝑇 ) ∧ ( 𝑃𝐴 ∧ ¬ 𝑃 𝑊 ) ∧ ( 𝑅𝐹 ) = ( 𝑅𝑁 ) ) ∧ ( ( 𝐹 ≠ ( I ↾ 𝐵 ) ∧ 𝐺 ≠ ( I ↾ 𝐵 ) ∧ 𝑋 ≠ ( I ↾ 𝐵 ) ) ∧ ( 𝑅𝐺 ) ≠ ( 𝑅𝐹 ) ∧ ( 𝑅𝑋 ) ≠ ( 𝑅𝐹 ) ) ) → ( ( 𝑆𝐺 ) ‘ 𝑃 ) ( ( ( 𝑆𝑋 ) ‘ 𝑃 ) 𝑉 ) )