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

Theorem cdlemg2cex 39766
Description: Any translation is one of our 𝐹 s. TODO: fix comment, move to its own block maybe? Would this help for cdlemf 39738? (Contributed by NM, 22-Apr-2013.)
Hypotheses
Ref Expression
cdlemg2.b 𝐡 = (Baseβ€˜πΎ)
cdlemg2.l ≀ = (leβ€˜πΎ)
cdlemg2.j ∨ = (joinβ€˜πΎ)
cdlemg2.m ∧ = (meetβ€˜πΎ)
cdlemg2.a 𝐴 = (Atomsβ€˜πΎ)
cdlemg2.h 𝐻 = (LHypβ€˜πΎ)
cdlemg2.t 𝑇 = ((LTrnβ€˜πΎ)β€˜π‘Š)
cdlemg2ex.u π‘ˆ = ((𝑝 ∨ π‘ž) ∧ π‘Š)
cdlemg2ex.d 𝐷 = ((𝑑 ∨ π‘ˆ) ∧ (π‘ž ∨ ((𝑝 ∨ 𝑑) ∧ π‘Š)))
cdlemg2ex.e 𝐸 = ((𝑝 ∨ π‘ž) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑑) ∧ π‘Š)))
cdlemg2ex.g 𝐺 = (π‘₯ ∈ 𝐡 ↦ if((𝑝 β‰  π‘ž ∧ Β¬ π‘₯ ≀ π‘Š), (℩𝑧 ∈ 𝐡 βˆ€π‘  ∈ 𝐴 ((Β¬ 𝑠 ≀ π‘Š ∧ (𝑠 ∨ (π‘₯ ∧ π‘Š)) = π‘₯) β†’ 𝑧 = (if(𝑠 ≀ (𝑝 ∨ π‘ž), (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑝 ∨ π‘ž)) β†’ 𝑦 = 𝐸)), ⦋𝑠 / π‘‘β¦Œπ·) ∨ (π‘₯ ∧ π‘Š)))), π‘₯))
Assertion
Ref Expression
cdlemg2cex ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) β†’ (𝐹 ∈ 𝑇 ↔ βˆƒπ‘ ∈ 𝐴 βˆƒπ‘ž ∈ 𝐴 (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = 𝐺)))
Distinct variable groups:   𝑑,𝑠,π‘₯,𝑦,𝑧,𝐴   𝐡,𝑠,𝑑,π‘₯,𝑦,𝑧   𝐷,𝑠,π‘₯,𝑦,𝑧   π‘₯,𝐸,𝑦,𝑧   𝐻,𝑠,𝑑,π‘₯,𝑦,𝑧   ∨ ,𝑠,𝑑,π‘₯,𝑦,𝑧   𝐾,𝑠,𝑑,π‘₯,𝑦,𝑧   ≀ ,𝑠,𝑑,π‘₯,𝑦,𝑧   ∧ ,𝑠,𝑑,π‘₯,𝑦,𝑧   π‘ˆ,𝑠,𝑑,π‘₯,𝑦,𝑧   π‘Š,𝑠,𝑑,π‘₯,𝑦,𝑧   π‘ž,𝑝,𝐴   𝐹,𝑝,π‘ž   𝐻,𝑝,π‘ž   𝐾,𝑝,π‘ž   ≀ ,𝑝,π‘ž   𝑇,𝑝,π‘ž   π‘Š,𝑝,π‘ž,𝑠,𝑑,π‘₯,𝑦,𝑧
Allowed substitution hints:   𝐡(π‘ž,𝑝)   𝐷(𝑑,π‘ž,𝑝)   𝑇(π‘₯,𝑦,𝑧,𝑑,𝑠)   π‘ˆ(π‘ž,𝑝)   𝐸(𝑑,𝑠,π‘ž,𝑝)   𝐹(π‘₯,𝑦,𝑧,𝑑,𝑠)   𝐺(π‘₯,𝑦,𝑧,𝑑,𝑠,π‘ž,𝑝)   ∨ (π‘ž,𝑝)   ∧ (π‘ž,𝑝)

Proof of Theorem cdlemg2cex
Dummy variable 𝑓 is distinct from all other variables.
StepHypRef Expression
1 cdlemg2.l . . 3 ≀ = (leβ€˜πΎ)
2 cdlemg2.a . . 3 𝐴 = (Atomsβ€˜πΎ)
3 cdlemg2.h . . 3 𝐻 = (LHypβ€˜πΎ)
4 cdlemg2.t . . 3 𝑇 = ((LTrnβ€˜πΎ)β€˜π‘Š)
51, 2, 3, 4cdlemg1cex 39763 . 2 ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) β†’ (𝐹 ∈ 𝑇 ↔ βˆƒπ‘ ∈ 𝐴 βˆƒπ‘ž ∈ 𝐴 (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž))))
6 simplll 772 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ 𝐾 ∈ HL)
7 simpllr 773 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ π‘Š ∈ 𝐻)
8 simplrl 774 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ 𝑝 ∈ 𝐴)
9 simprl 768 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ Β¬ 𝑝 ≀ π‘Š)
10 simplrr 775 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ π‘ž ∈ 𝐴)
11 simprr 770 . . . . . . 7 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ Β¬ π‘ž ≀ π‘Š)
12 cdlemg2.b . . . . . . . 8 𝐡 = (Baseβ€˜πΎ)
13 cdlemg2.j . . . . . . . 8 ∨ = (joinβ€˜πΎ)
14 cdlemg2.m . . . . . . . 8 ∧ = (meetβ€˜πΎ)
15 cdlemg2ex.u . . . . . . . 8 π‘ˆ = ((𝑝 ∨ π‘ž) ∧ π‘Š)
16 cdlemg2ex.d . . . . . . . 8 𝐷 = ((𝑑 ∨ π‘ˆ) ∧ (π‘ž ∨ ((𝑝 ∨ 𝑑) ∧ π‘Š)))
17 cdlemg2ex.e . . . . . . . 8 𝐸 = ((𝑝 ∨ π‘ž) ∧ (𝐷 ∨ ((𝑠 ∨ 𝑑) ∧ π‘Š)))
18 cdlemg2ex.g . . . . . . . 8 𝐺 = (π‘₯ ∈ 𝐡 ↦ if((𝑝 β‰  π‘ž ∧ Β¬ π‘₯ ≀ π‘Š), (℩𝑧 ∈ 𝐡 βˆ€π‘  ∈ 𝐴 ((Β¬ 𝑠 ≀ π‘Š ∧ (𝑠 ∨ (π‘₯ ∧ π‘Š)) = π‘₯) β†’ 𝑧 = (if(𝑠 ≀ (𝑝 ∨ π‘ž), (℩𝑦 ∈ 𝐡 βˆ€π‘‘ ∈ 𝐴 ((Β¬ 𝑑 ≀ π‘Š ∧ Β¬ 𝑑 ≀ (𝑝 ∨ π‘ž)) β†’ 𝑦 = 𝐸)), ⦋𝑠 / π‘‘β¦Œπ·) ∨ (π‘₯ ∧ π‘Š)))), π‘₯))
19 eqid 2731 . . . . . . . 8 (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž) = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)
2012, 1, 13, 14, 2, 3, 15, 16, 17, 18, 4, 19cdlemg1b2 39746 . . . . . . 7 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ Β¬ 𝑝 ≀ π‘Š) ∧ (π‘ž ∈ 𝐴 ∧ Β¬ π‘ž ≀ π‘Š)) β†’ (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž) = 𝐺)
216, 7, 8, 9, 10, 11, 20syl222anc 1385 . . . . . 6 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž) = 𝐺)
2221eqeq2d 2742 . . . . 5 ((((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) ∧ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š)) β†’ (𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž) ↔ 𝐹 = 𝐺))
2322pm5.32da 578 . . . 4 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) β†’ (((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š) ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)) ↔ ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š) ∧ 𝐹 = 𝐺)))
24 df-3an 1088 . . . 4 ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)) ↔ ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š) ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)))
25 df-3an 1088 . . . 4 ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = 𝐺) ↔ ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š) ∧ 𝐹 = 𝐺))
2623, 24, 253bitr4g 313 . . 3 (((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) ∧ (𝑝 ∈ 𝐴 ∧ π‘ž ∈ 𝐴)) β†’ ((Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)) ↔ (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = 𝐺)))
27262rexbidva 3216 . 2 ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) β†’ (βˆƒπ‘ ∈ 𝐴 βˆƒπ‘ž ∈ 𝐴 (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = (℩𝑓 ∈ 𝑇 (π‘“β€˜π‘) = π‘ž)) ↔ βˆƒπ‘ ∈ 𝐴 βˆƒπ‘ž ∈ 𝐴 (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = 𝐺)))
285, 27bitrd 278 1 ((𝐾 ∈ HL ∧ π‘Š ∈ 𝐻) β†’ (𝐹 ∈ 𝑇 ↔ βˆƒπ‘ ∈ 𝐴 βˆƒπ‘ž ∈ 𝐴 (Β¬ 𝑝 ≀ π‘Š ∧ Β¬ π‘ž ≀ π‘Š ∧ 𝐹 = 𝐺)))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2105   β‰  wne 2939  βˆ€wral 3060  βˆƒwrex 3069  β¦‹csb 3894  ifcif 4529   class class class wbr 5149   ↦ cmpt 5232  β€˜cfv 6544  β„©crio 7367  (class class class)co 7412  Basecbs 17149  lecple 17209  joincjn 18269  meetcmee 18270  Atomscatm 38437  HLchlt 38524  LHypclh 39159  LTrncltrn 39276
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 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5286  ax-sep 5300  ax-nul 5307  ax-pow 5364  ax-pr 5428  ax-un 7728  ax-riotaBAD 38127
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-iun 5000  df-iin 5001  df-br 5150  df-opab 5212  df-mpt 5233  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 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-1st 7978  df-2nd 7979  df-undef 8261  df-map 8825  df-proset 18253  df-poset 18271  df-plt 18288  df-lub 18304  df-glb 18305  df-join 18306  df-meet 18307  df-p0 18383  df-p1 18384  df-lat 18390  df-clat 18457  df-oposet 38350  df-ol 38352  df-oml 38353  df-covers 38440  df-ats 38441  df-atl 38472  df-cvlat 38496  df-hlat 38525  df-llines 38673  df-lplanes 38674  df-lvols 38675  df-lines 38676  df-psubsp 38678  df-pmap 38679  df-padd 38971  df-lhyp 39163  df-laut 39164  df-ldil 39279  df-ltrn 39280  df-trl 39334
This theorem is referenced by:  cdlemg2ce  39767
  Copyright terms: Public domain W3C validator