genpcdl - Intuitionistic Logic Explorer

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

Theorem genpcdl 7732

Description: Downward closure of an operation on positive reals. (Contributed by Jim Kingdon, 14-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)
genpcdl.2	⊢ ((((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) ∧ 𝑥 ∈ Q) → (𝑥 <_Q (𝑔𝐺ℎ) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))

**Assertion**
Ref	Expression
genpcdl	⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))

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

**Proof of Theorem genpcdl**
Step	Hyp	Ref	Expression
1		ltrelnq 7578	. . . . . . 7 ⊢ <_Q ⊆ (Q × Q)
2	1	brel 4776	. . . . . 6 ⊢ (𝑥 <_Q 𝑓 → (𝑥 ∈ Q ∧ 𝑓 ∈ Q))
3	2	simpld 112	. . . . 5 ⊢ (𝑥 <_Q 𝑓 → 𝑥 ∈ Q)
4		genpelvl.1	. . . . . . . . 9 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1^st ‘𝑤) ∧ 𝑧 ∈ (1^st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2^nd ‘𝑤) ∧ 𝑧 ∈ (2^nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
5		genpelvl.2	. . . . . . . . 9 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
6	4, 5	genpelvl 7725	. . . . . . . 8 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)))
7	6	adantr 276	. . . . . . 7 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑥 ∈ Q) → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ)))
8		breq2 4090	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 ↔ 𝑥 <_Q (𝑔𝐺ℎ)))
9	8	biimpd 144	. . . . . . . . . . . 12 ⊢ (𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 → 𝑥 <_Q (𝑔𝐺ℎ)))
10		genpcdl.2	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) ∧ 𝑥 ∈ Q) → (𝑥 <_Q (𝑔𝐺ℎ) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))
11	9, 10	sylan9r 410	. . . . . . . . . . 11 ⊢ (((((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) ∧ 𝑥 ∈ Q) ∧ 𝑓 = (𝑔𝐺ℎ)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))
12	11	exp31 364	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) → (𝑥 ∈ Q → (𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
13	12	an4s 590	. . . . . . . . 9 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑔 ∈ (1^st ‘𝐴) ∧ ℎ ∈ (1^st ‘𝐵))) → (𝑥 ∈ Q → (𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
14	13	impancom 260	. . . . . . . 8 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑥 ∈ Q) → ((𝑔 ∈ (1^st ‘𝐴) ∧ ℎ ∈ (1^st ‘𝐵)) → (𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
15	14	rexlimdvv 2655	. . . . . . 7 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑥 ∈ Q) → (∃𝑔 ∈ (1^st ‘𝐴)∃ℎ ∈ (1^st ‘𝐵)𝑓 = (𝑔𝐺ℎ) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
16	7, 15	sylbid 150	. . . . . 6 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑥 ∈ Q) → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
17	16	ex 115	. . . . 5 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑥 ∈ Q → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
18	3, 17	syl5 32	. . . 4 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑥 <_Q 𝑓 → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
19	18	com34 83	. . 3 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑥 <_Q 𝑓 → (𝑥 <_Q 𝑓 → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))))
20	19	pm2.43d 50	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑥 <_Q 𝑓 → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
21	20	com23 78	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑓 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑓 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 104 ↔ wb 105 ∧ w3a 1002 = wceq 1395 ∈ wcel 2200 ∃wrex 2509 {crab 2512 ⟨cop 3670 class class class wbr 4086 ‘cfv 5324 (class class class)co 6013 ∈ cmpo 6015 1^st c1st 6296 2^nd c2nd 6297 Qcnq 7493 <_Q cltq 7498 Pcnp 7504

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 617 ax-in2 618 ax-io 714 ax-5 1493 ax-7 1494 ax-gen 1495 ax-ie1 1539 ax-ie2 1540 ax-8 1550 ax-10 1551 ax-11 1552 ax-i12 1553 ax-bndl 1555 ax-4 1556 ax-17 1572 ax-i9 1576 ax-ial 1580 ax-i5r 1581 ax-13 2202 ax-14 2203 ax-ext 2211 ax-coll 4202 ax-sep 4205 ax-pow 4262 ax-pr 4297 ax-un 4528 ax-setind 4633 ax-iinf 4684

This theorem depends on definitions: df-bi 117 df-3an 1004 df-tru 1398 df-fal 1401 df-nf 1507 df-sb 1809 df-eu 2080 df-mo 2081 df-clab 2216 df-cleq 2222 df-clel 2225 df-nfc 2361 df-ne 2401 df-ral 2513 df-rex 2514 df-reu 2515 df-rab 2517 df-v 2802 df-sbc 3030 df-csb 3126 df-dif 3200 df-un 3202 df-in 3204 df-ss 3211 df-pw 3652 df-sn 3673 df-pr 3674 df-op 3676 df-uni 3892 df-int 3927 df-iun 3970 df-br 4087 df-opab 4149 df-mpt 4150 df-id 4388 df-iom 4687 df-xp 4729 df-rel 4730 df-cnv 4731 df-co 4732 df-dm 4733 df-rn 4734 df-res 4735 df-ima 4736 df-iota 5284 df-fun 5326 df-fn 5327 df-f 5328 df-f1 5329 df-fo 5330 df-f1o 5331 df-fv 5332 df-ov 6016 df-oprab 6017 df-mpo 6018 df-1st 6298 df-2nd 6299 df-qs 6703 df-ni 7517 df-nqqs 7561 df-ltnqqs 7566 df-inp 7679

This theorem is referenced by: genprndl 7734

W3C validator