ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  genpelvl GIF version

Theorem genpelvl 7625
Description: Membership in lower cut of general operation (addition or multiplication) on positive reals. (Contributed by Jim Kingdon, 2-Oct-2019.)
Hypotheses
Ref Expression
genpelvl.1 𝐹 = (𝑤P, 𝑣P ↦ ⟨{𝑥Q ∣ ∃𝑦Q𝑧Q (𝑦 ∈ (1st𝑤) ∧ 𝑧 ∈ (1st𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥Q ∣ ∃𝑦Q𝑧Q (𝑦 ∈ (2nd𝑤) ∧ 𝑧 ∈ (2nd𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
genpelvl.2 ((𝑦Q𝑧Q) → (𝑦𝐺𝑧) ∈ Q)
Assertion
Ref Expression
genpelvl ((𝐴P𝐵P) → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺)))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑔,,𝑤,𝑣,𝐴   𝑥,𝐵,𝑦,𝑧,𝑔,,𝑤,𝑣   𝑥,𝐺,𝑦,𝑧,𝑔,,𝑤,𝑣   𝑔,𝐹   𝐶,𝑔,
Allowed substitution hints:   𝐶(𝑥,𝑦,𝑧,𝑤,𝑣)   𝐹(𝑥,𝑦,𝑧,𝑤,𝑣,)

Proof of Theorem genpelvl
Dummy variable 𝑓 is distinct from all other variables.
StepHypRef Expression
1 genpelvl.1 . . . . . . 7 𝐹 = (𝑤P, 𝑣P ↦ ⟨{𝑥Q ∣ ∃𝑦Q𝑧Q (𝑦 ∈ (1st𝑤) ∧ 𝑧 ∈ (1st𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥Q ∣ ∃𝑦Q𝑧Q (𝑦 ∈ (2nd𝑤) ∧ 𝑧 ∈ (2nd𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
2 genpelvl.2 . . . . . . 7 ((𝑦Q𝑧Q) → (𝑦𝐺𝑧) ∈ Q)
31, 2genipv 7622 . . . . . 6 ((𝐴P𝐵P) → (𝐴𝐹𝐵) = ⟨{𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)}, {𝑓Q ∣ ∃𝑔 ∈ (2nd𝐴)∃ ∈ (2nd𝐵)𝑓 = (𝑔𝐺)}⟩)
43fveq2d 5580 . . . . 5 ((𝐴P𝐵P) → (1st ‘(𝐴𝐹𝐵)) = (1st ‘⟨{𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)}, {𝑓Q ∣ ∃𝑔 ∈ (2nd𝐴)∃ ∈ (2nd𝐵)𝑓 = (𝑔𝐺)}⟩))
5 nqex 7476 . . . . . . 7 Q ∈ V
65rabex 4188 . . . . . 6 {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)} ∈ V
75rabex 4188 . . . . . 6 {𝑓Q ∣ ∃𝑔 ∈ (2nd𝐴)∃ ∈ (2nd𝐵)𝑓 = (𝑔𝐺)} ∈ V
86, 7op1st 6232 . . . . 5 (1st ‘⟨{𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)}, {𝑓Q ∣ ∃𝑔 ∈ (2nd𝐴)∃ ∈ (2nd𝐵)𝑓 = (𝑔𝐺)}⟩) = {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)}
94, 8eqtrdi 2254 . . . 4 ((𝐴P𝐵P) → (1st ‘(𝐴𝐹𝐵)) = {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)})
109eleq2d 2275 . . 3 ((𝐴P𝐵P) → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) ↔ 𝐶 ∈ {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)}))
11 elrabi 2926 . . 3 (𝐶 ∈ {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)} → 𝐶Q)
1210, 11biimtrdi 163 . 2 ((𝐴P𝐵P) → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) → 𝐶Q))
13 prop 7588 . . . . . . 7 (𝐴P → ⟨(1st𝐴), (2nd𝐴)⟩ ∈ P)
14 elprnql 7594 . . . . . . 7 ((⟨(1st𝐴), (2nd𝐴)⟩ ∈ P𝑔 ∈ (1st𝐴)) → 𝑔Q)
1513, 14sylan 283 . . . . . 6 ((𝐴P𝑔 ∈ (1st𝐴)) → 𝑔Q)
16 prop 7588 . . . . . . 7 (𝐵P → ⟨(1st𝐵), (2nd𝐵)⟩ ∈ P)
17 elprnql 7594 . . . . . . 7 ((⟨(1st𝐵), (2nd𝐵)⟩ ∈ P ∈ (1st𝐵)) → Q)
1816, 17sylan 283 . . . . . 6 ((𝐵P ∈ (1st𝐵)) → Q)
192caovcl 6101 . . . . . 6 ((𝑔QQ) → (𝑔𝐺) ∈ Q)
2015, 18, 19syl2an 289 . . . . 5 (((𝐴P𝑔 ∈ (1st𝐴)) ∧ (𝐵P ∈ (1st𝐵))) → (𝑔𝐺) ∈ Q)
2120an4s 588 . . . 4 (((𝐴P𝐵P) ∧ (𝑔 ∈ (1st𝐴) ∧ ∈ (1st𝐵))) → (𝑔𝐺) ∈ Q)
22 eleq1 2268 . . . 4 (𝐶 = (𝑔𝐺) → (𝐶Q ↔ (𝑔𝐺) ∈ Q))
2321, 22syl5ibrcom 157 . . 3 (((𝐴P𝐵P) ∧ (𝑔 ∈ (1st𝐴) ∧ ∈ (1st𝐵))) → (𝐶 = (𝑔𝐺) → 𝐶Q))
2423rexlimdvva 2631 . 2 ((𝐴P𝐵P) → (∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺) → 𝐶Q))
25 eqeq1 2212 . . . . . 6 (𝑓 = 𝐶 → (𝑓 = (𝑔𝐺) ↔ 𝐶 = (𝑔𝐺)))
26252rexbidv 2531 . . . . 5 (𝑓 = 𝐶 → (∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺) ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺)))
2726elrab3 2930 . . . 4 (𝐶Q → (𝐶 ∈ {𝑓Q ∣ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝑓 = (𝑔𝐺)} ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺)))
2810, 27sylan9bb 462 . . 3 (((𝐴P𝐵P) ∧ 𝐶Q) → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺)))
2928ex 115 . 2 ((𝐴P𝐵P) → (𝐶Q → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺))))
3012, 24, 29pm5.21ndd 707 1 ((𝐴P𝐵P) → (𝐶 ∈ (1st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1st𝐴)∃ ∈ (1st𝐵)𝐶 = (𝑔𝐺)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  w3a 981   = wceq 1373  wcel 2176  wrex 2485  {crab 2488  cop 3636  cfv 5271  (class class class)co 5944  cmpo 5946  1st c1st 6224  2nd c2nd 6225  Qcnq 7393  Pcnp 7404
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1470  ax-7 1471  ax-gen 1472  ax-ie1 1516  ax-ie2 1517  ax-8 1527  ax-10 1528  ax-11 1529  ax-i12 1530  ax-bndl 1532  ax-4 1533  ax-17 1549  ax-i9 1553  ax-ial 1557  ax-i5r 1558  ax-13 2178  ax-14 2179  ax-ext 2187  ax-coll 4159  ax-sep 4162  ax-pow 4218  ax-pr 4253  ax-un 4480  ax-setind 4585  ax-iinf 4636
This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1484  df-sb 1786  df-eu 2057  df-mo 2058  df-clab 2192  df-cleq 2198  df-clel 2201  df-nfc 2337  df-ne 2377  df-ral 2489  df-rex 2490  df-reu 2491  df-rab 2493  df-v 2774  df-sbc 2999  df-csb 3094  df-dif 3168  df-un 3170  df-in 3172  df-ss 3179  df-pw 3618  df-sn 3639  df-pr 3640  df-op 3642  df-uni 3851  df-int 3886  df-iun 3929  df-br 4045  df-opab 4106  df-mpt 4107  df-id 4340  df-iom 4639  df-xp 4681  df-rel 4682  df-cnv 4683  df-co 4684  df-dm 4685  df-rn 4686  df-res 4687  df-ima 4688  df-iota 5232  df-fun 5273  df-fn 5274  df-f 5275  df-f1 5276  df-fo 5277  df-f1o 5278  df-fv 5279  df-ov 5947  df-oprab 5948  df-mpo 5949  df-1st 6226  df-2nd 6227  df-qs 6626  df-ni 7417  df-nqqs 7461  df-inp 7579
This theorem is referenced by:  genpprecll  7627  genpcdl  7632  genprndl  7634  genpdisj  7636  genpassl  7637  addnqprlemrl  7670  mulnqprlemrl  7686  distrlem1prl  7695  distrlem5prl  7699  1idprl  7703  ltexprlemfl  7722  recexprlem1ssl  7746  recexprlemss1l  7748  cauappcvgprlemladdfl  7768
  Copyright terms: Public domain W3C validator