genpelvl - Intuitionistic Logic Explorer

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

Theorem genpelvl 7221

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 (𝑦 ∈ (1^st ‘𝑤) ∧ 𝑧 ∈ (1^st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2^nd ‘𝑤) ∧ 𝑧 ∈ (2^nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
genpelvl.2	⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)

**Assertion**
Ref	Expression
genpelvl	⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ)))

Distinct variable groups: 𝑥,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣,𝐴 𝑥,𝐵,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣 𝑥,𝐺,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣 𝑔,𝐹 𝐶,𝑔,ℎ Allowed substitution hints: 𝐶(𝑥,𝑦,𝑧,𝑤,𝑣) 𝐹(𝑥,𝑦,𝑧,𝑤,𝑣,ℎ)

Proof of Theorem genpelvl Dummy variable 𝑓 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		genpelvl.1	. . . . . . 7 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1^st ‘𝑤) ∧ 𝑧 ∈ (1^st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2^nd ‘𝑤) ∧ 𝑧 ∈ (2^nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
2		genpelvl.2	. . . . . . 7 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
3	1, 2	genipv 7218	. . . . . 6 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)}, {𝑓 ∈ Q ∣ ∃𝑔 ∈ (2^nd ‘𝐴)∃ℎ ∈ (2^nd ‘𝐵)𝑓 = (𝑔𝐺ℎ)}⟩)
4	3	fveq2d 5357	. . . . 5 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (1^st ‘(𝐴𝐹𝐵)) = (1^st ‘⟨{𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)}, {𝑓 ∈ Q ∣ ∃𝑔 ∈ (2^nd ‘𝐴)∃ℎ ∈ (2^nd ‘𝐵)𝑓 = (𝑔𝐺ℎ)}⟩))
5		nqex 7072	. . . . . . 7 ⊢ Q ∈ V
6	5	rabex 4012	. . . . . 6 ⊢ {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)} ∈ V
7	5	rabex 4012	. . . . . 6 ⊢ {𝑓 ∈ Q ∣ ∃𝑔 ∈ (2^nd ‘𝐴)∃ℎ ∈ (2^nd ‘𝐵)𝑓 = (𝑔𝐺ℎ)} ∈ V
8	6, 7	op1st 5975	. . . . 5 ⊢ (1^st ‘⟨{𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)}, {𝑓 ∈ Q ∣ ∃𝑔 ∈ (2^nd ‘𝐴)∃ℎ ∈ (2^nd ‘𝐵)𝑓 = (𝑔𝐺ℎ)}⟩) = {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)}
9	4, 8	syl6eq 2148	. . . 4 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (1^st ‘(𝐴𝐹𝐵)) = {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)})
10	9	eleq2d 2169	. . 3 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ 𝐶 ∈ {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)}))
11		elrabi 2790	. . 3 ⊢ (𝐶 ∈ {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)} → 𝐶 ∈ Q)
12	10, 11	syl6bi 162	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) → 𝐶 ∈ Q))
13		prop 7184	. . . . . . 7 ⊢ (𝐴 ∈ P → ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P)
14		elprnql 7190	. . . . . . 7 ⊢ ((⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) → 𝑔 ∈ Q)
15	13, 14	sylan 279	. . . . . 6 ⊢ ((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) → 𝑔 ∈ Q)
16		prop 7184	. . . . . . 7 ⊢ (𝐵 ∈ P → ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P)
17		elprnql 7190	. . . . . . 7 ⊢ ((⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P ∧ ℎ ∈ (1^st ‘𝐵)) → ℎ ∈ Q)
18	16, 17	sylan 279	. . . . . 6 ⊢ ((𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵)) → ℎ ∈ Q)
19	2	caovcl 5857	. . . . . 6 ⊢ ((𝑔 ∈ Q ∧ ℎ ∈ Q) → (𝑔𝐺ℎ) ∈ Q)
20	15, 18, 19	syl2an 285	. . . . 5 ⊢ (((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) → (𝑔𝐺ℎ) ∈ Q)
21	20	an4s 558	. . . 4 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑔 ∈ (1^st ‘𝐴) ∧ ℎ ∈ (1^st ‘𝐵))) → (𝑔𝐺ℎ) ∈ Q)
22		eleq1 2162	. . . 4 ⊢ (𝐶 = (𝑔𝐺ℎ) → (𝐶 ∈ Q ↔ (𝑔𝐺ℎ) ∈ Q))
23	21, 22	syl5ibrcom 156	. . 3 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑔 ∈ (1^st ‘𝐴) ∧ ℎ ∈ (1^st ‘𝐵))) → (𝐶 = (𝑔𝐺ℎ) → 𝐶 ∈ Q))
24	23	rexlimdvva 2516	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ) → 𝐶 ∈ Q))
25		eqeq1 2106	. . . . . 6 ⊢ (𝑓 = 𝐶 → (𝑓 = (𝑔𝐺ℎ) ↔ 𝐶 = (𝑔𝐺ℎ)))
26	25	2rexbidv 2419	. . . . 5 ⊢ (𝑓 = 𝐶 → (∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ)))
27	26	elrab3 2794	. . . 4 ⊢ (𝐶 ∈ Q → (𝐶 ∈ {𝑓 ∈ Q ∣ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)} ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ)))
28	10, 27	sylan9bb 453	. . 3 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝐶 ∈ Q) → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ)))
29	28	ex 114	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐶 ∈ Q → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ))))
30	12, 24, 29	pm5.21ndd 662	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐶 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝐶 = (𝑔𝐺ℎ)))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 103 ↔ wb 104 ∧ w3a 930 = wceq 1299 ∈ wcel 1448 ∃wrex 2376 {crab 2379 ⟨cop 3477 ‘cfv 5059 (class class class)co 5706 ∈ cmpo 5708 1^st c1st 5967 2^nd c2nd 5968 Qcnq 6989 Pcnp 7000

This theorem was proved from axioms: ax-1 5 ax-2 6 ax-mp 7 ax-ia1 105 ax-ia2 106 ax-ia3 107 ax-in1 584 ax-in2 585 ax-io 671 ax-5 1391 ax-7 1392 ax-gen 1393 ax-ie1 1437 ax-ie2 1438 ax-8 1450 ax-10 1451 ax-11 1452 ax-i12 1453 ax-bndl 1454 ax-4 1455 ax-13 1459 ax-14 1460 ax-17 1474 ax-i9 1478 ax-ial 1482 ax-i5r 1483 ax-ext 2082 ax-coll 3983 ax-sep 3986 ax-pow 4038 ax-pr 4069 ax-un 4293 ax-setind 4390 ax-iinf 4440

This theorem depends on definitions: df-bi 116 df-3an 932 df-tru 1302 df-fal 1305 df-nf 1405 df-sb 1704 df-eu 1963 df-mo 1964 df-clab 2087 df-cleq 2093 df-clel 2096 df-nfc 2229 df-ne 2268 df-ral 2380 df-rex 2381 df-reu 2382 df-rab 2384 df-v 2643 df-sbc 2863 df-csb 2956 df-dif 3023 df-un 3025 df-in 3027 df-ss 3034 df-pw 3459 df-sn 3480 df-pr 3481 df-op 3483 df-uni 3684 df-int 3719 df-iun 3762 df-br 3876 df-opab 3930 df-mpt 3931 df-id 4153 df-iom 4443 df-xp 4483 df-rel 4484 df-cnv 4485 df-co 4486 df-dm 4487 df-rn 4488 df-res 4489 df-ima 4490 df-iota 5024 df-fun 5061 df-fn 5062 df-f 5063 df-f1 5064 df-fo 5065 df-f1o 5066 df-fv 5067 df-ov 5709 df-oprab 5710 df-mpo 5711 df-1st 5969 df-2nd 5970 df-qs 6365 df-ni 7013 df-nqqs 7057 df-inp 7175

This theorem is referenced by: genpprecll 7223 genpcdl 7228 genprndl 7230 genpdisj 7232 genpassl 7233 addnqprlemrl 7266 mulnqprlemrl 7282 distrlem1prl 7291 distrlem5prl 7295 1idprl 7299 ltexprlemfl 7318 recexprlem1ssl 7342 recexprlemss1l 7344 cauappcvgprlemladdfl 7364

W3C validator