Theorem mulsproplem9 28219

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 2764	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
2	1	rnmpo 7531	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))}
3		fvex 6882	. . . . . . 7 ⊢ ( L ‘𝐴) ∈ V
4		fvex 6882	. . . . . . 7 ⊢ ( L ‘𝐵) ∈ V
5	3, 4	mpoex 8062	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
6	5	rnex 7893	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
7	2, 6	eqeltrri 2861	. . . 4 ⊢ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∈ V
8		eqid 2764	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
9	8	rnmpo 7531	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}
10		fvex 6882	. . . . . . 7 ⊢ ( R ‘𝐴) ∈ V
11		fvex 6882	. . . . . . 7 ⊢ ( R ‘𝐵) ∈ V
12	10, 11	mpoex 8062	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
13	12	rnex 7893	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
14	9, 13	eqeltrri 2861	. . . 4 ⊢ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ∈ V
15	7, 14	unex 7729	. . 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 2764	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
18	17	rnmpo 7531	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))}
19	3, 11	mpoex 8062	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
20	19	rnex 7893	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
21	18, 20	eqeltrri 2861	. . . 4 ⊢ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∈ V
22		eqid 2764	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
23	22	rnmpo 7531	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}
24	10, 4	mpoex 8062	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
25	24	rnex 7893	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
26	23, 25	eqeltrri 2861	. . . 4 ⊢ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ∈ V
27	21, 26	unex 7729	. . 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 484	. . . . . . . . 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 780	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( L ‘𝐴))
32	31	leftoldd 27974	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( O ‘( bday ‘𝐴)))
33		mulsproplem9.2	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ No )
34	33	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
35	30, 32, 34	mulsproplem2 28212	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝐵) ∈ No )
36		mulsproplem9.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ No )
37	36	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
38		simprr 782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( L ‘𝐵))
39	38	leftoldd 27974	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( O ‘( bday ‘𝐵)))
40	30, 37, 39	mulsproplem3 28213	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑞) ∈ No )
41	35, 40	addscld 28075	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → ((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) ∈ No )
42	30, 32, 39	mulsproplem4 28214	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝑞) ∈ No )
43	41, 42	subscld 28158	. . . . . 6 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∈ No )
44		eleq1 2852	. . . . . 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 3221	. . . 4 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → 𝑔 ∈ No ))
47	46	abssdv 4022	. . 3 ⊢ (𝜑 → {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ⊆ No )
48	29	adantr 484	. . . . . . . . 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 780	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( R ‘𝐴))
50	49	rightoldd 27976	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( O ‘( bday ‘𝐴)))
51	33	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
52	48, 50, 51	mulsproplem2 28212	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝐵) ∈ No )
53	36	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
54		simprr 782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( R ‘𝐵))
55	54	rightoldd 27976	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( O ‘( bday ‘𝐵)))
56	48, 53, 55	mulsproplem3 28213	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑠) ∈ No )
57	52, 56	addscld 28075	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → ((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) ∈ No )
58	48, 50, 55	mulsproplem4 28214	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝑠) ∈ No )
59	57, 58	subscld 28158	. . . . . 6 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∈ No )
60		eleq1 2852	. . . . . 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 3221	. . . 4 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ℎ ∈ No ))
63	62	abssdv 4022	. . 3 ⊢ (𝜑 → {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ⊆ No )
64	47, 63	unssd 4146	. 2 ⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ⊆ No )
65	29	adantr 484	. . . . . . . . 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 780	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( L ‘𝐴))
67	66	leftoldd 27974	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( O ‘( bday ‘𝐴)))
68	33	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
69	65, 67, 68	mulsproplem2 28212	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝐵) ∈ No )
70	36	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
71		simprr 782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( R ‘𝐵))
72	71	rightoldd 27976	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( O ‘( bday ‘𝐵)))
73	65, 70, 72	mulsproplem3 28213	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑢) ∈ No )
74	69, 73	addscld 28075	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → ((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) ∈ No )
75	65, 67, 72	mulsproplem4 28214	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝑢) ∈ No )
76	74, 75	subscld 28158	. . . . . 6 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∈ No )
77		eleq1 2852	. . . . . 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 3221	. . . 4 ⊢ (𝜑 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑖 ∈ No ))
80	79	abssdv 4022	. . 3 ⊢ (𝜑 → {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ⊆ No )
81	29	adantr 484	. . . . . . . . 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 780	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( R ‘𝐴))
83	82	rightoldd 27976	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( O ‘( bday ‘𝐴)))
84	33	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
85	81, 83, 84	mulsproplem2 28212	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝐵) ∈ No )
86	36	adantr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
87		simprr 782	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( L ‘𝐵))
88	87	leftoldd 27974	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( O ‘( bday ‘𝐵)))
89	81, 86, 88	mulsproplem3 28213	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑤) ∈ No )
90	85, 89	addscld 28075	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → ((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) ∈ No )
91	81, 83, 88	mulsproplem4 28214	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝑤) ∈ No )
92	90, 91	subscld 28158	. . . . . 6 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ∈ No )
93		eleq1 2852	. . . . . 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 3221	. . . 4 ⊢ (𝜑 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑗 ∈ No ))
96	95	abssdv 4022	. . 3 ⊢ (𝜑 → {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ⊆ No )
97	80, 96	unssd 4146	. 2 ⊢ (𝜑 → ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ⊆ No )
98		elun 4108	. . . . . . 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 3460	. . . . . . . . 9 ⊢ 𝑥 ∈ V
100		eqeq1 2768	. . . . . . . . . 10 ⊢ (𝑔 = 𝑥 → (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ 𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
101	100	2rexbidv 3229	. . . . . . . . 9 ⊢ (𝑔 = 𝑥 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
102	99, 101	elab 3640	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
103		eqeq1 2768	. . . . . . . . . 10 ⊢ (ℎ = 𝑥 → (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ 𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
104	103	2rexbidv 3229	. . . . . . . . 9 ⊢ (ℎ = 𝑥 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
105	99, 104	elab 3640	. . . . . . . 8 ⊢ (𝑥 ∈ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
106	102, 105	orbi12i 925	. . . . . . 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 4108	. . . . . . 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 3460	. . . . . . . . 9 ⊢ 𝑦 ∈ V
110		eqeq1 2768	. . . . . . . . . 10 ⊢ (𝑖 = 𝑦 → (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ 𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
111	110	2rexbidv 3229	. . . . . . . . 9 ⊢ (𝑖 = 𝑦 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
112	109, 111	elab 3640	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
113		eqeq1 2768	. . . . . . . . . 10 ⊢ (𝑗 = 𝑦 → (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ 𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
114	113	2rexbidv 3229	. . . . . . . . 9 ⊢ (𝑗 = 𝑦 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
115	109, 114	elab 3640	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
116	112, 115	orbi12i 925	. . . . . . 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 637	. . . . 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 1024	. . . . 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 484	. . . . . . . . . . . . 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 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
123	33	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
124		simprll 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
125		simprlr 789	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
126		simprrl 790	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
127		simprrr 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
128	121, 122, 123, 124, 125, 126, 127	mulsproplem5 28215	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
129		breq2 5106	. . . . . . . . . . . 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 471	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
132	131	rexlimdvva 3221	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
133		breq1 5105	. . . . . . . . . 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 3221	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
137	136	impd 414	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
138	29	adantr 484	. . . . . . . . . . . . 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 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
140	33	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
141		simprll 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
142		simprlr 789	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
143		simprrl 790	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
144		simprrr 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
145	138, 139, 140, 141, 142, 143, 144	mulsproplem6 28216	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
146		breq2 5106	. . . . . . . . . . . 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 471	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
149	148	rexlimdvva 3221	. . . . . . . . 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 3221	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
153	152	impd 414	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
154	137, 153	jaod 870	. . . . 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 484	. . . . . . . . . . . . 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 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
157	33	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
158		simprll 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
159		simprlr 789	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
160		simprrl 790	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
161		simprrr 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
162	155, 156, 157, 158, 159, 160, 161	mulsproplem7 28217	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
163		breq2 5106	. . . . . . . . . . . 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 471	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
166	165	rexlimdvva 3221	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
167		breq1 5105	. . . . . . . . . 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 3221	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
171	170	impd 414	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
172	29	adantr 484	. . . . . . . . . . . . 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 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
174	33	adantr 484	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
175		simprll 788	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
176		simprlr 789	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
177		simprrl 790	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
178		simprrr 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
179	172, 173, 174, 175, 176, 177, 178	mulsproplem8 28218	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
180		breq2 5106	. . . . . . . . . . . 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 471	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
183	182	rexlimdvva 3221	. . . . . . . . 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 3221	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
187	186	impd 414	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
188	171, 187	jaod 870	. . . . 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 870	. . . 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 1130	. 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 27863	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 399   ∨ wo 858   = wceq 1562   ∈ wcel 2144  {cab 2742  ∀wral 3078  ∃wrex 3088  Vcvv 3456   ∪ cun 3904   class class class wbr 5102  ran crn 5650  ‘cfv 6523  (class class class)co 7398   ∈ cmpo 7400   +no cnadd 8637   No csur 27706   <s clts 27707   bday cbday 27708   <<s cslts 27852   L cleft 27920   R cright 27921   +_s cadds 28054   -_s csubs 28115   ·_s cmuls 28201

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2214  ax-ext 2736  ax-rep 5229  ax-sep 5248  ax-nul 5258  ax-pow 5324  ax-pr 5392  ax-un 7720

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1565  df-fal 1575  df-ex 1802  df-nf 1806  df-sb 2093  df-mo 2568  df-eu 2598  df-clab 2743  df-cleq 2756  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3079  df-rex 3089  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3458  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5544  df-eprel 5549  df-po 5557  df-so 5558  df-fr 5602  df-se 5603  df-we 5604  df-xp 5655  df-rel 5656  df-cnv 5657  df-co 5658  df-dm 5659  df-rn 5660  df-res 5661  df-ima 5662  df-pred 6290  df-ord 6351  df-on 6352  df-suc 6354  df-iota 6479  df-fun 6525  df-fn 6526  df-f 6527  df-f1 6528  df-fo 6529  df-f1o 6530  df-fv 6531  df-riota 7355  df-ov 7401  df-oprab 7402  df-mpo 7403  df-1st 7972  df-2nd 7973  df-frecs 8264  df-wrecs 8295  df-recs 8344  df-1o 8439  df-2o 8440  df-nadd 8638  df-no 27709  df-lts 27710  df-bday 27711  df-les 27811  df-slts 27853  df-cuts 27855  df-0s 27902  df-made 27922  df-old 27923  df-left 27925  df-right 27926  df-norec 28033  df-norec2 28044  df-adds 28055  df-negs 28116  df-subs 28117

This theorem is referenced by:  mulsproplem10  28220