Theorem mulsproplem9 28443

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 2760	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
2	1	rnmpo 7541	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) = {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))}
3		fvex 6886	. . . . . . 7 ⊢ ( L ‘𝐴) ∈ V
4		fvex 6886	. . . . . . 7 ⊢ ( L ‘𝐵) ∈ V
5	3, 4	mpoex 8075	. . . . . 6 ⊢ (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
6	5	rnex 7905	. . . . 5 ⊢ ran (𝑝 ∈ ( L ‘𝐴), 𝑞 ∈ ( L ‘𝐵) ↦ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))) ∈ V
7	2, 6	eqeltrri 2857	. . . 4 ⊢ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∈ V
8		eqid 2760	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
9	8	rnmpo 7541	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) = {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}
10		fvex 6886	. . . . . . 7 ⊢ ( R ‘𝐴) ∈ V
11		fvex 6886	. . . . . . 7 ⊢ ( R ‘𝐵) ∈ V
12	10, 11	mpoex 8075	. . . . . 6 ⊢ (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
13	12	rnex 7905	. . . . 5 ⊢ ran (𝑟 ∈ ( R ‘𝐴), 𝑠 ∈ ( R ‘𝐵) ↦ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))) ∈ V
14	9, 13	eqeltrri 2857	. . . 4 ⊢ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ∈ V
15	7, 14	unex 7744	. . 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 2760	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
18	17	rnmpo 7541	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) = {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))}
19	3, 11	mpoex 8075	. . . . . 6 ⊢ (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
20	19	rnex 7905	. . . . 5 ⊢ ran (𝑡 ∈ ( L ‘𝐴), 𝑢 ∈ ( R ‘𝐵) ↦ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) ∈ V
21	18, 20	eqeltrri 2857	. . . 4 ⊢ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∈ V
22		eqid 2760	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
23	22	rnmpo 7541	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) = {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}
24	10, 4	mpoex 8075	. . . . . 6 ⊢ (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
25	24	rnex 7905	. . . . 5 ⊢ ran (𝑣 ∈ ( R ‘𝐴), 𝑤 ∈ ( L ‘𝐵) ↦ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) ∈ V
26	23, 25	eqeltrri 2857	. . . 4 ⊢ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ∈ V
27	21, 26	unex 7744	. . 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 486	. . . . . . . . 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 783	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( L ‘𝐴))
32	31	leftoldd 28198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑝 ∈ ( O ‘( bday ‘𝐴)))
33		mulsproplem9.2	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ No )
34	33	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
35	30, 32, 34	mulsproplem2 28436	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝐵) ∈ No )
36		mulsproplem9.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐴 ∈ No )
37	36	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
38		simprr 785	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( L ‘𝐵))
39	38	leftoldd 28198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → 𝑞 ∈ ( O ‘( bday ‘𝐵)))
40	30, 37, 39	mulsproplem3 28437	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑞) ∈ No )
41	35, 40	addscld 28299	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → ((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) ∈ No )
42	30, 32, 39	mulsproplem4 28438	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑝 ·s 𝑞) ∈ No )
43	41, 42	subscld 28382	. . . . . 6 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∈ No )
44		eleq1 2848	. . . . . 6 ⊢ (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (𝑔 ∈ No ↔ (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∈ No ))
45	43, 44	syl5ibrcom 250	. . . . 5 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → 𝑔 ∈ No ))
46	45	rexlimdvva 3219	. . . 4 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → 𝑔 ∈ No ))
47	46	abssdv 4014	. . 3 ⊢ (𝜑 → {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ⊆ No )
48	29	adantr 486	. . . . . . . . 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 783	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( R ‘𝐴))
50	49	rightoldd 28200	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑟 ∈ ( O ‘( bday ‘𝐴)))
51	33	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
52	48, 50, 51	mulsproplem2 28436	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝐵) ∈ No )
53	36	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
54		simprr 785	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( R ‘𝐵))
55	54	rightoldd 28200	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → 𝑠 ∈ ( O ‘( bday ‘𝐵)))
56	48, 53, 55	mulsproplem3 28437	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑠) ∈ No )
57	52, 56	addscld 28299	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → ((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) ∈ No )
58	48, 50, 55	mulsproplem4 28438	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑟 ·s 𝑠) ∈ No )
59	57, 58	subscld 28382	. . . . . 6 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∈ No )
60		eleq1 2848	. . . . . 6 ⊢ (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (ℎ ∈ No ↔ (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∈ No ))
61	59, 60	syl5ibrcom 250	. . . . 5 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ℎ ∈ No ))
62	61	rexlimdvva 3219	. . . 4 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → ℎ ∈ No ))
63	62	abssdv 4014	. . 3 ⊢ (𝜑 → {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ⊆ No )
64	47, 63	unssd 4137	. 2 ⊢ (𝜑 → ({𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ∪ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))}) ⊆ No )
65	29	adantr 486	. . . . . . . . 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 783	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( L ‘𝐴))
67	66	leftoldd 28198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑡 ∈ ( O ‘( bday ‘𝐴)))
68	33	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐵 ∈ No )
69	65, 67, 68	mulsproplem2 28436	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝐵) ∈ No )
70	36	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝐴 ∈ No )
71		simprr 785	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( R ‘𝐵))
72	71	rightoldd 28200	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → 𝑢 ∈ ( O ‘( bday ‘𝐵)))
73	65, 70, 72	mulsproplem3 28437	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝐴 ·s 𝑢) ∈ No )
74	69, 73	addscld 28299	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → ((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) ∈ No )
75	65, 67, 72	mulsproplem4 28438	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑡 ·s 𝑢) ∈ No )
76	74, 75	subscld 28382	. . . . . 6 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∈ No )
77		eleq1 2848	. . . . . 6 ⊢ (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (𝑖 ∈ No ↔ (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ∈ No ))
78	76, 77	syl5ibrcom 250	. . . . 5 ⊢ ((𝜑 ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑖 ∈ No ))
79	78	rexlimdvva 3219	. . . 4 ⊢ (𝜑 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑖 ∈ No ))
80	79	abssdv 4014	. . 3 ⊢ (𝜑 → {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ⊆ No )
81	29	adantr 486	. . . . . . . . 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 783	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( R ‘𝐴))
83	82	rightoldd 28200	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑣 ∈ ( O ‘( bday ‘𝐴)))
84	33	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐵 ∈ No )
85	81, 83, 84	mulsproplem2 28436	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝐵) ∈ No )
86	36	adantr 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝐴 ∈ No )
87		simprr 785	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( L ‘𝐵))
88	87	leftoldd 28198	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → 𝑤 ∈ ( O ‘( bday ‘𝐵)))
89	81, 86, 88	mulsproplem3 28437	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝐴 ·s 𝑤) ∈ No )
90	85, 89	addscld 28299	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → ((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) ∈ No )
91	81, 83, 88	mulsproplem4 28438	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑣 ·s 𝑤) ∈ No )
92	90, 91	subscld 28382	. . . . . 6 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ∈ No )
93		eleq1 2848	. . . . . 6 ⊢ (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (𝑗 ∈ No ↔ (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ∈ No ))
94	92, 93	syl5ibrcom 250	. . . . 5 ⊢ ((𝜑 ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑗 ∈ No ))
95	94	rexlimdvva 3219	. . . 4 ⊢ (𝜑 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑗 ∈ No ))
96	95	abssdv 4014	. . 3 ⊢ (𝜑 → {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ⊆ No )
97	80, 96	unssd 4137	. 2 ⊢ (𝜑 → ({𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ∪ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))}) ⊆ No )
98		elun 4099	. . . . . . 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 3454	. . . . . . . . 9 ⊢ 𝑥 ∈ V
100		eqeq1 2764	. . . . . . . . . 10 ⊢ (𝑔 = 𝑥 → (𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ 𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
101	100	2rexbidv 3227	. . . . . . . . 9 ⊢ (𝑔 = 𝑥 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))))
102	99, 101	elab 3632	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑔 ∣ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑔 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞))} ↔ ∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)))
103		eqeq1 2764	. . . . . . . . . 10 ⊢ (ℎ = 𝑥 → (ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ 𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
104	103	2rexbidv 3227	. . . . . . . . 9 ⊢ (ℎ = 𝑥 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))))
105	99, 104	elab 3632	. . . . . . . 8 ⊢ (𝑥 ∈ {ℎ ∣ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)ℎ = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠))} ↔ ∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)))
106	102, 105	orbi12i 928	. . . . . . 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 278	. . . . . 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 4099	. . . . . . 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 3454	. . . . . . . . 9 ⊢ 𝑦 ∈ V
110		eqeq1 2764	. . . . . . . . . 10 ⊢ (𝑖 = 𝑦 → (𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ 𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
111	110	2rexbidv 3227	. . . . . . . . 9 ⊢ (𝑖 = 𝑦 → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))))
112	109, 111	elab 3632	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑖 ∣ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑖 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))} ↔ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)))
113		eqeq1 2764	. . . . . . . . . 10 ⊢ (𝑗 = 𝑦 → (𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ 𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
114	113	2rexbidv 3227	. . . . . . . . 9 ⊢ (𝑗 = 𝑦 → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))))
115	109, 114	elab 3632	. . . . . . . 8 ⊢ (𝑦 ∈ {𝑗 ∣ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑗 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))} ↔ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)))
116	112, 115	orbi12i 928	. . . . . . 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 278	. . . . . 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 640	. . . . 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 1028	. . . . 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 278	. . . 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 486	. . . . . . . . . . . . 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 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
123	33	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
124		simprll 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
125		simprlr 792	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
126		simprrl 793	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
127		simprrr 794	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
128	121, 122, 123, 124, 125, 126, 127	mulsproplem5 28439	. . . . . . . . . . . 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 250	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
131	130	anassrs 473	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
132	131	rexlimdvva 3219	. . . . . . . . 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 343	. . . . . . . . 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 250	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
136	135	rexlimdvva 3219	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
137	136	impd 416	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
138	29	adantr 486	. . . . . . . . . . . . 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 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
140	33	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
141		simprll 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑝 ∈ ( L ‘𝐴))
142		simprlr 792	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑞 ∈ ( L ‘𝐵))
143		simprrl 793	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
144		simprrr 794	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
145	138, 139, 140, 141, 142, 143, 144	mulsproplem6 28440	. . . . . . . . . . . 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 250	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
148	147	anassrs 473	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
149	148	rexlimdvva 3219	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) <s 𝑦))
150	133	imbi2d 343	. . . . . . . . 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 250	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑝 ∈ ( L ‘𝐴) ∧ 𝑞 ∈ ( L ‘𝐵))) → (𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
152	151	rexlimdvva 3219	. . . . . . 7 ⊢ (𝜑 → (∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
153	152	impd 416	. . . . . 6 ⊢ (𝜑 → ((∃𝑝 ∈ ( L ‘𝐴)∃𝑞 ∈ ( L ‘𝐵)𝑥 = (((𝑝 ·s 𝐵) +s (𝐴 ·s 𝑞)) -s (𝑝 ·s 𝑞)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
154	137, 153	jaod 873	. . . . 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 486	. . . . . . . . . . . . 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 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐴 ∈ No )
157	33	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝐵 ∈ No )
158		simprll 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
159		simprlr 792	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
160		simprrl 793	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑡 ∈ ( L ‘𝐴))
161		simprrr 794	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → 𝑢 ∈ ( R ‘𝐵))
162	155, 156, 157, 158, 159, 160, 161	mulsproplem7 28441	. . . . . . . . . . . 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 250	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵)))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
165	164	anassrs 473	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑡 ∈ ( L ‘𝐴) ∧ 𝑢 ∈ ( R ‘𝐵))) → (𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
166	165	rexlimdvva 3219	. . . . . . . . 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 343	. . . . . . . . 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 250	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
170	169	rexlimdvva 3219	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢)) → 𝑥 <s 𝑦)))
171	170	impd 416	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑡 ∈ ( L ‘𝐴)∃𝑢 ∈ ( R ‘𝐵)𝑦 = (((𝑡 ·s 𝐵) +s (𝐴 ·s 𝑢)) -s (𝑡 ·s 𝑢))) → 𝑥 <s 𝑦))
172	29	adantr 486	. . . . . . . . . . . . 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 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐴 ∈ No )
174	33	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝐵 ∈ No )
175		simprll 791	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑟 ∈ ( R ‘𝐴))
176		simprlr 792	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑠 ∈ ( R ‘𝐵))
177		simprrl 793	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑣 ∈ ( R ‘𝐴))
178		simprrr 794	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → 𝑤 ∈ ( L ‘𝐵))
179	172, 173, 174, 175, 176, 177, 178	mulsproplem8 28442	. . . . . . . . . . . 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 250	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵)) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵)))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
182	181	anassrs 473	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) ∧ (𝑣 ∈ ( R ‘𝐴) ∧ 𝑤 ∈ ( L ‘𝐵))) → (𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
183	182	rexlimdvva 3219	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) <s 𝑦))
184	167	imbi2d 343	. . . . . . . . 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 250	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑟 ∈ ( R ‘𝐴) ∧ 𝑠 ∈ ( R ‘𝐵))) → (𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
186	185	rexlimdvva 3219	. . . . . . 7 ⊢ (𝜑 → (∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) → (∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤)) → 𝑥 <s 𝑦)))
187	186	impd 416	. . . . . 6 ⊢ (𝜑 → ((∃𝑟 ∈ ( R ‘𝐴)∃𝑠 ∈ ( R ‘𝐵)𝑥 = (((𝑟 ·s 𝐵) +s (𝐴 ·s 𝑠)) -s (𝑟 ·s 𝑠)) ∧ ∃𝑣 ∈ ( R ‘𝐴)∃𝑤 ∈ ( L ‘𝐵)𝑦 = (((𝑣 ·s 𝐵) +s (𝐴 ·s 𝑤)) -s (𝑣 ·s 𝑤))) → 𝑥 <s 𝑦))
188	171, 187	jaod 873	. . . . 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 873	. . . 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 245	. . 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 1134	. 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 28087	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 𝑤))}))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∨ wo 861   = wceq 1570   ∈ wcel 2145  {cab 2738  ∀wral 3076  ∃wrex 3086  Vcvv 3450   ∪ cun 3896   class class class wbr 5102  ran crn 5648  ‘cfv 6527  (class class class)co 7408   ∈ cmpo 7410   +no cnadd 8652   No csur 27930   <s clts 27931   bday cbday 27932   <<s cslts 28076   L cleft 28144   R cright 28145   +_s cadds 28278   -_s csubs 28339   ·_s cmuls 28425

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-ot 4592  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6293  df-ord 6354  df-on 6355  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-1st 7984  df-2nd 7985  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-1o 8454  df-2o 8455  df-nadd 8653  df-no 27933  df-lts 27934  df-bday 27935  df-les 28035  df-slts 28077  df-cuts 28079  df-0s 28126  df-made 28146  df-old 28147  df-left 28149  df-right 28150  df-norec 28257  df-norec2 28268  df-adds 28279  df-negs 28340  df-subs 28341

This theorem is used by:  mulsproplem10  28444