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

Theorem hlsuprexch 34985
Description: A Hilbert lattice has the superposition and exchange properties. (Contributed by NM, 13-Nov-2011.)
Hypotheses
Ref Expression
hlsuprexch.b 𝐵 = (Base‘𝐾)
hlsuprexch.l = (le‘𝐾)
hlsuprexch.j = (join‘𝐾)
hlsuprexch.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
hlsuprexch ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → ((𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃))))
Distinct variable groups:   𝑧,𝐴   𝑧,𝐵   𝑧,𝐾   𝑧,𝑃   𝑧,𝑄
Allowed substitution hints:   (𝑧)   (𝑧)

Proof of Theorem hlsuprexch
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 hlsuprexch.b . . . . 5 𝐵 = (Base‘𝐾)
2 hlsuprexch.l . . . . 5 = (le‘𝐾)
3 eqid 2651 . . . . 5 (lt‘𝐾) = (lt‘𝐾)
4 hlsuprexch.j . . . . 5 = (join‘𝐾)
5 eqid 2651 . . . . 5 (0.‘𝐾) = (0.‘𝐾)
6 eqid 2651 . . . . 5 (1.‘𝐾) = (1.‘𝐾)
7 hlsuprexch.a . . . . 5 𝐴 = (Atoms‘𝐾)
81, 2, 3, 4, 5, 6, 7ishlat2 34958 . . . 4 (𝐾 ∈ HL ↔ ((𝐾 ∈ OML ∧ 𝐾 ∈ CLat ∧ 𝐾 ∈ AtLat) ∧ (∀𝑥𝐴𝑦𝐴 ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))) ∧ ∃𝑥𝐵𝑦𝐵𝑧𝐵 (((0.‘𝐾)(lt‘𝐾)𝑥𝑥(lt‘𝐾)𝑦) ∧ (𝑦(lt‘𝐾)𝑧𝑧(lt‘𝐾)(1.‘𝐾))))))
9 simprl 809 . . . 4 (((𝐾 ∈ OML ∧ 𝐾 ∈ CLat ∧ 𝐾 ∈ AtLat) ∧ (∀𝑥𝐴𝑦𝐴 ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))) ∧ ∃𝑥𝐵𝑦𝐵𝑧𝐵 (((0.‘𝐾)(lt‘𝐾)𝑥𝑥(lt‘𝐾)𝑦) ∧ (𝑦(lt‘𝐾)𝑧𝑧(lt‘𝐾)(1.‘𝐾))))) → ∀𝑥𝐴𝑦𝐴 ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))))
108, 9sylbi 207 . . 3 (𝐾 ∈ HL → ∀𝑥𝐴𝑦𝐴 ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))))
11 neeq1 2885 . . . . . 6 (𝑥 = 𝑃 → (𝑥𝑦𝑃𝑦))
12 neeq2 2886 . . . . . . . 8 (𝑥 = 𝑃 → (𝑧𝑥𝑧𝑃))
13 oveq1 6697 . . . . . . . . 9 (𝑥 = 𝑃 → (𝑥 𝑦) = (𝑃 𝑦))
1413breq2d 4697 . . . . . . . 8 (𝑥 = 𝑃 → (𝑧 (𝑥 𝑦) ↔ 𝑧 (𝑃 𝑦)))
1512, 143anbi13d 1441 . . . . . . 7 (𝑥 = 𝑃 → ((𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦)) ↔ (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦))))
1615rexbidv 3081 . . . . . 6 (𝑥 = 𝑃 → (∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦)) ↔ ∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦))))
1711, 16imbi12d 333 . . . . 5 (𝑥 = 𝑃 → ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ↔ (𝑃𝑦 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦)))))
18 breq1 4688 . . . . . . . . 9 (𝑥 = 𝑃 → (𝑥 𝑧𝑃 𝑧))
1918notbid 307 . . . . . . . 8 (𝑥 = 𝑃 → (¬ 𝑥 𝑧 ↔ ¬ 𝑃 𝑧))
20 breq1 4688 . . . . . . . 8 (𝑥 = 𝑃 → (𝑥 (𝑧 𝑦) ↔ 𝑃 (𝑧 𝑦)))
2119, 20anbi12d 747 . . . . . . 7 (𝑥 = 𝑃 → ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) ↔ (¬ 𝑃 𝑧𝑃 (𝑧 𝑦))))
22 oveq2 6698 . . . . . . . 8 (𝑥 = 𝑃 → (𝑧 𝑥) = (𝑧 𝑃))
2322breq2d 4697 . . . . . . 7 (𝑥 = 𝑃 → (𝑦 (𝑧 𝑥) ↔ 𝑦 (𝑧 𝑃)))
2421, 23imbi12d 333 . . . . . 6 (𝑥 = 𝑃 → (((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥)) ↔ ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃))))
2524ralbidv 3015 . . . . 5 (𝑥 = 𝑃 → (∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥)) ↔ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃))))
2617, 25anbi12d 747 . . . 4 (𝑥 = 𝑃 → (((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))) ↔ ((𝑃𝑦 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃)))))
27 neeq2 2886 . . . . . 6 (𝑦 = 𝑄 → (𝑃𝑦𝑃𝑄))
28 neeq2 2886 . . . . . . . 8 (𝑦 = 𝑄 → (𝑧𝑦𝑧𝑄))
29 oveq2 6698 . . . . . . . . 9 (𝑦 = 𝑄 → (𝑃 𝑦) = (𝑃 𝑄))
3029breq2d 4697 . . . . . . . 8 (𝑦 = 𝑄 → (𝑧 (𝑃 𝑦) ↔ 𝑧 (𝑃 𝑄)))
3128, 303anbi23d 1442 . . . . . . 7 (𝑦 = 𝑄 → ((𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦)) ↔ (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))))
3231rexbidv 3081 . . . . . 6 (𝑦 = 𝑄 → (∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦)) ↔ ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))))
3327, 32imbi12d 333 . . . . 5 (𝑦 = 𝑄 → ((𝑃𝑦 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦))) ↔ (𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄)))))
34 oveq2 6698 . . . . . . . . 9 (𝑦 = 𝑄 → (𝑧 𝑦) = (𝑧 𝑄))
3534breq2d 4697 . . . . . . . 8 (𝑦 = 𝑄 → (𝑃 (𝑧 𝑦) ↔ 𝑃 (𝑧 𝑄)))
3635anbi2d 740 . . . . . . 7 (𝑦 = 𝑄 → ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) ↔ (¬ 𝑃 𝑧𝑃 (𝑧 𝑄))))
37 breq1 4688 . . . . . . 7 (𝑦 = 𝑄 → (𝑦 (𝑧 𝑃) ↔ 𝑄 (𝑧 𝑃)))
3836, 37imbi12d 333 . . . . . 6 (𝑦 = 𝑄 → (((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃)) ↔ ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃))))
3938ralbidv 3015 . . . . 5 (𝑦 = 𝑄 → (∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃)) ↔ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃))))
4033, 39anbi12d 747 . . . 4 (𝑦 = 𝑄 → (((𝑃𝑦 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑦𝑧 (𝑃 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑦)) → 𝑦 (𝑧 𝑃))) ↔ ((𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃)))))
4126, 40rspc2v 3353 . . 3 ((𝑃𝐴𝑄𝐴) → (∀𝑥𝐴𝑦𝐴 ((𝑥𝑦 → ∃𝑧𝐴 (𝑧𝑥𝑧𝑦𝑧 (𝑥 𝑦))) ∧ ∀𝑧𝐵 ((¬ 𝑥 𝑧𝑥 (𝑧 𝑦)) → 𝑦 (𝑧 𝑥))) → ((𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃)))))
4210, 41mpan9 485 . 2 ((𝐾 ∈ HL ∧ (𝑃𝐴𝑄𝐴)) → ((𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃))))
43423impb 1279 1 ((𝐾 ∈ HL ∧ 𝑃𝐴𝑄𝐴) → ((𝑃𝑄 → ∃𝑧𝐴 (𝑧𝑃𝑧𝑄𝑧 (𝑃 𝑄))) ∧ ∀𝑧𝐵 ((¬ 𝑃 𝑧𝑃 (𝑧 𝑄)) → 𝑄 (𝑧 𝑃))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 383  w3a 1054   = wceq 1523  wcel 2030  wne 2823  wral 2941  wrex 2942   class class class wbr 4685  cfv 5926  (class class class)co 6690  Basecbs 15904  lecple 15995  ltcplt 16988  joincjn 16991  0.cp0 17084  1.cp1 17085  CLatccla 17154  OMLcoml 34780  Atomscatm 34868  AtLatcal 34869  HLchlt 34955
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1762  ax-4 1777  ax-5 1879  ax-6 1945  ax-7 1981  ax-9 2039  ax-10 2059  ax-11 2074  ax-12 2087  ax-13 2282  ax-ext 2631
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1056  df-tru 1526  df-ex 1745  df-nf 1750  df-sb 1938  df-clab 2638  df-cleq 2644  df-clel 2647  df-nfc 2782  df-ne 2824  df-ral 2946  df-rex 2947  df-rab 2950  df-v 3233  df-dif 3610  df-un 3612  df-in 3614  df-ss 3621  df-nul 3949  df-if 4120  df-sn 4211  df-pr 4213  df-op 4217  df-uni 4469  df-br 4686  df-iota 5889  df-fv 5934  df-ov 6693  df-cvlat 34927  df-hlat 34956
This theorem is referenced by:  hlsupr  34990
  Copyright terms: Public domain W3C validator