Theorem mulsproplem9 28138

Description: Lemma for surreal multiplication. Show that the cut involved in surreal multiplication makes sense. (Contributed by Scott Fenton, 5-Mar-2025.)

Hypotheses

Ref	Expression
mulsproplem.1	⊢ (𝜑 → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
mulsproplem9.1	⊢ (𝜑 → 𝐴 ∈ No )
mulsproplem9.2	⊢ (𝜑 → 𝐵 ∈ No )

Assertion

Ref	Expression
mulsproplem9	⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) <<s ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}))

Distinct variable groups:   𝐴,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐵,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐶,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐷,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐸,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐹,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐴,𝑔,ℎ,𝑖,𝑗,𝑝,𝑞,𝑟,𝑠,𝑡,𝑢,𝑣,𝑤,𝑎,𝑏,𝑐,𝑑,𝑒,𝑓   𝐵,𝑔,ℎ,𝑖,𝑗,𝑝,𝑞,𝑟,𝑠,𝑡,𝑢,𝑣,𝑤   𝜑,𝑔,ℎ,𝑖,𝑗,𝑝,𝑞,𝑟,𝑠,𝑡,𝑢,𝑣,𝑤

Allowed substitution hints:   𝜑(𝑒,𝑓,𝑎,𝑏,𝑐,𝑑)   𝐶(𝑤,𝑣,𝑢,𝑡,𝑔,ℎ,𝑖,𝑗,𝑠,𝑟,𝑞,𝑝)   𝐷(𝑤,𝑣,𝑢,𝑡,𝑔,ℎ,𝑖,𝑗,𝑠,𝑟,𝑞,𝑝)   𝐸(𝑤,𝑣,𝑢,𝑡,𝑔,ℎ,𝑖,𝑗,𝑠,𝑟,𝑞,𝑝)   𝐹(𝑤,𝑣,𝑢,𝑡,𝑔,ℎ,𝑖,𝑗,𝑠,𝑟,𝑞,𝑝)

Proof of Theorem mulsproplem9

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2741	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
2	1	rnmpo 7493	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))}
3		fvex 6844	. . . . . . 7 ⊢ ( L ‘𝐴) ∈ V
4		fvex 6844	. . . . . . 7 ⊢ ( L ‘𝐵) ∈ V
5	3, 4	mpoex 8025	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
6	5	rnex 7854	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
7	2, 6	eqeltrri 2838	. . . 4 ⊢ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∈ V
8		eqid 2741	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
9	8	rnmpo 7493	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}
10		fvex 6844	. . . . . . 7 ⊢ ( R ‘𝐴) ∈ V
11		fvex 6844	. . . . . . 7 ⊢ ( R ‘𝐵) ∈ V
12	10, 11	mpoex 8025	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
13	12	rnex 7854	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
14	9, 13	eqeltrri 2838	. . . 4 ⊢ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ∈ V
15	7, 14	unex 7691	. . 3 ⊢ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∈ V
16	15	a1i 11	. 2 ⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∈ V)
17		eqid 2741	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
18	17	rnmpo 7493	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))}
19	3, 11	mpoex 8025	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
20	19	rnex 7854	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
21	18, 20	eqeltrri 2838	. . . 4 ⊢ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∈ V
22		eqid 2741	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
23	22	rnmpo 7493	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}
24	10, 4	mpoex 8025	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
25	24	rnex 7854	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
26	23, 25	eqeltrri 2838	. . . 4 ⊢ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ∈ V
27	21, 26	unex 7691	. . 3 ⊢ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ∈ V
28	27	a1i 11	. 2 ⊢ (𝜑 → ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ∈ V)
29		mulsproplem.1	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
30	29	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
31		simprl 777	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( L ‘𝐴))
32	31	leftoldd 27893	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( O ‘( bday ‘𝐴)))
33		mulsproplem9.2	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ No )
34	33	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
35	30, 32, 34	mulsproplem2 28131	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝐵) ∈ No )
36		mulsproplem9.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ No )
37	36	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
38		simprr 779	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( L ‘𝐵))
39	38	leftoldd 27893	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( O ‘( bday ‘𝐵)))
40	30, 37, 39	mulsproplem3 28132	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑞) ∈ No )
41	35, 40	addscld 27994	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → ((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) ∈ No )
42	30, 32, 39	mulsproplem4 28133	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝑞) ∈ No )
43	41, 42	subscld 28077	. . . . . 6 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∈ No )
44		eleq1 2829	. . . . . 6 ⊢ (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (𝑔 ∈ No ↔ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∈ No ))
45	43, 44	syl5ibrcom 249	. . . . 5 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → 𝑔 ∈ No ))
46	45	rexlimdvva 3198	. . . 4 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → 𝑔 ∈ No ))
47	46	abssdv 4001	. . 3 ⊢ (𝜑 → {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ⊆ No )
48	29	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
49		simprl 777	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( R ‘𝐴))
50	49	rightoldd 27895	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( O ‘( bday ‘𝐴)))
51	33	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
52	48, 50, 51	mulsproplem2 28131	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝐵) ∈ No )
53	36	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
54		simprr 779	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( R ‘𝐵))
55	54	rightoldd 27895	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( O ‘( bday ‘𝐵)))
56	48, 53, 55	mulsproplem3 28132	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑠) ∈ No )
57	52, 56	addscld 27994	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → ((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) ∈ No )
58	48, 50, 55	mulsproplem4 28133	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝑠) ∈ No )
59	57, 58	subscld 28077	. . . . . 6 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∈ No )
60		eleq1 2829	. . . . . 6 ⊢ (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (ℎ ∈ No ↔ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∈ No ))
61	59, 60	syl5ibrcom 249	. . . . 5 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ℎ ∈ No ))
62	61	rexlimdvva 3198	. . . 4 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ℎ ∈ No ))
63	62	abssdv 4001	. . 3 ⊢ (𝜑 → {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ⊆ No )
64	47, 63	unssd 4124	. 2 ⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ⊆ No )
65	29	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
66		simprl 777	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( L ‘𝐴))
67	66	leftoldd 27893	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( O ‘( bday ‘𝐴)))
68	33	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
69	65, 67, 68	mulsproplem2 28131	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝐵) ∈ No )
70	36	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
71		simprr 779	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( R ‘𝐵))
72	71	rightoldd 27895	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( O ‘( bday ‘𝐵)))
73	65, 70, 72	mulsproplem3 28132	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑢) ∈ No )
74	69, 73	addscld 27994	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → ((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) ∈ No )
75	65, 67, 72	mulsproplem4 28133	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝑢) ∈ No )
76	74, 75	subscld 28077	. . . . . 6 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∈ No )
77		eleq1 2829	. . . . . 6 ⊢ (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (𝑖 ∈ No ↔ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∈ No ))
78	76, 77	syl5ibrcom 249	. . . . 5 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑖 ∈ No ))
79	78	rexlimdvva 3198	. . . 4 ⊢ (𝜑 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑖 ∈ No ))
80	79	abssdv 4001	. . 3 ⊢ (𝜑 → {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ⊆ No )
81	29	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
82		simprl 777	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( R ‘𝐴))
83	82	rightoldd 27895	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( O ‘( bday ‘𝐴)))
84	33	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
85	81, 83, 84	mulsproplem2 28131	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝐵) ∈ No )
86	36	adantr 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
87		simprr 779	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( L ‘𝐵))
88	87	leftoldd 27893	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( O ‘( bday ‘𝐵)))
89	81, 86, 88	mulsproplem3 28132	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑤) ∈ No )
90	85, 89	addscld 27994	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → ((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) ∈ No )
91	81, 83, 88	mulsproplem4 28133	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝑤) ∈ No )
92	90, 91	subscld 28077	. . . . . 6 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ∈ No )
93		eleq1 2829	. . . . . 6 ⊢ (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (𝑗 ∈ No ↔ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ∈ No ))
94	92, 93	syl5ibrcom 249	. . . . 5 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑗 ∈ No ))
95	94	rexlimdvva 3198	. . . 4 ⊢ (𝜑 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑗 ∈ No ))
96	95	abssdv 4001	. . 3 ⊢ (𝜑 → {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ⊆ No )
97	80, 96	unssd 4124	. 2 ⊢ (𝜑 → ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ⊆ No )
98		elun 4086	. . . . . . 7 ⊢ (𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ↔ (𝑥 ∈ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∨ 𝑥 ∈ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}))
99		vex 3437	. . . . . . . . 9 ⊢ 𝑥 ∈ V
100		eqeq1 2745	. . . . . . . . . 10 ⊢ (𝑔 = 𝑥 → (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ 𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
101	100	2rexbidv 3206	. . . . . . . . 9 ⊢ (𝑔 = 𝑥 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
102	99, 101	elab 3619	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
103		eqeq1 2745	. . . . . . . . . 10 ⊢ (ℎ = 𝑥 → (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ 𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
104	103	2rexbidv 3206	. . . . . . . . 9 ⊢ (ℎ = 𝑥 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
105	99, 104	elab 3619	. . . . . . . 8 ⊢ (𝑥 ∈ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
106	102, 105	orbi12i 921	. . . . . . 7 ⊢ ((𝑥 ∈ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∨ 𝑥 ∈ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ↔ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∨ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
107	98, 106	bitri 277	. . . . . 6 ⊢ (𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ↔ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∨ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
108		elun 4086	. . . . . . 7 ⊢ (𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ↔ (𝑦 ∈ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∨ 𝑦 ∈ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}))
109		vex 3437	. . . . . . . . 9 ⊢ 𝑦 ∈ V
110		eqeq1 2745	. . . . . . . . . 10 ⊢ (𝑖 = 𝑦 → (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ 𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
111	110	2rexbidv 3206	. . . . . . . . 9 ⊢ (𝑖 = 𝑦 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
112	109, 111	elab 3619	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
113		eqeq1 2745	. . . . . . . . . 10 ⊢ (𝑗 = 𝑦 → (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ 𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
114	113	2rexbidv 3206	. . . . . . . . 9 ⊢ (𝑗 = 𝑦 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
115	109, 114	elab 3619	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
116	112, 115	orbi12i 921	. . . . . . 7 ⊢ ((𝑦 ∈ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∨ 𝑦 ∈ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ↔ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∨ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
117	108, 116	bitri 277	. . . . . 6 ⊢ (𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ↔ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∨ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
118	107, 117	anbi12i 635	. . . . 5 ⊢ ((𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∧ 𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))})) ↔ ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∨ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∧ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∨ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))))
119		anddi 1019	. . . . 5 ⊢ (((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∨ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∧ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∨ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) ↔ (((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) ∨ ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))))
120	118, 119	bitri 277	. . . 4 ⊢ ((𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∧ 𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))})) ↔ (((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) ∨ ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))))
121	29	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
122	36	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
123	33	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
124		simprll 785	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
125		simprlr 786	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
126		simprrl 787	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
127		simprrr 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
128	121, 122, 123, 124, 125, 126, 127	mulsproplem5 28134	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
129		breq2 5079	. . . . . . . . . . . 12 ⊢ (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → ((((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦 ↔ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
130	128, 129	syl5ibrcom 249	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
131	130	anassrs 469	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
132	131	rexlimdvva 3198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
133		breq1 5078	. . . . . . . . . 10 ⊢ (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (𝑥 <s 𝑦 ↔ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
134	133	imbi2d 342	. . . . . . . . 9 ⊢ (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → ((∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦) ↔ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦)))
135	132, 134	syl5ibrcom 249	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
136	135	rexlimdvva 3198	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
137	136	impd 412	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
138	29	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
139	36	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
140	33	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
141		simprll 785	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
142		simprlr 786	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
143		simprrl 787	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
144		simprrr 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
145	138, 139, 140, 141, 142, 143, 144	mulsproplem6 28135	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
146		breq2 5079	. . . . . . . . . . . 12 ⊢ (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → ((((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦 ↔ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
147	145, 146	syl5ibrcom 249	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
148	147	anassrs 469	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
149	148	rexlimdvva 3198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
150	133	imbi2d 342	. . . . . . . . 9 ⊢ (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → ((∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦) ↔ (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦)))
151	149, 150	syl5ibrcom 249	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
152	151	rexlimdvva 3198	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
153	152	impd 412	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
154	137, 153	jaod 866	. . . . 5 ⊢ (𝜑 → (((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) → 𝑥 <s 𝑦))
155	29	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
156	36	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
157	33	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
158		simprll 785	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
159		simprlr 786	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
160		simprrl 787	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
161		simprrr 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
162	155, 156, 157, 158, 159, 160, 161	mulsproplem7 28136	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
163		breq2 5079	. . . . . . . . . . . 12 ⊢ (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → ((((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦 ↔ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
164	162, 163	syl5ibrcom 249	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
165	164	anassrs 469	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
166	165	rexlimdvva 3198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
167		breq1 5078	. . . . . . . . . 10 ⊢ (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (𝑥 <s 𝑦 ↔ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
168	167	imbi2d 342	. . . . . . . . 9 ⊢ (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ((∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦) ↔ (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦)))
169	166, 168	syl5ibrcom 249	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
170	169	rexlimdvva 3198	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
171	170	impd 412	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
172	29	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → ∀𝑎 ∈ No ∀𝑏 ∈ No ∀𝑐 ∈ No ∀𝑑 ∈ No ∀𝑒 ∈ No ∀𝑓 ∈ No (((( bday ‘𝑎) +no ( bday ‘𝑏)) ∪ (((( bday ‘𝑐) +no ( bday ‘𝑒)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑓))) ∪ ((( bday ‘𝑐) +no ( bday ‘𝑓)) ∪ (( bday ‘𝑑) +no ( bday ‘𝑒))))) ∈ ((( bday ‘𝐴) +no ( bday ‘𝐵)) ∪ (((( bday ‘𝐶) +no ( bday ‘𝐸)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐹))) ∪ ((( bday ‘𝐶) +no ( bday ‘𝐹)) ∪ (( bday ‘𝐷) +no ( bday ‘𝐸))))) → ((𝑎 ·s 𝑏) ∈ No ∧ ((𝑐 <s 𝑑 ∧ 𝑒 <s 𝑓) → ((𝑐 ·s 𝑓) -s (𝑐 ·s 𝑒)) <s ((𝑑 ·s 𝑓) -s (𝑑 ·s 𝑒))))))
173	36	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
174	33	adantr 482	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
175		simprll 785	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
176		simprlr 786	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
177		simprrl 787	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
178		simprrr 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
179	172, 173, 174, 175, 176, 177, 178	mulsproplem8 28137	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
180		breq2 5079	. . . . . . . . . . . 12 ⊢ (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → ((((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦 ↔ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
181	179, 180	syl5ibrcom 249	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
182	181	anassrs 469	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
183	182	rexlimdvva 3198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
184	167	imbi2d 342	. . . . . . . . 9 ⊢ (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ((∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦) ↔ (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦)))
185	183, 184	syl5ibrcom 249	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
186	185	rexlimdvva 3198	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
187	186	impd 412	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
188	171, 187	jaod 866	. . . . 5 ⊢ (𝜑 → (((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) → 𝑥 <s 𝑦))
189	154, 188	jaod 866	. . . 4 ⊢ (𝜑 → ((((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))) ∨ ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∨ (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))) → 𝑥 <s 𝑦))
190	120, 189	biimtrid 244	. . 3 ⊢ (𝜑 → ((𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∧ 𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))})) → 𝑥 <s 𝑦))
191	190	3impib 1123	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ∧ 𝑦 ∈ ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))})) → 𝑥 <s 𝑦)
192	16, 28, 64, 97, 191	sltsd 27782	1 ⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) <<s ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}))

Syntax hints:   → wi 4   ∧ wa 397   ∨ wo 854   = wceq 1548   ∈ wcel 2121  {cab 2719  ∀wral 3055  ∃wrex 3065  Vcvv 3433   ∪ cun 3883   class class class wbr 5075  ran crn 5622  ‘cfv 6489  (class class class)co 7360   ∈ cmpo 7362   +no cnadd 8595   No csur 27625   <s clts 27626   bday cbday 27627   <<s cslts 27771   L cleft 27839   R cright 27840   +_s cadds 27973   -_s csubs 28034   ·_s cmuls 28120

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1975  ax-7 2016  ax-8 2123  ax-9 2131  ax-10 2154  ax-11 2170  ax-12 2191  ax-ext 2713  ax-rep 5202  ax-sep 5221  ax-nul 5231  ax-pow 5297  ax-pr 5365  ax-un 7682

This theorem depends on definitions:  df-bi 209  df-an 398  df-or 855  df-3or 1094  df-3an 1095  df-tru 1551  df-fal 1561  df-ex 1788  df-nf 1792  df-sb 2075  df-mo 2545  df-eu 2575  df-clab 2720  df-cleq 2733  df-clel 2816  df-nfc 2890  df-ne 2937  df-ral 3056  df-rex 3066  df-rmo 3346  df-reu 3347  df-rab 3394  df-v 3435  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-pss 3905  df-nul 4265  df-if 4458  df-pw 4534  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-ot 4567  df-uni 4842  df-int 4881  df-iun 4926  df-br 5076  df-opab 5138  df-mpt 5157  df-tr 5183  df-id 5516  df-eprel 5521  df-po 5529  df-so 5530  df-fr 5574  df-se 5575  df-we 5576  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-pred 6256  df-ord 6317  df-on 6318  df-suc 6320  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-1st 7935  df-2nd 7936  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-1o 8399  df-2o 8400  df-nadd 8596  df-no 27628  df-lts 27629  df-bday 27630  df-les 27731  df-slts 27772  df-cuts 27774  df-0s 27821  df-made 27841  df-old 27842  df-left 27844  df-right 27845  df-norec 27952  df-norec2 27963  df-adds 27974  df-negs 28035  df-subs 28036

This theorem is referenced by:  mulsproplem10  28139