Theorem genipv 7341

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 5789	. . . 4 ⊢ (𝑓 = 𝐴 → (𝑓𝐹𝑔) = (𝐴𝐹𝑔))
2		fveq2 5429	. . . . . . 7 ⊢ (𝑓 = 𝐴 → (1st ‘𝑓) = (1st ‘𝐴))
3	2	rexeqdv 2636	. . . . . 6 ⊢ (𝑓 = 𝐴 → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
4	3	rabbidv 2678	. . . . 5 ⊢ (𝑓 = 𝐴 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
5		fveq2 5429	. . . . . . 7 ⊢ (𝑓 = 𝐴 → (2nd ‘𝑓) = (2nd ‘𝐴))
6	5	rexeqdv 2636	. . . . . 6 ⊢ (𝑓 = 𝐴 → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
7	6	rabbidv 2678	. . . . 5 ⊢ (𝑓 = 𝐴 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
8	4, 7	opeq12d 3721	. . . 4 ⊢ (𝑓 = 𝐴 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
9	1, 8	eqeq12d 2155	. . 3 ⊢ (𝑓 = 𝐴 → ((𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ↔ (𝐴𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩))
10		oveq2 5790	. . . 4 ⊢ (𝑔 = 𝐵 → (𝐴𝐹𝑔) = (𝐴𝐹𝐵))
11		fveq2 5429	. . . . . . . 8 ⊢ (𝑔 = 𝐵 → (1st ‘𝑔) = (1st ‘𝐵))
12	11	rexeqdv 2636	. . . . . . 7 ⊢ (𝑔 = 𝐵 → (∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
13	12	rexbidv 2439	. . . . . 6 ⊢ (𝑔 = 𝐵 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
14	13	rabbidv 2678	. . . . 5 ⊢ (𝑔 = 𝐵 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)})
15		fveq2 5429	. . . . . . . 8 ⊢ (𝑔 = 𝐵 → (2nd ‘𝑔) = (2nd ‘𝐵))
16	15	rexeqdv 2636	. . . . . . 7 ⊢ (𝑔 = 𝐵 → (∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
17	16	rexbidv 2439	. . . . . 6 ⊢ (𝑔 = 𝐵 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)))
18	17	rabbidv 2678	. . . . 5 ⊢ (𝑔 = 𝐵 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)})
19	14, 18	opeq12d 3721	. . . 4 ⊢ (𝑔 = 𝐵 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩)
20	10, 19	eqeq12d 2155	. . 3 ⊢ (𝑔 = 𝐵 → ((𝐴𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ↔ (𝐴𝐹𝐵) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩))
21		nqex 7195	. . . . . . 7 ⊢ Q ∈ V
22	21	a1i 9	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → Q ∈ V)
23		rabssab 3189	. . . . . . 7 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ {𝑥 ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}
24		prop 7307	. . . . . . . . . . . 12 ⊢ (𝑓 ∈ P → ⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P)
25		elprnql 7313	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) → 𝑦 ∈ Q)
26	24, 25	sylan 281	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) → 𝑦 ∈ Q)
27		prop 7307	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ P → ⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P)
28		elprnql 7313	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P ∧ 𝑧 ∈ (1st ‘𝑔)) → 𝑧 ∈ Q)
29	27, 28	sylan 281	. . . . . . . . . . 11 ⊢ ((𝑔 ∈ P ∧ 𝑧 ∈ (1st ‘𝑔)) → 𝑧 ∈ Q)
30		genp.2	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
31		eleq1 2203	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑦𝐺𝑧) → (𝑥 ∈ Q ↔ (𝑦𝐺𝑧) ∈ Q))
32	30, 31	syl5ibrcom 156	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
33	26, 29, 32	syl2an 287	. . . . . . . . . 10 ⊢ (((𝑓 ∈ P ∧ 𝑦 ∈ (1st ‘𝑓)) ∧ (𝑔 ∈ P ∧ 𝑧 ∈ (1st ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
34	33	an4s 578	. . . . . . . . 9 ⊢ (((𝑓 ∈ P ∧ 𝑔 ∈ P) ∧ (𝑦 ∈ (1st ‘𝑓) ∧ 𝑧 ∈ (1st ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
35	34	rexlimdvva 2560	. . . . . . . 8 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
36	35	abssdv 3176	. . . . . . 7 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
37	23, 36	sstrid 3113	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
38	22, 37	ssexd 4076	. . . . 5 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V)
39		rabssab 3189	. . . . . . 7 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ {𝑥 ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}
40		elprnqu 7314	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑓), (2nd ‘𝑓)⟩ ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) → 𝑦 ∈ Q)
41	24, 40	sylan 281	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) → 𝑦 ∈ Q)
42		elprnqu 7314	. . . . . . . . . . . 12 ⊢ ((⟨(1st ‘𝑔), (2nd ‘𝑔)⟩ ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔)) → 𝑧 ∈ Q)
43	27, 42	sylan 281	. . . . . . . . . . 11 ⊢ ((𝑔 ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔)) → 𝑧 ∈ Q)
44	41, 43, 32	syl2an 287	. . . . . . . . . 10 ⊢ (((𝑓 ∈ P ∧ 𝑦 ∈ (2nd ‘𝑓)) ∧ (𝑔 ∈ P ∧ 𝑧 ∈ (2nd ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
45	44	an4s 578	. . . . . . . . 9 ⊢ (((𝑓 ∈ P ∧ 𝑔 ∈ P) ∧ (𝑦 ∈ (2nd ‘𝑓) ∧ 𝑧 ∈ (2nd ‘𝑔))) → (𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
46	45	rexlimdvva 2560	. . . . . . . 8 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧) → 𝑥 ∈ Q))
47	46	abssdv 3176	. . . . . . 7 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
48	39, 47	sstrid 3113	. . . . . 6 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ⊆ Q)
49	22, 48	ssexd 4076	. . . . 5 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V)
50		opelxp 4577	. . . . 5 ⊢ (⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V) ↔ ({𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V ∧ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)} ∈ V))
51	38, 49, 50	sylanbrc 414	. . . 4 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V))
52		fveq2 5429	. . . . . . . 8 ⊢ (𝑤 = 𝑓 → (1st ‘𝑤) = (1st ‘𝑓))
53	52	rexeqdv 2636	. . . . . . 7 ⊢ (𝑤 = 𝑓 → (∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)))
54	53	rabbidv 2678	. . . . . 6 ⊢ (𝑤 = 𝑓 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)})
55		fveq2 5429	. . . . . . . 8 ⊢ (𝑤 = 𝑓 → (2nd ‘𝑤) = (2nd ‘𝑓))
56	55	rexeqdv 2636	. . . . . . 7 ⊢ (𝑤 = 𝑓 → (∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)))
57	56	rabbidv 2678	. . . . . 6 ⊢ (𝑤 = 𝑓 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)})
58	54, 57	opeq12d 3721	. . . . 5 ⊢ (𝑤 = 𝑓 → ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩)
59		fveq2 5429	. . . . . . . . 9 ⊢ (𝑣 = 𝑔 → (1st ‘𝑣) = (1st ‘𝑔))
60	59	rexeqdv 2636	. . . . . . . 8 ⊢ (𝑣 = 𝑔 → (∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
61	60	rexbidv 2439	. . . . . . 7 ⊢ (𝑣 = 𝑔 → (∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
62	61	rabbidv 2678	. . . . . 6 ⊢ (𝑣 = 𝑔 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
63		fveq2 5429	. . . . . . . . 9 ⊢ (𝑣 = 𝑔 → (2nd ‘𝑣) = (2nd ‘𝑔))
64	63	rexeqdv 2636	. . . . . . . 8 ⊢ (𝑣 = 𝑔 → (∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
65	64	rexbidv 2439	. . . . . . 7 ⊢ (𝑣 = 𝑔 → (∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)))
66	65	rabbidv 2678	. . . . . 6 ⊢ (𝑣 = 𝑔 → {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)} = {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)})
67	62, 66	opeq12d 3721	. . . . 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 7340	. . . . 5 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑤)∃𝑧 ∈ (1st ‘𝑣)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑤)∃𝑧 ∈ (2nd ‘𝑣)𝑥 = (𝑦𝐺𝑧)}⟩)
70	58, 67, 69	ovmpog 5913	. . . 4 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P ∧ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩ ∈ (V × V)) → (𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
71	51, 70	mpd3an3 1317	. . 3 ⊢ ((𝑓 ∈ P ∧ 𝑔 ∈ P) → (𝑓𝐹𝑔) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝑓)∃𝑧 ∈ (1st ‘𝑔)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝑓)∃𝑧 ∈ (2nd ‘𝑔)𝑥 = (𝑦𝐺𝑧)}⟩)
72	9, 20, 71	vtocl2ga 2757	. 2 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩)
73		eqeq1 2147	. . . . . 6 ⊢ (𝑥 = 𝑞 → (𝑥 = (𝑦𝐺𝑧) ↔ 𝑞 = (𝑦𝐺𝑧)))
74	73	2rexbidv 2463	. . . . 5 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑞 = (𝑦𝐺𝑧)))
75		oveq1 5789	. . . . . . 7 ⊢ (𝑦 = 𝑟 → (𝑦𝐺𝑧) = (𝑟𝐺𝑧))
76	75	eqeq2d 2152	. . . . . 6 ⊢ (𝑦 = 𝑟 → (𝑞 = (𝑦𝐺𝑧) ↔ 𝑞 = (𝑟𝐺𝑧)))
77		oveq2 5790	. . . . . . 7 ⊢ (𝑧 = 𝑠 → (𝑟𝐺𝑧) = (𝑟𝐺𝑠))
78	77	eqeq2d 2152	. . . . . 6 ⊢ (𝑧 = 𝑠 → (𝑞 = (𝑟𝐺𝑧) ↔ 𝑞 = (𝑟𝐺𝑠)))
79	76, 78	cbvrex2v 2669	. . . . 5 ⊢ (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑞 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠))
80	74, 79	syl6bb 195	. . . 4 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)))
81	80	cbvrabv 2688	. . 3 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)} = {𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}
82	73	2rexbidv 2463	. . . . 5 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑞 = (𝑦𝐺𝑧)))
83	76, 78	cbvrex2v 2669	. . . . 5 ⊢ (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑞 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠))
84	82, 83	syl6bb 195	. . . 4 ⊢ (𝑥 = 𝑞 → (∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧) ↔ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)))
85	84	cbvrabv 2688	. . 3 ⊢ {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)} = {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}
86	81, 85	opeq12i 3718	. 2 ⊢ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ (1st ‘𝐴)∃𝑧 ∈ (1st ‘𝐵)𝑥 = (𝑦𝐺𝑧)}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ (2nd ‘𝐴)∃𝑧 ∈ (2nd ‘𝐵)𝑥 = (𝑦𝐺𝑧)}⟩ = ⟨{𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}, {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}⟩
87	72, 86	eqtrdi 2189	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝐴𝐹𝐵) = ⟨{𝑞 ∈ Q ∣ ∃𝑟 ∈ (1st ‘𝐴)∃𝑠 ∈ (1st ‘𝐵)𝑞 = (𝑟𝐺𝑠)}, {𝑞 ∈ Q ∣ ∃𝑟 ∈ (2nd ‘𝐴)∃𝑠 ∈ (2nd ‘𝐵)𝑞 = (𝑟𝐺𝑠)}⟩)

Syntax hints:   → wi 4   ∧ wa 103   ∧ w3a 963   = wceq 1332   ∈ wcel 1481  {cab 2126  ∃wrex 2418  {crab 2421  Vcvv 2689  ⟨cop 3535   × cxp 4545  ‘cfv 5131  (class class class)co 5782   ∈ cmpo 5784  1^st c1st 6044  2^nd c2nd 6045  Qcnq 7112  Pcnp 7123

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-13 1492  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-coll 4051  ax-sep 4054  ax-pow 4106  ax-pr 4139  ax-un 4363  ax-setind 4460  ax-iinf 4510

This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1335  df-fal 1338  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ne 2310  df-ral 2422  df-rex 2423  df-reu 2424  df-rab 2426  df-v 2691  df-sbc 2914  df-csb 3008  df-dif 3078  df-un 3080  df-in 3082  df-ss 3089  df-pw 3517  df-sn 3538  df-pr 3539  df-op 3541  df-uni 3745  df-int 3780  df-iun 3823  df-br 3938  df-opab 3998  df-mpt 3999  df-id 4223  df-iom 4513  df-xp 4553  df-rel 4554  df-cnv 4555  df-co 4556  df-dm 4557  df-rn 4558  df-res 4559  df-ima 4560  df-iota 5096  df-fun 5133  df-fn 5134  df-f 5135  df-f1 5136  df-fo 5137  df-f1o 5138  df-fv 5139  df-ov 5785  df-oprab 5786  df-mpo 5787  df-1st 6046  df-2nd 6047  df-qs 6443  df-ni 7136  df-nqqs 7180  df-inp 7298

This theorem is referenced by:  genpelvl  7344  genpelvu  7345  plpvlu  7370  mpvlu  7371