Theorem addsdilem1 27513

Description: Lemma for surreal distribution. Expand the left hand side of the main expression. (Contributed by Scott Fenton, 8-Mar-2025.)

Hypotheses

Ref	Expression
addsdilem.1	⊢ (𝜑 → 𝐴 ∈ No )
addsdilem.2	⊢ (𝜑 → 𝐵 ∈ No )
addsdilem.3	⊢ (𝜑 → 𝐶 ∈ No )

Assertion

Ref

Expression

addsdilem1

⊢ (𝜑 → (𝐴 ·s (𝐵 +s 𝐶)) = ((({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))})) |s (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))}))))

Distinct variable groups:   𝐴,𝑎,𝑥_𝐿   𝐴,𝑥_𝑅,𝑦_𝐿   𝐴,𝑦_𝑅   𝐴,𝑧_𝐿   𝐴,𝑧_𝑅   𝐵,𝑎,𝑥_𝐿   𝐵,𝑥_𝑅,𝑦_𝐿   𝐵,𝑦_𝑅   𝐵,𝑧_𝐿   𝐵,𝑧_𝑅   𝐶,𝑎,𝑥_𝐿   𝐶,𝑥_𝑅,𝑦_𝐿   𝐶,𝑦_𝑅   𝐶,𝑧_𝐿   𝐶,𝑧_𝑅   𝑎,𝑥_𝑅,𝑦_𝐿   𝑎,𝑦_𝑅   𝑎,𝑧_𝐿   𝑎,𝑧_𝑅   𝑥_𝐿,𝑦_𝐿   𝑥_𝐿,𝑦_𝑅   𝑥_𝐿,𝑧_𝐿   𝑥_𝐿,𝑧_𝑅   𝑥_𝑅,𝑦_𝑅   𝑥_𝑅,𝑧_𝐿   𝑥_𝑅,𝑧_𝑅

Allowed substitution hints:   𝜑(𝑎,𝑥_𝐿,𝑥_𝑅,𝑦_𝐿,𝑦_𝑅,𝑧_𝐿,𝑧_𝑅)

Proof of Theorem addsdilem1

Dummy variables 𝑏 𝑡 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lltropt 27285	. . . 4 ⊢ ( L ‘𝐴) <<s ( R ‘𝐴)
2	1	a1i 11	. . 3 ⊢ (𝜑 → ( L ‘𝐴) <<s ( R ‘𝐴))
3		addsdilem.2	. . . 4 ⊢ (𝜑 → 𝐵 ∈ No )
4		addsdilem.3	. . . 4 ⊢ (𝜑 → 𝐶 ∈ No )
5	3, 4	addscut2 27374	. . 3 ⊢ (𝜑 → ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}) <<s ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}))
6		addsdilem.1	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ No )
7		lrcut 27315	. . . . 5 ⊢ (𝐴 ∈ No → (( L ‘𝐴) |s ( R ‘𝐴)) = 𝐴)
8	6, 7	syl 17	. . . 4 ⊢ (𝜑 → (( L ‘𝐴) |s ( R ‘𝐴)) = 𝐴)
9	8	eqcomd 2737	. . 3 ⊢ (𝜑 → 𝐴 = (( L ‘𝐴) |s ( R ‘𝐴)))
10		addsval2 27358	. . . 4 ⊢ ((𝐵 ∈ No ∧ 𝐶 ∈ No ) → (𝐵 +s 𝐶) = (({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}) |s ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})))
11	3, 4, 10	syl2anc 584	. . 3 ⊢ (𝜑 → (𝐵 +s 𝐶) = (({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}) |s ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})))
12	2, 5, 9, 11	mulsunif 27512	. 2 ⊢ (𝜑 → (𝐴 ·s (𝐵 +s 𝐶)) = (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}) |s ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))})))
13		unab 4291	. . . . 5 ⊢ ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) = {𝑎 ∣ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))}
14		r19.43 3121	. . . . . . 7 ⊢ (∃𝑥𝐿 ∈ ( L ‘𝐴)(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))) ↔ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))))
15		rexun 4183	. . . . . . . . 9 ⊢ (∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
16		eqeq1 2735	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑏 → (𝑡 = (𝑦𝐿 +s 𝐶) ↔ 𝑏 = (𝑦𝐿 +s 𝐶)))
17	16	rexbidv 3177	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑏 → (∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶)))
18	17	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
19		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
20		ovex 7423	. . . . . . . . . . . . . 14 ⊢ (𝑦𝐿 +s 𝐶) ∈ V
21		oveq2 7398	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (𝐴 ·s 𝑏) = (𝐴 ·s (𝑦𝐿 +s 𝐶)))
22	21	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))))
23		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (𝑥𝐿 ·s 𝑏) = (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))
24	22, 23	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))))
25	24	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))))
26	20, 25	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))))
27	26	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))))
28		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
29	28	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
30	19, 27, 29	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))))
31	18, 30	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))))
32		eqeq1 2735	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑏 → (𝑡 = (𝐵 +s 𝑧𝐿) ↔ 𝑏 = (𝐵 +s 𝑧𝐿)))
33	32	rexbidv 3177	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑏 → (∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿)))
34	33	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
35		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
36		ovex 7423	. . . . . . . . . . . . . 14 ⊢ (𝐵 +s 𝑧𝐿) ∈ V
37		oveq2 7398	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (𝐴 ·s 𝑏) = (𝐴 ·s (𝐵 +s 𝑧𝐿)))
38	37	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))))
39		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (𝑥𝐿 ·s 𝑏) = (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))
40	38, 39	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))
41	40	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))))
42	36, 41	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))
43	42	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))
44		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
45	44	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
46	35, 43, 45	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))
47	34, 46	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))
48	31, 47	orbi12i 913	. . . . . . . . 9 ⊢ ((∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))))
49	15, 48	bitr2i 275	. . . . . . . 8 ⊢ ((∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
50	49	rexbii 3093	. . . . . . 7 ⊢ (∃𝑥𝐿 ∈ ( L ‘𝐴)(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
51	14, 50	bitr3i 276	. . . . . 6 ⊢ ((∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
52	51	abbii 2801	. . . . 5 ⊢ {𝑎 ∣ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿))))} = {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))}
53	13, 52	eqtri 2759	. . . 4 ⊢ ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) = {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))}
54		unab 4291	. . . . 5 ⊢ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))}) = {𝑎 ∣ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))}
55		r19.43 3121	. . . . . . 7 ⊢ (∃𝑥𝑅 ∈ ( R ‘𝐴)(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))) ↔ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))))
56		rexun 4183	. . . . . . . . 9 ⊢ (∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
57		eqeq1 2735	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑏 → (𝑡 = (𝑦𝑅 +s 𝐶) ↔ 𝑏 = (𝑦𝑅 +s 𝐶)))
58	57	rexbidv 3177	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑏 → (∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶)))
59	58	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
60		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
61		ovex 7423	. . . . . . . . . . . . . 14 ⊢ (𝑦𝑅 +s 𝐶) ∈ V
62		oveq2 7398	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (𝐴 ·s 𝑏) = (𝐴 ·s (𝑦𝑅 +s 𝐶)))
63	62	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))))
64		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (𝑥𝑅 ·s 𝑏) = (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))
65	63, 64	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))))
66	65	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))))
67	61, 66	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))))
68	67	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))))
69		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
70	69	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
71	60, 68, 70	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))))
72	59, 71	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))))
73		eqeq1 2735	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑏 → (𝑡 = (𝐵 +s 𝑧𝑅) ↔ 𝑏 = (𝐵 +s 𝑧𝑅)))
74	73	rexbidv 3177	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑏 → (∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅)))
75	74	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
76		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
77		ovex 7423	. . . . . . . . . . . . . 14 ⊢ (𝐵 +s 𝑧𝑅) ∈ V
78		oveq2 7398	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (𝐴 ·s 𝑏) = (𝐴 ·s (𝐵 +s 𝑧𝑅)))
79	78	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))))
80		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (𝑥𝑅 ·s 𝑏) = (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))
81	79, 80	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))
82	81	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))))
83	77, 82	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))
84	83	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))
85		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
86	85	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
87	76, 84, 86	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))
88	75, 87	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))
89	72, 88	orbi12i 913	. . . . . . . . 9 ⊢ ((∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))))
90	56, 89	bitr2i 275	. . . . . . . 8 ⊢ ((∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
91	90	rexbii 3093	. . . . . . 7 ⊢ (∃𝑥𝑅 ∈ ( R ‘𝐴)(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
92	55, 91	bitr3i 276	. . . . . 6 ⊢ ((∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
93	92	abbii 2801	. . . . 5 ⊢ {𝑎 ∣ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅))))} = {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}
94	54, 93	eqtri 2759	. . . 4 ⊢ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))}) = {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}
95	53, 94	uneq12i 4154	. . 3 ⊢ (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))})) = ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))})
96		unab 4291	. . . . 5 ⊢ ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) = {𝑎 ∣ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))}
97		r19.43 3121	. . . . . . 7 ⊢ (∃𝑥𝐿 ∈ ( L ‘𝐴)(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))) ↔ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))))
98		rexun 4183	. . . . . . . . 9 ⊢ (∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
99	58	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
100		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
101	62	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))))
102		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (𝑥𝐿 ·s 𝑏) = (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))
103	101, 102	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))))
104	103	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑦𝑅 +s 𝐶) → (𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))))
105	61, 104	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))))
106	105	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)∃𝑏(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))))
107		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
108	107	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑦𝑅 ∈ ( R ‘𝐵)(𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
109	100, 106, 108	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑏 = (𝑦𝑅 +s 𝐶) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))))
110	99, 109	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))))
111	74	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
112		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
113	78	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))))
114		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (𝑥𝐿 ·s 𝑏) = (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))
115	113, 114	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))
116	115	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝐵 +s 𝑧𝑅) → (𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))))
117	77, 116	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))
118	117	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))
119		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
120	119	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑧𝑅 ∈ ( R ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))))
121	112, 118, 120	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑧𝑅 ∈ ( R ‘𝐶)𝑏 = (𝐵 +s 𝑧𝑅) ∧ 𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))
122	111, 121	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ↔ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))
123	110, 122	orbi12i 913	. . . . . . . . 9 ⊢ ((∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)}𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))) ↔ (∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))))
124	98, 123	bitr2i 275	. . . . . . . 8 ⊢ ((∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
125	124	rexbii 3093	. . . . . . 7 ⊢ (∃𝑥𝐿 ∈ ( L ‘𝐴)(∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
126	97, 125	bitr3i 276	. . . . . 6 ⊢ ((∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏)))
127	126	abbii 2801	. . . . 5 ⊢ {𝑎 ∣ (∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶))) ∨ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅))))} = {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))}
128	96, 127	eqtri 2759	. . . 4 ⊢ ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) = {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))}
129		unab 4291	. . . . 5 ⊢ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))}) = {𝑎 ∣ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))}
130		r19.43 3121	. . . . . . 7 ⊢ (∃𝑥𝑅 ∈ ( R ‘𝐴)(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))) ↔ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))))
131		rexun 4183	. . . . . . . . 9 ⊢ (∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
132	17	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
133		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
134	21	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))))
135		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (𝑥𝑅 ·s 𝑏) = (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))
136	134, 135	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))))
137	136	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑦𝐿 +s 𝐶) → (𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))))
138	20, 137	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))))
139	138	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)∃𝑏(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))))
140		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
141	140	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑦𝐿 ∈ ( L ‘𝐵)(𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
142	133, 139, 141	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑏 = (𝑦𝐿 +s 𝐶) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))))
143	132, 142	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))))
144	33	rexab 3683	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
145		rexcom4 3284	. . . . . . . . . . . 12 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
146	37	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) = ((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))))
147		oveq2 7398	. . . . . . . . . . . . . . . 16 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (𝑥𝑅 ·s 𝑏) = (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))
148	146, 147	oveq12d 7408	. . . . . . . . . . . . . . 15 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))
149	148	eqeq2d 2742	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝐵 +s 𝑧𝐿) → (𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))))
150	36, 149	ceqsexv 3519	. . . . . . . . . . . . 13 ⊢ (∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))
151	150	rexbii 3093	. . . . . . . . . . . 12 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)∃𝑏(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))
152		r19.41v 3187	. . . . . . . . . . . . 13 ⊢ (∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
153	152	exbii 1850	. . . . . . . . . . . 12 ⊢ (∃𝑏∃𝑧𝐿 ∈ ( L ‘𝐶)(𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))))
154	145, 151, 153	3bitr3ri 301	. . . . . . . . . . 11 ⊢ (∃𝑏(∃𝑧𝐿 ∈ ( L ‘𝐶)𝑏 = (𝐵 +s 𝑧𝐿) ∧ 𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))
155	144, 154	bitri 274	. . . . . . . . . 10 ⊢ (∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ↔ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))
156	143, 155	orbi12i 913	. . . . . . . . 9 ⊢ ((∃𝑏 ∈ {𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)) ∨ ∃𝑏 ∈ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)}𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))) ↔ (∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))))
157	131, 156	bitr2i 275	. . . . . . . 8 ⊢ ((∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
158	157	rexbii 3093	. . . . . . 7 ⊢ (∃𝑥𝑅 ∈ ( R ‘𝐴)(∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
159	130, 158	bitr3i 276	. . . . . 6 ⊢ ((∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏)))
160	159	abbii 2801	. . . . 5 ⊢ {𝑎 ∣ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶))) ∨ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿))))} = {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}
161	129, 160	eqtri 2759	. . . 4 ⊢ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))}) = {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}
162	128, 161	uneq12i 4154	. . 3 ⊢ (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))})) = ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))})
163	95, 162	oveq12i 7402	. 2 ⊢ ((({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))})) |s (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))}))) = (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}) |s ({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝑅 ∈ ( R ‘𝐵)𝑡 = (𝑦𝑅 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝑅 ∈ ( R ‘𝐶)𝑡 = (𝐵 +s 𝑧𝑅)})𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝐿 ·s 𝑏))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑏 ∈ ({𝑡 ∣ ∃𝑦𝐿 ∈ ( L ‘𝐵)𝑡 = (𝑦𝐿 +s 𝐶)} ∪ {𝑡 ∣ ∃𝑧𝐿 ∈ ( L ‘𝐶)𝑡 = (𝐵 +s 𝑧𝐿)})𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s 𝑏)) -s (𝑥𝑅 ·s 𝑏))}))
164	12, 163	eqtr4di 2789	1 ⊢ (𝜑 → (𝐴 ·s (𝐵 +s 𝐶)) = ((({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝐿)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝑅)))})) |s (({𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑦𝑅 ∈ ( R ‘𝐵)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝑅 +s 𝐶))) -s (𝑥𝐿 ·s (𝑦𝑅 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝐿 ∈ ( L ‘𝐴)∃𝑧𝑅 ∈ ( R ‘𝐶)𝑎 = (((𝑥𝐿 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝑅))) -s (𝑥𝐿 ·s (𝐵 +s 𝑧𝑅)))}) ∪ ({𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑦𝐿 ∈ ( L ‘𝐵)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝑦𝐿 +s 𝐶))) -s (𝑥𝑅 ·s (𝑦𝐿 +s 𝐶)))} ∪ {𝑎 ∣ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑧𝐿 ∈ ( L ‘𝐶)𝑎 = (((𝑥𝑅 ·s (𝐵 +s 𝐶)) +s (𝐴 ·s (𝐵 +s 𝑧𝐿))) -s (𝑥𝑅 ·s (𝐵 +s 𝑧𝐿)))}))))

Syntax hints:   → wi 4   ∧ wa 396   ∨ wo 845   = wceq 1541  ∃wex 1781   ∈ wcel 2106  {cab 2708  ∃wrex 3069   ∪ cun 3939   class class class wbr 5138  ‘cfv 6529  (class class class)co 7390   No csur 27065   <<s csslt 27203   |s cscut 27205   L cleft 27258   R cright 27259   +_s cadds 27354   -_s csubs 27406   ·_s cmuls 27471

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7705

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3430  df-v 3472  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4520  df-pw 4595  df-sn 4620  df-pr 4622  df-tp 4624  df-op 4626  df-ot 4628  df-uni 4899  df-int 4941  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6286  df-ord 6353  df-on 6354  df-suc 6356  df-iota 6481  df-fun 6531  df-fn 6532  df-f 6533  df-f1 6534  df-fo 6535  df-f1o 6536  df-fv 6537  df-riota 7346  df-ov 7393  df-oprab 7394  df-mpo 7395  df-1st 7954  df-2nd 7955  df-frecs 8245  df-wrecs 8276  df-recs 8350  df-1o 8445  df-2o 8446  df-nadd 8645  df-no 27068  df-slt 27069  df-bday 27070  df-sle 27170  df-sslt 27204  df-scut 27206  df-0s 27246  df-made 27260  df-old 27261  df-left 27263  df-right 27264  df-norec 27333  df-norec2 27344  df-adds 27355  df-negs 27407  df-subs 27408  df-muls 27472

This theorem is referenced by:  addsdi  27517