Theorem genipv 7635

Description: Value of general operation (addition or multiplication) on positive reals. (Contributed by Jim Kingon, 3-Oct-2019.)

Hypotheses

Ref	Expression
genp.1	⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1st ‘𝑤) ∧ 𝑧 ∈ (1st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2nd ‘𝑤) ∧ 𝑧 ∈ (2nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
genp.2	⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)

Assertion

Ref	Expression
genipv	⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}, {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}⟩)

Distinct variable groups:   𝑥,𝑦,𝑧,𝑞,𝑟,𝑠,𝐴   𝑥,𝐵,𝑦,𝑧,𝑞,𝑟,𝑠   𝑥,𝑤,𝑣,𝐺,𝑦,𝑧,𝑞,𝑟,𝑠

Allowed substitution hints:   𝐴(𝑤,𝑣)   𝐵(𝑤,𝑣)   𝐹(𝑥,𝑦,𝑧,𝑤,𝑣,𝑠,𝑟,𝑞)

Proof of Theorem genipv

Dummy variables 𝑓 𝑔 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq1 5961	. . . 4 ⊢ (𝑓 = 𝐴 → (𝑓𝐹𝑔) = (𝐴𝐹𝑔))
2		fveq2 5586	. . . . . . 7 ⊢ (𝑓 = 𝐴 → (1st ‘𝑓) = (1st ‘𝐴))
3	2	rexeqdv 2710	. . . . . 6 ⊢ (𝑓 = 𝐴 → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
4	3	rabbidv 2762	. . . . 5 ⊢ (𝑓 = 𝐴 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
5		fveq2 5586	. . . . . . 7 ⊢ (𝑓 = 𝐴 → (2nd ‘𝑓) = (2nd ‘𝐴))
6	5	rexeqdv 2710	. . . . . 6 ⊢ (𝑓 = 𝐴 → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
7	6	rabbidv 2762	. . . . 5 ⊢ (𝑓 = 𝐴 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
8	4, 7	opeq12d 3830	. . . 4 ⊢ (𝑓 = 𝐴 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
9	1, 8	eqeq12d 2221	. . 3 ⊢ (𝑓 = 𝐴 → ((𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ↔ (𝐴𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩))
10		oveq2 5962	. . . 4 ⊢ (𝑔 = 𝐵 → (𝐴𝐹𝑔) = (𝐴𝐹𝐵))
11		fveq2 5586	. . . . . . . 8 ⊢ (𝑔 = 𝐵 → (1st ‘𝑔) = (1st ‘𝐵))
12	11	rexeqdv 2710	. . . . . . 7 ⊢ (𝑔 = 𝐵 → (∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
13	12	rexbidv 2508	. . . . . 6 ⊢ (𝑔 = 𝐵 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
14	13	rabbidv 2762	. . . . 5 ⊢ (𝑔 = 𝐵 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)})
15		fveq2 5586	. . . . . . . 8 ⊢ (𝑔 = 𝐵 → (2nd ‘𝑔) = (2nd ‘𝐵))
16	15	rexeqdv 2710	. . . . . . 7 ⊢ (𝑔 = 𝐵 → (∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
17	16	rexbidv 2508	. . . . . 6 ⊢ (𝑔 = 𝐵 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
18	17	rabbidv 2762	. . . . 5 ⊢ (𝑔 = 𝐵 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)})
19	14, 18	opeq12d 3830	. . . 4 ⊢ (𝑔 = 𝐵 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩)
20	10, 19	eqeq12d 2221	. . 3 ⊢ (𝑔 = 𝐵 → ((𝐴𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ↔ (𝐴𝐹𝐵) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩))
21		nqex 7489	. . . . . . 7 ⊢ Q ∈ V
22	21	a1i 9	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → Q ∈ V)
23		rabssab 3283	. . . . . . 7 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ {𝑥 ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}
24		prop 7601	. . . . . . . . . . . 12 ⊢ (𝑓 ∈ P → ⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P)
25		elprnql 7607	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) → 𝑦 ∈ Q)
26	24, 25	sylan 283	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) → 𝑦 ∈ Q)
27		prop 7601	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ P → ⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P)
28		elprnql 7607	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P ∧ 𝑧 ∈ (1st ‘𝑔)) → 𝑧 ∈ Q)
29	27, 28	sylan 283	. . . . . . . . . . 11 ⊢ ((𝑔 ∈ P ∧ 𝑧 ∈ (1st ‘𝑔)) → 𝑧 ∈ Q)
30		genp.2	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
31		eleq1 2269	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑦𝐺𝑧) → (𝑥 ∈ Q ↔ (𝑦𝐺𝑧) ∈ Q))
32	30, 31	syl5ibrcom 157	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
33	26, 29, 32	syl2an 289	. . . . . . . . . 10 ⊢ (((𝑓 ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) ∧ (𝑔 ∈ P ∧ 𝑧 ∈ (1st ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
34	33	an4s 588	. . . . . . . . 9 ⊢ (((𝑓 ∈ P ∧ 𝑔 ∈ P) ∧ (𝑦 ∈ (1st ‘𝑓) ∧ 𝑧 ∈ (1st ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
35	34	rexlimdvva 2632	. . . . . . . 8 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
36	35	abssdv 3269	. . . . . . 7 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
37	23, 36	sstrid 3206	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
38	22, 37	ssexd 4189	. . . . 5 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V)
39		rabssab 3283	. . . . . . 7 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ {𝑥 ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}
40		elprnqu 7608	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) → 𝑦 ∈ Q)
41	24, 40	sylan 283	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) → 𝑦 ∈ Q)
42		elprnqu 7608	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔)) → 𝑧 ∈ Q)
43	27, 42	sylan 283	. . . . . . . . . . 11 ⊢ ((𝑔 ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔)) → 𝑧 ∈ Q)
44	41, 43, 32	syl2an 289	. . . . . . . . . 10 ⊢ (((𝑓 ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) ∧ (𝑔 ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
45	44	an4s 588	. . . . . . . . 9 ⊢ (((𝑓 ∈ P ∧ 𝑔 ∈ P) ∧ (𝑦 ∈ (2nd ‘𝑓) ∧ 𝑧 ∈ (2nd ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
46	45	rexlimdvva 2632	. . . . . . . 8 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
47	46	abssdv 3269	. . . . . . 7 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
48	39, 47	sstrid 3206	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
49	22, 48	ssexd 4189	. . . . 5 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V)
50		opelxp 4710	. . . . 5 ⊢ (⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V) ↔ ({𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V ∧ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V))
51	38, 49, 50	sylanbrc 417	. . . 4 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V))
52		fveq2 5586	. . . . . . . 8 ⊢ (𝑤 = 𝑓 → (1st ‘𝑤) = (1st ‘𝑓))
53	52	rexeqdv 2710	. . . . . . 7 ⊢ (𝑤 = 𝑓 → (∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)))
54	53	rabbidv 2762	. . . . . 6 ⊢ (𝑤 = 𝑓 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)})
55		fveq2 5586	. . . . . . . 8 ⊢ (𝑤 = 𝑓 → (2nd ‘𝑤) = (2nd ‘𝑓))
56	55	rexeqdv 2710	. . . . . . 7 ⊢ (𝑤 = 𝑓 → (∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)))
57	56	rabbidv 2762	. . . . . 6 ⊢ (𝑤 = 𝑓 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)})
58	54, 57	opeq12d 3830	. . . . 5 ⊢ (𝑤 = 𝑓 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩)
59		fveq2 5586	. . . . . . . . 9 ⊢ (𝑣 = 𝑔 → (1st ‘𝑣) = (1st ‘𝑔))
60	59	rexeqdv 2710	. . . . . . . 8 ⊢ (𝑣 = 𝑔 → (∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
61	60	rexbidv 2508	. . . . . . 7 ⊢ (𝑣 = 𝑔 → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
62	61	rabbidv 2762	. . . . . 6 ⊢ (𝑣 = 𝑔 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
63		fveq2 5586	. . . . . . . . 9 ⊢ (𝑣 = 𝑔 → (2nd ‘𝑣) = (2nd ‘𝑔))
64	63	rexeqdv 2710	. . . . . . . 8 ⊢ (𝑣 = 𝑔 → (∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
65	64	rexbidv 2508	. . . . . . 7 ⊢ (𝑣 = 𝑔 → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
66	65	rabbidv 2762	. . . . . 6 ⊢ (𝑣 = 𝑔 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
67	62, 66	opeq12d 3830	. . . . 5 ⊢ (𝑣 = 𝑔 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
68		genp.1	. . . . . 6 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1st ‘𝑤) ∧ 𝑧 ∈ (1st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2nd ‘𝑤) ∧ 𝑧 ∈ (2nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
69	68	genpdf 7634	. . . . 5 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩)
70	58, 67, 69	ovmpog 6090	. . . 4 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P ∧ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V)) → (𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
71	51, 70	mpd3an3 1351	. . 3 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
72	9, 20, 71	vtocl2ga 2843	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩)
73		eqeq1 2213	. . . . . 6 ⊢ (𝑥 = 𝑞 → (𝑥 = (𝑦𝐺𝑧) ↔ 𝑞 = (𝑦𝐺𝑧)))
74	73	2rexbidv 2532	. . . . 5 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑞 = (𝑦𝐺𝑧)))
75		oveq1 5961	. . . . . . 7 ⊢ (𝑦 = 𝑟 → (𝑦𝐺𝑧) = (𝑟𝐺𝑧))
76	75	eqeq2d 2218	. . . . . 6 ⊢ (𝑦 = 𝑟 → (𝑞 = (𝑦𝐺𝑧) ↔ 𝑞 = (𝑟𝐺𝑧)))
77		oveq2 5962	. . . . . . 7 ⊢ (𝑧 = 𝑠 → (𝑟𝐺𝑧) = (𝑟𝐺𝑠))
78	77	eqeq2d 2218	. . . . . 6 ⊢ (𝑧 = 𝑠 → (𝑞 = (𝑟𝐺𝑧) ↔ 𝑞 = (𝑟𝐺𝑠)))
79	76, 78	cbvrex2v 2753	. . . . 5 ⊢ (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑞 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠))
80	74, 79	bitrdi 196	. . . 4 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)))
81	80	cbvrabv 2772	. . 3 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)} = {𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}
82	73	2rexbidv 2532	. . . . 5 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑞 = (𝑦𝐺𝑧)))
83	76, 78	cbvrex2v 2753	. . . . 5 ⊢ (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑞 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠))
84	82, 83	bitrdi 196	. . . 4 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)))
85	84	cbvrabv 2772	. . 3 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)} = {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}
86	81, 85	opeq12i 3827	. 2 ⊢ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}, {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}⟩
87	72, 86	eqtrdi 2255	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}, {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}⟩)

Syntax hints:   → wi 4   ∧ wa 104   ∧ w3a 981   = wceq 1373   ∈ wcel 2177  {cab 2192  ∃wrex 2486  {crab 2489  Vcvv 2773  ⟨cop 3638   × cxp 4678  ‘cfv 5277  (class class class)co 5954   ∈ cmpo 5956  1^st c1st 6234  2^nd c2nd 6235  Qcnq 7406  Pcnp 7417

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 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2179  ax-14 2180  ax-ext 2188  ax-coll 4164  ax-sep 4167  ax-pow 4223  ax-pr 4258  ax-un 4485  ax-setind 4590  ax-iinf 4641

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-ral 2490  df-rex 2491  df-reu 2492  df-rab 2494  df-v 2775  df-sbc 3001  df-csb 3096  df-dif 3170  df-un 3172  df-in 3174  df-ss 3181  df-pw 3620  df-sn 3641  df-pr 3642  df-op 3644  df-uni 3854  df-int 3889  df-iun 3932  df-br 4049  df-opab 4111  df-mpt 4112  df-id 4345  df-iom 4644  df-xp 4686  df-rel 4687  df-cnv 4688  df-co 4689  df-dm 4690  df-rn 4691  df-res 4692  df-ima 4693  df-iota 5238  df-fun 5279  df-fn 5280  df-f 5281  df-f1 5282  df-fo 5283  df-f1o 5284  df-fv 5285  df-ov 5957  df-oprab 5958  df-mpo 5959  df-1st 6236  df-2nd 6237  df-qs 6636  df-ni 7430  df-nqqs 7474  df-inp 7592

This theorem is referenced by:  genpelvl  7638  genpelvu  7639  plpvlu  7664  mpvlu  7665