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

Theorem 1idpru 7053
Description: Lemma for 1idpr 7054. (Contributed by Jim Kingdon, 13-Dec-2019.)
Assertion
Ref Expression
1idpru (𝐴P → (2nd ‘(𝐴 ·P 1P)) = (2nd𝐴))

Proof of Theorem 1idpru
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 𝑢 𝑓 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ssid 3029 . . . . . 6 (2nd ‘1P) ⊆ (2nd ‘1P)
2 rexss 3072 . . . . . 6 ((2nd ‘1P) ⊆ (2nd ‘1P) → (∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ) ↔ ∃ ∈ (2nd ‘1P)( ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q ))))
31, 2ax-mp 7 . . . . 5 (∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ) ↔ ∃ ∈ (2nd ‘1P)( ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q )))
4 r19.42v 2517 . . . . . 6 (∃ ∈ (2nd ‘1P)(𝑓 <Q 𝑥𝑥 = (𝑓 ·Q )) ↔ (𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
5 1pr 7016 . . . . . . . . . . 11 1PP
6 prop 6937 . . . . . . . . . . . 12 (1PP → ⟨(1st ‘1P), (2nd ‘1P)⟩ ∈ P)
7 elprnqu 6944 . . . . . . . . . . . 12 ((⟨(1st ‘1P), (2nd ‘1P)⟩ ∈ P ∈ (2nd ‘1P)) → Q)
86, 7sylan 277 . . . . . . . . . . 11 ((1PP ∈ (2nd ‘1P)) → Q)
95, 8mpan 415 . . . . . . . . . 10 ( ∈ (2nd ‘1P) → Q)
10 prop 6937 . . . . . . . . . . . 12 (𝐴P → ⟨(1st𝐴), (2nd𝐴)⟩ ∈ P)
11 elprnqu 6944 . . . . . . . . . . . 12 ((⟨(1st𝐴), (2nd𝐴)⟩ ∈ P𝑓 ∈ (2nd𝐴)) → 𝑓Q)
1210, 11sylan 277 . . . . . . . . . . 11 ((𝐴P𝑓 ∈ (2nd𝐴)) → 𝑓Q)
13 breq2 3815 . . . . . . . . . . . . 13 (𝑥 = (𝑓 ·Q ) → (𝑓 <Q 𝑥𝑓 <Q (𝑓 ·Q )))
14133ad2ant3 962 . . . . . . . . . . . 12 ((𝑓QQ𝑥 = (𝑓 ·Q )) → (𝑓 <Q 𝑥𝑓 <Q (𝑓 ·Q )))
15 1pru 7018 . . . . . . . . . . . . . . 15 (2nd ‘1P) = { ∣ 1Q <Q }
1615abeq2i 2193 . . . . . . . . . . . . . 14 ( ∈ (2nd ‘1P) ↔ 1Q <Q )
17 1nq 6828 . . . . . . . . . . . . . . . . 17 1QQ
18 ltmnqg 6863 . . . . . . . . . . . . . . . . 17 ((1QQQ𝑓Q) → (1Q <Q ↔ (𝑓 ·Q 1Q) <Q (𝑓 ·Q )))
1917, 18mp3an1 1256 . . . . . . . . . . . . . . . 16 ((Q𝑓Q) → (1Q <Q ↔ (𝑓 ·Q 1Q) <Q (𝑓 ·Q )))
2019ancoms 264 . . . . . . . . . . . . . . 15 ((𝑓QQ) → (1Q <Q ↔ (𝑓 ·Q 1Q) <Q (𝑓 ·Q )))
21 mulidnq 6851 . . . . . . . . . . . . . . . . 17 (𝑓Q → (𝑓 ·Q 1Q) = 𝑓)
2221breq1d 3821 . . . . . . . . . . . . . . . 16 (𝑓Q → ((𝑓 ·Q 1Q) <Q (𝑓 ·Q ) ↔ 𝑓 <Q (𝑓 ·Q )))
2322adantr 270 . . . . . . . . . . . . . . 15 ((𝑓QQ) → ((𝑓 ·Q 1Q) <Q (𝑓 ·Q ) ↔ 𝑓 <Q (𝑓 ·Q )))
2420, 23bitrd 186 . . . . . . . . . . . . . 14 ((𝑓QQ) → (1Q <Q 𝑓 <Q (𝑓 ·Q )))
2516, 24syl5rbb 191 . . . . . . . . . . . . 13 ((𝑓QQ) → (𝑓 <Q (𝑓 ·Q ) ↔ ∈ (2nd ‘1P)))
26253adant3 959 . . . . . . . . . . . 12 ((𝑓QQ𝑥 = (𝑓 ·Q )) → (𝑓 <Q (𝑓 ·Q ) ↔ ∈ (2nd ‘1P)))
2714, 26bitrd 186 . . . . . . . . . . 11 ((𝑓QQ𝑥 = (𝑓 ·Q )) → (𝑓 <Q 𝑥 ∈ (2nd ‘1P)))
2812, 27syl3an1 1203 . . . . . . . . . 10 (((𝐴P𝑓 ∈ (2nd𝐴)) ∧ Q𝑥 = (𝑓 ·Q )) → (𝑓 <Q 𝑥 ∈ (2nd ‘1P)))
299, 28syl3an2 1204 . . . . . . . . 9 (((𝐴P𝑓 ∈ (2nd𝐴)) ∧ ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q )) → (𝑓 <Q 𝑥 ∈ (2nd ‘1P)))
30293expia 1141 . . . . . . . 8 (((𝐴P𝑓 ∈ (2nd𝐴)) ∧ ∈ (2nd ‘1P)) → (𝑥 = (𝑓 ·Q ) → (𝑓 <Q 𝑥 ∈ (2nd ‘1P))))
3130pm5.32rd 439 . . . . . . 7 (((𝐴P𝑓 ∈ (2nd𝐴)) ∧ ∈ (2nd ‘1P)) → ((𝑓 <Q 𝑥𝑥 = (𝑓 ·Q )) ↔ ( ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q ))))
3231rexbidva 2371 . . . . . 6 ((𝐴P𝑓 ∈ (2nd𝐴)) → (∃ ∈ (2nd ‘1P)(𝑓 <Q 𝑥𝑥 = (𝑓 ·Q )) ↔ ∃ ∈ (2nd ‘1P)( ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q ))))
334, 32syl5rbbr 193 . . . . 5 ((𝐴P𝑓 ∈ (2nd𝐴)) → (∃ ∈ (2nd ‘1P)( ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q )) ↔ (𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
343, 33syl5bb 190 . . . 4 ((𝐴P𝑓 ∈ (2nd𝐴)) → (∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ) ↔ (𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
3534rexbidva 2371 . . 3 (𝐴P → (∃𝑓 ∈ (2nd𝐴)∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ) ↔ ∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
36 df-imp 6931 . . . . 5 ·P = (𝑦P, 𝑧P ↦ ⟨{𝑤Q ∣ ∃𝑢Q𝑣Q (𝑢 ∈ (1st𝑦) ∧ 𝑣 ∈ (1st𝑧) ∧ 𝑤 = (𝑢 ·Q 𝑣))}, {𝑤Q ∣ ∃𝑢Q𝑣Q (𝑢 ∈ (2nd𝑦) ∧ 𝑣 ∈ (2nd𝑧) ∧ 𝑤 = (𝑢 ·Q 𝑣))}⟩)
37 mulclnq 6838 . . . . 5 ((𝑢Q𝑣Q) → (𝑢 ·Q 𝑣) ∈ Q)
3836, 37genpelvu 6975 . . . 4 ((𝐴P ∧ 1PP) → (𝑥 ∈ (2nd ‘(𝐴 ·P 1P)) ↔ ∃𝑓 ∈ (2nd𝐴)∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
395, 38mpan2 416 . . 3 (𝐴P → (𝑥 ∈ (2nd ‘(𝐴 ·P 1P)) ↔ ∃𝑓 ∈ (2nd𝐴)∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
40 prnminu 6951 . . . . . . 7 ((⟨(1st𝐴), (2nd𝐴)⟩ ∈ P𝑥 ∈ (2nd𝐴)) → ∃𝑓 ∈ (2nd𝐴)𝑓 <Q 𝑥)
4110, 40sylan 277 . . . . . 6 ((𝐴P𝑥 ∈ (2nd𝐴)) → ∃𝑓 ∈ (2nd𝐴)𝑓 <Q 𝑥)
42 ltrelnq 6827 . . . . . . . . . . . . . 14 <Q ⊆ (Q × Q)
4342brel 4448 . . . . . . . . . . . . 13 (𝑓 <Q 𝑥 → (𝑓Q𝑥Q))
4443ancomd 263 . . . . . . . . . . . 12 (𝑓 <Q 𝑥 → (𝑥Q𝑓Q))
45 ltmnqg 6863 . . . . . . . . . . . . . . . 16 ((𝑦Q𝑧Q𝑤Q) → (𝑦 <Q 𝑧 ↔ (𝑤 ·Q 𝑦) <Q (𝑤 ·Q 𝑧)))
4645adantl 271 . . . . . . . . . . . . . . 15 (((𝑥Q𝑓Q) ∧ (𝑦Q𝑧Q𝑤Q)) → (𝑦 <Q 𝑧 ↔ (𝑤 ·Q 𝑦) <Q (𝑤 ·Q 𝑧)))
47 simpr 108 . . . . . . . . . . . . . . 15 ((𝑥Q𝑓Q) → 𝑓Q)
48 simpl 107 . . . . . . . . . . . . . . 15 ((𝑥Q𝑓Q) → 𝑥Q)
49 recclnq 6854 . . . . . . . . . . . . . . . 16 (𝑓Q → (*Q𝑓) ∈ Q)
5049adantl 271 . . . . . . . . . . . . . . 15 ((𝑥Q𝑓Q) → (*Q𝑓) ∈ Q)
51 mulcomnqg 6845 . . . . . . . . . . . . . . . 16 ((𝑦Q𝑧Q) → (𝑦 ·Q 𝑧) = (𝑧 ·Q 𝑦))
5251adantl 271 . . . . . . . . . . . . . . 15 (((𝑥Q𝑓Q) ∧ (𝑦Q𝑧Q)) → (𝑦 ·Q 𝑧) = (𝑧 ·Q 𝑦))
5346, 47, 48, 50, 52caovord2d 5749 . . . . . . . . . . . . . 14 ((𝑥Q𝑓Q) → (𝑓 <Q 𝑥 ↔ (𝑓 ·Q (*Q𝑓)) <Q (𝑥 ·Q (*Q𝑓))))
54 recidnq 6855 . . . . . . . . . . . . . . . 16 (𝑓Q → (𝑓 ·Q (*Q𝑓)) = 1Q)
5554breq1d 3821 . . . . . . . . . . . . . . 15 (𝑓Q → ((𝑓 ·Q (*Q𝑓)) <Q (𝑥 ·Q (*Q𝑓)) ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
5655adantl 271 . . . . . . . . . . . . . 14 ((𝑥Q𝑓Q) → ((𝑓 ·Q (*Q𝑓)) <Q (𝑥 ·Q (*Q𝑓)) ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
5753, 56bitrd 186 . . . . . . . . . . . . 13 ((𝑥Q𝑓Q) → (𝑓 <Q 𝑥 ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
5857biimpd 142 . . . . . . . . . . . 12 ((𝑥Q𝑓Q) → (𝑓 <Q 𝑥 → 1Q <Q (𝑥 ·Q (*Q𝑓))))
5944, 58mpcom 36 . . . . . . . . . . 11 (𝑓 <Q 𝑥 → 1Q <Q (𝑥 ·Q (*Q𝑓)))
60 mulclnq 6838 . . . . . . . . . . . . 13 ((𝑥Q ∧ (*Q𝑓) ∈ Q) → (𝑥 ·Q (*Q𝑓)) ∈ Q)
6149, 60sylan2 280 . . . . . . . . . . . 12 ((𝑥Q𝑓Q) → (𝑥 ·Q (*Q𝑓)) ∈ Q)
62 breq2 3815 . . . . . . . . . . . . 13 ( = (𝑥 ·Q (*Q𝑓)) → (1Q <Q ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
6362, 15elab2g 2750 . . . . . . . . . . . 12 ((𝑥 ·Q (*Q𝑓)) ∈ Q → ((𝑥 ·Q (*Q𝑓)) ∈ (2nd ‘1P) ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
6444, 61, 633syl 17 . . . . . . . . . . 11 (𝑓 <Q 𝑥 → ((𝑥 ·Q (*Q𝑓)) ∈ (2nd ‘1P) ↔ 1Q <Q (𝑥 ·Q (*Q𝑓))))
6559, 64mpbird 165 . . . . . . . . . 10 (𝑓 <Q 𝑥 → (𝑥 ·Q (*Q𝑓)) ∈ (2nd ‘1P))
66 mulassnqg 6846 . . . . . . . . . . . . . 14 ((𝑦Q𝑧Q𝑤Q) → ((𝑦 ·Q 𝑧) ·Q 𝑤) = (𝑦 ·Q (𝑧 ·Q 𝑤)))
6766adantl 271 . . . . . . . . . . . . 13 (((𝑥Q𝑓Q) ∧ (𝑦Q𝑧Q𝑤Q)) → ((𝑦 ·Q 𝑧) ·Q 𝑤) = (𝑦 ·Q (𝑧 ·Q 𝑤)))
6847, 48, 50, 52, 67caov12d 5761 . . . . . . . . . . . 12 ((𝑥Q𝑓Q) → (𝑓 ·Q (𝑥 ·Q (*Q𝑓))) = (𝑥 ·Q (𝑓 ·Q (*Q𝑓))))
6954oveq2d 5607 . . . . . . . . . . . . 13 (𝑓Q → (𝑥 ·Q (𝑓 ·Q (*Q𝑓))) = (𝑥 ·Q 1Q))
7069adantl 271 . . . . . . . . . . . 12 ((𝑥Q𝑓Q) → (𝑥 ·Q (𝑓 ·Q (*Q𝑓))) = (𝑥 ·Q 1Q))
71 mulidnq 6851 . . . . . . . . . . . . 13 (𝑥Q → (𝑥 ·Q 1Q) = 𝑥)
7271adantr 270 . . . . . . . . . . . 12 ((𝑥Q𝑓Q) → (𝑥 ·Q 1Q) = 𝑥)
7368, 70, 723eqtrrd 2120 . . . . . . . . . . 11 ((𝑥Q𝑓Q) → 𝑥 = (𝑓 ·Q (𝑥 ·Q (*Q𝑓))))
7444, 73syl 14 . . . . . . . . . 10 (𝑓 <Q 𝑥𝑥 = (𝑓 ·Q (𝑥 ·Q (*Q𝑓))))
75 oveq2 5599 . . . . . . . . . . . 12 ( = (𝑥 ·Q (*Q𝑓)) → (𝑓 ·Q ) = (𝑓 ·Q (𝑥 ·Q (*Q𝑓))))
7675eqeq2d 2094 . . . . . . . . . . 11 ( = (𝑥 ·Q (*Q𝑓)) → (𝑥 = (𝑓 ·Q ) ↔ 𝑥 = (𝑓 ·Q (𝑥 ·Q (*Q𝑓)))))
7776rspcev 2712 . . . . . . . . . 10 (((𝑥 ·Q (*Q𝑓)) ∈ (2nd ‘1P) ∧ 𝑥 = (𝑓 ·Q (𝑥 ·Q (*Q𝑓)))) → ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))
7865, 74, 77syl2anc 403 . . . . . . . . 9 (𝑓 <Q 𝑥 → ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))
7978a1i 9 . . . . . . . 8 (𝑓 ∈ (2nd𝐴) → (𝑓 <Q 𝑥 → ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
8079ancld 318 . . . . . . 7 (𝑓 ∈ (2nd𝐴) → (𝑓 <Q 𝑥 → (𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
8180reximia 2462 . . . . . 6 (∃𝑓 ∈ (2nd𝐴)𝑓 <Q 𝑥 → ∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
8241, 81syl 14 . . . . 5 ((𝐴P𝑥 ∈ (2nd𝐴)) → ∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )))
8382ex 113 . . . 4 (𝐴P → (𝑥 ∈ (2nd𝐴) → ∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
84 prcunqu 6947 . . . . . . 7 ((⟨(1st𝐴), (2nd𝐴)⟩ ∈ P𝑓 ∈ (2nd𝐴)) → (𝑓 <Q 𝑥𝑥 ∈ (2nd𝐴)))
8510, 84sylan 277 . . . . . 6 ((𝐴P𝑓 ∈ (2nd𝐴)) → (𝑓 <Q 𝑥𝑥 ∈ (2nd𝐴)))
8685adantrd 273 . . . . 5 ((𝐴P𝑓 ∈ (2nd𝐴)) → ((𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )) → 𝑥 ∈ (2nd𝐴)))
8786rexlimdva 2483 . . . 4 (𝐴P → (∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q )) → 𝑥 ∈ (2nd𝐴)))
8883, 87impbid 127 . . 3 (𝐴P → (𝑥 ∈ (2nd𝐴) ↔ ∃𝑓 ∈ (2nd𝐴)(𝑓 <Q 𝑥 ∧ ∃ ∈ (2nd ‘1P)𝑥 = (𝑓 ·Q ))))
8935, 39, 883bitr4d 218 . 2 (𝐴P → (𝑥 ∈ (2nd ‘(𝐴 ·P 1P)) ↔ 𝑥 ∈ (2nd𝐴)))
9089eqrdv 2081 1 (𝐴P → (2nd ‘(𝐴 ·P 1P)) = (2nd𝐴))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103  w3a 920   = wceq 1285  wcel 1434  wrex 2354  wss 2984  cop 3425   class class class wbr 3811  cfv 4969  (class class class)co 5591  1st c1st 5844  2nd c2nd 5845  Qcnq 6742  1Qc1q 6743   ·Q cmq 6745  *Qcrq 6746   <Q cltq 6747  Pcnp 6753  1Pc1p 6754   ·P cmp 6756
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-coll 3919  ax-sep 3922  ax-nul 3930  ax-pow 3974  ax-pr 4000  ax-un 4224  ax-setind 4316  ax-iinf 4366
This theorem depends on definitions:  df-bi 115  df-dc 777  df-3or 921  df-3an 922  df-tru 1288  df-fal 1291  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ne 2250  df-ral 2358  df-rex 2359  df-reu 2360  df-rab 2362  df-v 2614  df-sbc 2827  df-csb 2920  df-dif 2986  df-un 2988  df-in 2990  df-ss 2997  df-nul 3270  df-pw 3408  df-sn 3428  df-pr 3429  df-op 3431  df-uni 3628  df-int 3663  df-iun 3706  df-br 3812  df-opab 3866  df-mpt 3867  df-tr 3902  df-eprel 4080  df-id 4084  df-po 4087  df-iso 4088  df-iord 4157  df-on 4159  df-suc 4162  df-iom 4369  df-xp 4407  df-rel 4408  df-cnv 4409  df-co 4410  df-dm 4411  df-rn 4412  df-res 4413  df-ima 4414  df-iota 4934  df-fun 4971  df-fn 4972  df-f 4973  df-f1 4974  df-fo 4975  df-f1o 4976  df-fv 4977  df-ov 5594  df-oprab 5595  df-mpt2 5596  df-1st 5846  df-2nd 5847  df-recs 6002  df-irdg 6067  df-1o 6113  df-oadd 6117  df-omul 6118  df-er 6222  df-ec 6224  df-qs 6228  df-ni 6766  df-pli 6767  df-mi 6768  df-lti 6769  df-plpq 6806  df-mpq 6807  df-enq 6809  df-nqqs 6810  df-plqqs 6811  df-mqqs 6812  df-1nqqs 6813  df-rq 6814  df-ltnqqs 6815  df-inp 6928  df-i1p 6929  df-imp 6931
This theorem is referenced by:  1idpr  7054
  Copyright terms: Public domain W3C validator