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

Theorem cdlemefs32sn1aw 39956
Description: Show that ⦋𝑅 / π‘ β¦Œπ‘ is an atom not under π‘Š when 𝑅 ≀ (𝑃 ∨ 𝑄). (Contributed by NM, 24-Mar-2013.)
Hypotheses
Ref Expression
cdlemefs32.b 𝐡 = (Baseβ€˜πΎ)
cdlemefs32.l ≀ = (leβ€˜πΎ)
cdlemefs32.j ∨ = (joinβ€˜πΎ)
cdlemefs32.m ∧ = (meetβ€˜πΎ)
cdlemefs32.a 𝐴 = (Atomsβ€˜πΎ)
cdlemefs32.h 𝐻 = (LHypβ€˜πΎ)
cdlemefs32.u π‘ˆ = ((𝑃 ∨ 𝑄) ∧ π‘Š)
cdlemefs32.d 𝐷 = ((𝑑 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑑) ∧ π‘Š)))
cdlemefs32.e 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑑) ∧ π‘Š)))
cdlemefs32.i 𝐼 = (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = 𝐸))
cdlemefs32.n 𝑁 = if(𝑠 ≀ (𝑃 ∨ 𝑄), 𝐼, 𝐢)
cdlemefs32a1.y π‘Œ = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑑) ∧ π‘Š)))
cdlemefs32a1.z 𝑍 = (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = π‘Œ))
Assertion
Ref Expression
cdlemefs32sn1aw ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (⦋𝑅 / π‘ β¦Œπ‘ ∈ 𝐴 ∧ Β¬ ⦋𝑅 / π‘ β¦Œπ‘ ≀ π‘Š))
Distinct variable groups:   𝑑,𝑠,𝑦,𝐴   𝐡,𝑠,𝑑,𝑦   𝑦,𝐷   𝑦,𝐸   𝐻,𝑠,𝑑,𝑦   ∨ ,𝑠,𝑑,𝑦   𝐾,𝑠,𝑑,𝑦   ≀ ,𝑠,𝑑,𝑦   ∧ ,𝑠,𝑑,𝑦   𝑃,𝑠,𝑑,𝑦   𝑄,𝑠,𝑑,𝑦   𝑅,𝑠,𝑑,𝑦   𝑑,π‘ˆ,𝑦   π‘Š,𝑠,𝑑,𝑦   𝑦,π‘Œ   𝐷,𝑠
Allowed substitution hints:   𝐢(𝑦,𝑑,𝑠)   𝐷(𝑑)   π‘ˆ(𝑠)   𝐸(𝑑,𝑠)   𝐼(𝑦,𝑑,𝑠)   𝑁(𝑦,𝑑,𝑠)   π‘Œ(𝑑,𝑠)   𝑍(𝑦,𝑑,𝑠)

Proof of Theorem cdlemefs32sn1aw
StepHypRef Expression
1 cdlemefs32.b . . . 4 𝐡 = (Baseβ€˜πΎ)
21fvexi 6908 . . 3 𝐡 ∈ V
3 nfv 1909 . . . 4 Ⅎ𝑑(((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄))
4 cdlemefs32a1.z . . . . . . . 8 𝑍 = (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = π‘Œ))
5 nfra1 3272 . . . . . . . . 9 β„²π‘‘βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = π‘Œ)
6 nfcv 2892 . . . . . . . . 9 Ⅎ𝑑𝐡
75, 6nfriota 7386 . . . . . . . 8 Ⅎ𝑑(℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = π‘Œ))
84, 7nfcxfr 2890 . . . . . . 7 Ⅎ𝑑𝑍
98nfel1 2909 . . . . . 6 Ⅎ𝑑 𝑍 ∈ 𝐴
10 nfcv 2892 . . . . . . . 8 Ⅎ𝑑 ≀
11 nfcv 2892 . . . . . . . 8 β„²π‘‘π‘Š
128, 10, 11nfbr 5195 . . . . . . 7 Ⅎ𝑑 𝑍 ≀ π‘Š
1312nfn 1852 . . . . . 6 Ⅎ𝑑 Β¬ 𝑍 ≀ π‘Š
149, 13nfan 1894 . . . . 5 Ⅎ𝑑(𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š)
1514a1i 11 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ Ⅎ𝑑(𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š))
164a1i 11 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑍 = (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = π‘Œ)))
17 eleq1 2813 . . . . . 6 (π‘Œ = 𝑍 β†’ (π‘Œ ∈ 𝐴 ↔ 𝑍 ∈ 𝐴))
18 breq1 5151 . . . . . . 7 (π‘Œ = 𝑍 β†’ (π‘Œ ≀ π‘Š ↔ 𝑍 ≀ π‘Š))
1918notbid 317 . . . . . 6 (π‘Œ = 𝑍 β†’ (Β¬ π‘Œ ≀ π‘Š ↔ Β¬ 𝑍 ≀ π‘Š))
2017, 19anbi12d 630 . . . . 5 (π‘Œ = 𝑍 β†’ ((π‘Œ ∈ 𝐴 ∧ Β¬ π‘Œ ≀ π‘Š) ↔ (𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š)))
2120adantl 480 . . . 4 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ π‘Œ = 𝑍) β†’ ((π‘Œ ∈ 𝐴 ∧ Β¬ π‘Œ ≀ π‘Š) ↔ (𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š)))
22 simpl1 1188 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)))
23 simpl2r 1224 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š))
24 simprl 769 . . . . . . 7 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ 𝑑 ∈ 𝐴)
25 simprrl 779 . . . . . . 7 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ Β¬ 𝑑 ≀ π‘Š)
2624, 25jca 510 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ (𝑑 ∈ 𝐴 ∧ Β¬ 𝑑 ≀ π‘Š))
27 simpl2l 1223 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ 𝑃 β‰  𝑄)
28 simpl3 1190 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ 𝑅 ≀ (𝑃 ∨ 𝑄))
29 simprrr 780 . . . . . 6 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄))
30 cdlemefs32.l . . . . . . . 8 ≀ = (leβ€˜πΎ)
31 cdlemefs32.j . . . . . . . 8 ∨ = (joinβ€˜πΎ)
32 cdlemefs32.m . . . . . . . 8 ∧ = (meetβ€˜πΎ)
33 cdlemefs32.a . . . . . . . 8 𝐴 = (Atomsβ€˜πΎ)
34 cdlemefs32.h . . . . . . . 8 𝐻 = (LHypβ€˜πΎ)
35 cdlemefs32.u . . . . . . . 8 π‘ˆ = ((𝑃 ∨ 𝑄) ∧ π‘Š)
36 cdlemefs32.d . . . . . . . 8 𝐷 = ((𝑑 ∨ π‘ˆ) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑑) ∧ π‘Š)))
37 cdlemefs32a1.y . . . . . . . 8 π‘Œ = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑑) ∧ π‘Š)))
3830, 31, 32, 33, 34, 35, 36, 37cdleme7ga 39790 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑑 ∈ 𝐴 ∧ Β¬ 𝑑 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ 𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄))) β†’ π‘Œ ∈ 𝐴)
3930, 31, 32, 33, 34, 35, 36, 37cdleme7 39791 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑑 ∈ 𝐴 ∧ Β¬ 𝑑 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ 𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄))) β†’ Β¬ π‘Œ ≀ π‘Š)
4038, 39jca 510 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ ((𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑑 ∈ 𝐴 ∧ Β¬ 𝑑 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ 𝑅 ≀ (𝑃 ∨ 𝑄) ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄))) β†’ (π‘Œ ∈ 𝐴 ∧ Β¬ π‘Œ ≀ π‘Š))
4122, 23, 26, 27, 28, 29, 40syl123anc 1384 . . . . 5 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ (𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))) β†’ (π‘Œ ∈ 𝐴 ∧ Β¬ π‘Œ ≀ π‘Š))
4241ex 411 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ ((𝑑 ∈ 𝐴 ∧ (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄))) β†’ (π‘Œ ∈ 𝐴 ∧ Β¬ π‘Œ ≀ π‘Š)))
43 simp1 1133 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)))
44 simp2rl 1239 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑅 ∈ 𝐴)
45 simp2rr 1240 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ Β¬ 𝑅 ≀ π‘Š)
46 simp2l 1196 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑃 β‰  𝑄)
47 simp3 1135 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑅 ≀ (𝑃 ∨ 𝑄))
481, 30, 31, 32, 33, 34, 35, 36, 37, 4cdleme25cl 39899 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š) ∧ (𝑃 β‰  𝑄 ∧ 𝑅 ≀ (𝑃 ∨ 𝑄))) β†’ 𝑍 ∈ 𝐡)
4943, 44, 45, 46, 47, 48syl122anc 1376 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑍 ∈ 𝐡)
50 simp11 1200 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (𝐾 ∈ HL ∧ π‘Š ∈ 𝐻))
51 simp12 1201 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š))
52 simp13 1202 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š))
5330, 31, 33, 34cdlemb2 39583 . . . . 5 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ ((𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ 𝑃 β‰  𝑄) β†’ βˆƒπ‘‘ ∈ 𝐴 (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))
5450, 51, 52, 46, 53syl121anc 1372 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ βˆƒπ‘‘ ∈ 𝐴 (Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)))
553, 15, 16, 21, 42, 49, 54riotasv3d 38501 . . 3 (((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) ∧ 𝐡 ∈ V) β†’ (𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š))
562, 55mpan2 689 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š))
57 cdlemefs32.e . . . . . 6 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑑) ∧ π‘Š)))
58 cdlemefs32.i . . . . . 6 𝐼 = (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑃 ∨ 𝑄)) β†’ 𝑦 = 𝐸))
59 cdlemefs32.n . . . . . 6 𝑁 = if(𝑠 ≀ (𝑃 ∨ 𝑄), 𝐼, 𝐢)
6057, 58, 59, 37, 4cdleme31sn1c 39930 . . . . 5 ((𝑅 ∈ 𝐴 ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ ⦋𝑅 / π‘ β¦Œπ‘ = 𝑍)
6144, 47, 60syl2anc 582 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ ⦋𝑅 / π‘ β¦Œπ‘ = 𝑍)
6261eleq1d 2810 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (⦋𝑅 / π‘ β¦Œπ‘ ∈ 𝐴 ↔ 𝑍 ∈ 𝐴))
6361breq1d 5158 . . . 4 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (⦋𝑅 / π‘ β¦Œπ‘ ≀ π‘Š ↔ 𝑍 ≀ π‘Š))
6463notbid 317 . . 3 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (Β¬ ⦋𝑅 / π‘ β¦Œπ‘ ≀ π‘Š ↔ Β¬ 𝑍 ≀ π‘Š))
6562, 64anbi12d 630 . 2 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ ((⦋𝑅 / π‘ β¦Œπ‘ ∈ 𝐴 ∧ Β¬ ⦋𝑅 / π‘ β¦Œπ‘ ≀ π‘Š) ↔ (𝑍 ∈ 𝐴 ∧ Β¬ 𝑍 ≀ π‘Š)))
6656, 65mpbird 256 1 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ Β¬ 𝑃 ≀ π‘Š) ∧ (𝑄 ∈ 𝐴 ∧ Β¬ 𝑄 ≀ π‘Š)) ∧ (𝑃 β‰  𝑄 ∧ (𝑅 ∈ 𝐴 ∧ Β¬ 𝑅 ≀ π‘Š)) ∧ 𝑅 ≀ (𝑃 ∨ 𝑄)) β†’ (⦋𝑅 / π‘ β¦Œπ‘ ∈ 𝐴 ∧ Β¬ ⦋𝑅 / π‘ β¦Œπ‘ ≀ π‘Š))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 394   ∧ w3a 1084   = wceq 1533  β„²wnf 1777   ∈ wcel 2098   β‰  wne 2930  βˆ€wral 3051  βˆƒwrex 3060  Vcvv 3463  β¦‹csb 3890  ifcif 4529   class class class wbr 5148  β€˜cfv 6547  β„©crio 7372  (class class class)co 7417  Basecbs 17179  lecple 17239  joincjn 18302  meetcmee 18303  Atomscatm 38804  HLchlt 38891  LHypclh 39526
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5364  ax-pr 5428  ax-un 7739  ax-riotaBAD 38494
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3775  df-csb 3891  df-dif 3948  df-un 3950  df-in 3952  df-ss 3962  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4909  df-iun 4998  df-iin 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5575  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-iota 6499  df-fun 6549  df-fn 6550  df-f 6551  df-f1 6552  df-fo 6553  df-f1o 6554  df-fv 6555  df-riota 7373  df-ov 7420  df-oprab 7421  df-mpo 7422  df-1st 7992  df-2nd 7993  df-undef 8277  df-proset 18286  df-poset 18304  df-plt 18321  df-lub 18337  df-glb 18338  df-join 18339  df-meet 18340  df-p0 18416  df-p1 18417  df-lat 18423  df-clat 18490  df-oposet 38717  df-ol 38719  df-oml 38720  df-covers 38807  df-ats 38808  df-atl 38839  df-cvlat 38863  df-hlat 38892  df-llines 39040  df-lplanes 39041  df-lvols 39042  df-lines 39043  df-psubsp 39045  df-pmap 39046  df-padd 39338  df-lhyp 39530
This theorem is referenced by:  cdlemefs32snb  39957  cdleme32sn1awN  39974  cdleme32snaw  39977
  Copyright terms: Public domain W3C validator