Theorem addbday 28437

Description: The birthday of the sum of two surreals is less than or equal to the natural ordinal sum of their individual birthdays. Theorem 6.1 of [Gonshor] p. 95. (Contributed by Scott Fenton, 12-Aug-2025.)

Assertion

Ref	Expression
addbday	⊢ ((𝐴 ∈ No ∧ 𝐵 ∈ No) → (bday‘(𝐴 +s 𝐵)) ⊆ ((bday‘𝐴) +no (bday‘𝐵)))

Proof of Theorem addbday

Dummy variables 𝑥 𝑦 𝑥_𝑂 𝑦_𝑂 𝑥_𝐿 𝑦_𝐿 𝑥_𝑅 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fvoveq1 7469	. . 3 ⊢ (𝑥 = 𝑥𝑂 → (bday‘(𝑥 +s 𝑦)) = (bday‘(𝑥𝑂 +s 𝑦)))
2		fveq2 6911	. . . 4 ⊢ (𝑥 = 𝑥𝑂 → (bday‘𝑥) = (bday‘𝑥𝑂))
3	2	oveq1d 7461	. . 3 ⊢ (𝑥 = 𝑥𝑂 → ((bday‘𝑥) +no (bday‘𝑦)) = ((bday‘𝑥𝑂) +no (bday‘𝑦)))
4	1, 3	sseq12d 3946	. 2 ⊢ (𝑥 = 𝑥𝑂 → ((bday‘(𝑥 +s 𝑦)) ⊆ ((bday‘𝑥) +no (bday‘𝑦)) ↔ (bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦))))
5		oveq2 7454	. . . 4 ⊢ (𝑦 = 𝑦𝑂 → (𝑥𝑂 +s 𝑦) = (𝑥𝑂 +s 𝑦𝑂))
6	5	fveq2d 6915	. . 3 ⊢ (𝑦 = 𝑦𝑂 → (bday‘(𝑥𝑂 +s 𝑦)) = (bday‘(𝑥𝑂 +s 𝑦𝑂)))
7		fveq2 6911	. . . 4 ⊢ (𝑦 = 𝑦𝑂 → (bday‘𝑦) = (bday‘𝑦𝑂))
8	7	oveq2d 7462	. . 3 ⊢ (𝑦 = 𝑦𝑂 → ((bday‘𝑥𝑂) +no (bday‘𝑦)) = ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)))
9	6, 8	sseq12d 3946	. 2 ⊢ (𝑦 = 𝑦𝑂 → ((bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ↔ (bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂))))
10		fvoveq1 7469	. . 3 ⊢ (𝑥 = 𝑥𝑂 → (bday‘(𝑥 +s 𝑦𝑂)) = (bday‘(𝑥𝑂 +s 𝑦𝑂)))
11	2	oveq1d 7461	. . 3 ⊢ (𝑥 = 𝑥𝑂 → ((bday‘𝑥) +no (bday‘𝑦𝑂)) = ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)))
12	10, 11	sseq12d 3946	. 2 ⊢ (𝑥 = 𝑥𝑂 → ((bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)) ↔ (bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂))))
13		fvoveq1 7469	. . 3 ⊢ (𝑥 = 𝐴 → (bday‘(𝑥 +s 𝑦)) = (bday‘(𝐴 +s 𝑦)))
14		fveq2 6911	. . . 4 ⊢ (𝑥 = 𝐴 → (bday‘𝑥) = (bday‘𝐴))
15	14	oveq1d 7461	. . 3 ⊢ (𝑥 = 𝐴 → ((bday‘𝑥) +no (bday‘𝑦)) = ((bday‘𝐴) +no (bday‘𝑦)))
16	13, 15	sseq12d 3946	. 2 ⊢ (𝑥 = 𝐴 → ((bday‘(𝑥 +s 𝑦)) ⊆ ((bday‘𝑥) +no (bday‘𝑦)) ↔ (bday‘(𝐴 +s 𝑦)) ⊆ ((bday‘𝐴) +no (bday‘𝑦))))
17		oveq2 7454	. . . 4 ⊢ (𝑦 = 𝐵 → (𝐴 +s 𝑦) = (𝐴 +s 𝐵))
18	17	fveq2d 6915	. . 3 ⊢ (𝑦 = 𝐵 → (bday‘(𝐴 +s 𝑦)) = (bday‘(𝐴 +s 𝐵)))
19		fveq2 6911	. . . 4 ⊢ (𝑦 = 𝐵 → (bday‘𝑦) = (bday‘𝐵))
20	19	oveq2d 7462	. . 3 ⊢ (𝑦 = 𝐵 → ((bday‘𝐴) +no (bday‘𝑦)) = ((bday‘𝐴) +no (bday‘𝐵)))
21	18, 20	sseq12d 3946	. 2 ⊢ (𝑦 = 𝐵 → ((bday‘(𝐴 +s 𝑦)) ⊆ ((bday‘𝐴) +no (bday‘𝑦)) ↔ (bday‘(𝐴 +s 𝐵)) ⊆ ((bday‘𝐴) +no (bday‘𝐵))))
22		addsval2 28382	. . . . . 6 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (𝑥 +s 𝑦) = (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})))
23	22	fveq2d 6915	. . . . 5 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (bday‘(𝑥 +s 𝑦)) = (bday‘(({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))))
24	23	adantr 486	. . . 4 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday‘(𝑥 +s 𝑦)) = (bday‘(({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))))
25		simpl 488	. . . . . 6 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → 𝑥 ∈ No)
26		simpr 490	. . . . . 6 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → 𝑦 ∈ No)
27	25, 26	addcuts2 28398	. . . . 5 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → ({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) <<s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))
28		imaundi 6154	. . . . . . 7 ⊢ (bday “ (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∪ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) = ((bday “ ({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ∪ (bday “ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})))
29		imaundi 6154	. . . . . . . 8 ⊢ (bday “ ({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) = ((bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))
30		imaundi 6154	. . . . . . . 8 ⊢ (bday “ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) = ((bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))
31	29, 30	uneq12i 4168	. . . . . . 7 ⊢ ((bday “ ({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ∪ (bday “ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) = (((bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ∪ ((bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})))
32	28, 31	eqtri 2786	. . . . . 6 ⊢ (bday “ (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∪ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) = (((bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ∪ ((bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})))
33		simplr 781	. . . . . . . . . 10 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → 𝑦 ∈ No)
34		simpr2 1214	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)))
35		simplr 781	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → 𝑦 ∈ No)
36		leftssno 28292	. . . . . . . . . . . . . . . . . . 19 ⊢ (L‘𝑥) ⊆ No
37		rightssno 28293	. . . . . . . . . . . . . . . . . . 19 ⊢ (R‘𝑥) ⊆ No
38	36, 37	unssi 4192	. . . . . . . . . . . . . . . . . 18 ⊢ ((L‘𝑥) ∪ (R‘𝑥)) ⊆ No
39	38	sseli 3909	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥)) → 𝑥𝑂 ∈ No)
40	39	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → 𝑥𝑂 ∈ No)
41	35, 40	addscomd 28386	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → (𝑦 +s 𝑥𝑂) = (𝑥𝑂 +s 𝑦))
42	41	fveq2d 6915	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → (bday‘(𝑦 +s 𝑥𝑂)) = (bday‘(𝑥𝑂 +s 𝑦)))
43		bdayon 28171	. . . . . . . . . . . . . . . 16 ⊢ (bday‘𝑦) ∈ On
44		bdayon 28171	. . . . . . . . . . . . . . . 16 ⊢ (bday‘𝑥𝑂) ∈ On
45		naddcom 8723	. . . . . . . . . . . . . . . 16 ⊢ (((bday‘𝑦) ∈ On ∧ (bday‘𝑥𝑂) ∈ On) → ((bday‘𝑦) +no (bday‘𝑥𝑂)) = ((bday‘𝑥𝑂) +no (bday‘𝑦)))
46	43, 44, 45	mp2an 705	. . . . . . . . . . . . . . 15 ⊢ ((bday‘𝑦) +no (bday‘𝑥𝑂)) = ((bday‘𝑥𝑂) +no (bday‘𝑦))
47	46	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → ((bday‘𝑦) +no (bday‘𝑥𝑂)) = ((bday‘𝑥𝑂) +no (bday‘𝑦)))
48	42, 47	sseq12d 3946	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))) → ((bday‘(𝑦 +s 𝑥𝑂)) ⊆ ((bday‘𝑦) +no (bday‘𝑥𝑂)) ↔ (bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦))))
49	48	ralbidva 3187	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑦 +s 𝑥𝑂)) ⊆ ((bday‘𝑦) +no (bday‘𝑥𝑂)) ↔ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦))))
50	49	adantr 486	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑦 +s 𝑥𝑂)) ⊆ ((bday‘𝑦) +no (bday‘𝑥𝑂)) ↔ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦))))
51	34, 50	mpbird 260	. . . . . . . . . 10 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑦 +s 𝑥𝑂)) ⊆ ((bday‘𝑦) +no (bday‘𝑥𝑂)))
52		ssun1 4179	. . . . . . . . . 10 ⊢ (L‘𝑥) ⊆ ((L‘𝑥) ∪ (R‘𝑥))
53	33, 51, 52	addbdaylem 28436	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑦 +s 𝑥𝐿)}) ⊆ ((bday‘𝑦) +no (bday‘𝑥)))
54	36	sseli 3909	. . . . . . . . . . . . . . . 16 ⊢ (𝑥𝐿 ∈ (L‘𝑥) → 𝑥𝐿 ∈ No)
55	54	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝐿 ∈ (L‘𝑥)) → 𝑥𝐿 ∈ No)
56		simplr 781	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝐿 ∈ (L‘𝑥)) → 𝑦 ∈ No)
57	55, 56	addscomd 28386	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝐿 ∈ (L‘𝑥)) → (𝑥𝐿 +s 𝑦) = (𝑦 +s 𝑥𝐿))
58	57	eqeq2d 2774	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝐿 ∈ (L‘𝑥)) → (𝑧 = (𝑥𝐿 +s 𝑦) ↔ 𝑧 = (𝑦 +s 𝑥𝐿)))
59	58	rexbidva 3188	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦) ↔ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑦 +s 𝑥𝐿)))
60	59	abbidv 2829	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} = {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑦 +s 𝑥𝐿)})
61	60	imaeq2d 6065	. . . . . . . . . 10 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) = (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑦 +s 𝑥𝐿)}))
62	61	adantr 486	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) = (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑦 +s 𝑥𝐿)}))
63		bdayon 28171	. . . . . . . . . . 11 ⊢ (bday‘𝑥) ∈ On
64		naddcom 8723	. . . . . . . . . . 11 ⊢ (((bday‘𝑥) ∈ On ∧ (bday‘𝑦) ∈ On) → ((bday‘𝑥) +no (bday‘𝑦)) = ((bday‘𝑦) +no (bday‘𝑥)))
65	63, 43, 64	mp2an 705	. . . . . . . . . 10 ⊢ ((bday‘𝑥) +no (bday‘𝑦)) = ((bday‘𝑦) +no (bday‘𝑥))
66	65	a1i 11	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ((bday‘𝑥) +no (bday‘𝑦)) = ((bday‘𝑦) +no (bday‘𝑥)))
67	53, 62, 66	3sstr4d 3968	. . . . . . . 8 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
68		simpll 779	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → 𝑥 ∈ No)
69		simpr3 1215	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))
70		ssun1 4179	. . . . . . . . 9 ⊢ (L‘𝑦) ⊆ ((L‘𝑦) ∪ (R‘𝑦))
71	68, 69, 70	addbdaylem 28436	. . . . . . . 8 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
72	67, 71	unssd 4193	. . . . . . 7 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ((bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
73		ssun2 4180	. . . . . . . . . 10 ⊢ (R‘𝑥) ⊆ ((L‘𝑥) ∪ (R‘𝑥))
74	33, 51, 73	addbdaylem 28436	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑦 +s 𝑥𝑅)}) ⊆ ((bday‘𝑦) +no (bday‘𝑥)))
75	37	sseli 3909	. . . . . . . . . . . . . . . 16 ⊢ (𝑥𝑅 ∈ (R‘𝑥) → 𝑥𝑅 ∈ No)
76	75	adantl 487	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑅 ∈ (R‘𝑥)) → 𝑥𝑅 ∈ No)
77		simplr 781	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑅 ∈ (R‘𝑥)) → 𝑦 ∈ No)
78	76, 77	addscomd 28386	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑅 ∈ (R‘𝑥)) → (𝑥𝑅 +s 𝑦) = (𝑦 +s 𝑥𝑅))
79	78	eqeq2d 2774	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ 𝑥𝑅 ∈ (R‘𝑥)) → (𝑧 = (𝑥𝑅 +s 𝑦) ↔ 𝑧 = (𝑦 +s 𝑥𝑅)))
80	79	rexbidva 3188	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦) ↔ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑦 +s 𝑥𝑅)))
81	80	abbidv 2829	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} = {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑦 +s 𝑥𝑅)})
82	81	imaeq2d 6065	. . . . . . . . . 10 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) = (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑦 +s 𝑥𝑅)}))
83	82	adantr 486	. . . . . . . . 9 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) = (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑦 +s 𝑥𝑅)}))
84	74, 83, 66	3sstr4d 3968	. . . . . . . 8 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
85		ssun2 4180	. . . . . . . . 9 ⊢ (R‘𝑦) ⊆ ((L‘𝑦) ∪ (R‘𝑦))
86	68, 69, 85	addbdaylem 28436	. . . . . . . 8 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
87	84, 86	unssd 4193	. . . . . . 7 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → ((bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
88	72, 87	unssd 4193	. . . . . 6 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (((bday “ {𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)})) ∪ ((bday “ {𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)}) ∪ (bday “ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
89	32, 88	eqsstrid 3951	. . . . 5 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday “ (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∪ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
90		naddcl 8717	. . . . . . 7 ⊢ (((bday‘𝑥) ∈ On ∧ (bday‘𝑦) ∈ On) → ((bday‘𝑥) +no (bday‘𝑦)) ∈ On)
91	63, 43, 90	mp2an 705	. . . . . 6 ⊢ ((bday‘𝑥) +no (bday‘𝑦)) ∈ On
92		cutbdaybnd 28214	. . . . . 6 ⊢ ((({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) <<s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∧ ((bday‘𝑥) +no (bday‘𝑦)) ∈ On ∧ (bday “ (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∪ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦))) → (bday‘(({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
93	91, 92	mp3an2 1479	. . . . 5 ⊢ ((({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) <<s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∧ (bday “ (({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) ∪ ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦))) → (bday‘(({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
94	27, 89, 93	syl2an2r 698	. . . 4 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday‘(({𝑧 ∣ ∃𝑥𝐿 ∈ (L‘𝑥)𝑧 = (𝑥𝐿 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (L‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}) |s ({𝑧 ∣ ∃𝑥𝑅 ∈ (R‘𝑥)𝑧 = (𝑥𝑅 +s 𝑦)} ∪ {𝑧 ∣ ∃𝑦𝐿 ∈ (R‘𝑦)𝑧 = (𝑥 +s 𝑦𝐿)}))) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
95	24, 94	eqsstrd 3947	. . 3 ⊢ (((𝑥 ∈ No ∧ 𝑦 ∈ No) ∧ (∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂)))) → (bday‘(𝑥 +s 𝑦)) ⊆ ((bday‘𝑥) +no (bday‘𝑦)))
96	95	ex 418	. 2 ⊢ ((𝑥 ∈ No ∧ 𝑦 ∈ No) → ((∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥𝑂 +s 𝑦𝑂)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦𝑂)) ∧ ∀𝑥𝑂 ∈ ((L‘𝑥) ∪ (R‘𝑥))(bday‘(𝑥𝑂 +s 𝑦)) ⊆ ((bday‘𝑥𝑂) +no (bday‘𝑦)) ∧ ∀𝑦𝑂 ∈ ((L‘𝑦) ∪ (R‘𝑦))(bday‘(𝑥 +s 𝑦𝑂)) ⊆ ((bday‘𝑥) +no (bday‘𝑦𝑂))) → (bday‘(𝑥 +s 𝑦)) ⊆ ((bday‘𝑥) +no (bday‘𝑦))))
97	4, 9, 12, 16, 21, 96	no2inds 28374	1 ⊢ ((𝐴 ∈ No ∧ 𝐵 ∈ No) → (bday‘(𝐴 +s 𝐵)) ⊆ ((bday‘𝐴) +no (bday‘𝐵)))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147  {cab 2741  ∀wral 3080  ∃wrex 3090   ⊆ wss 3900   ∪ cun 4152   class class class wbr 5106   “ cima 5659  Oncon0 6383  ‘cfv 6561  (class class class)co 7446   +no cnadd 8705  Nocsur 28030  bdaycbday 28032   <<s cslts 28176   |s ccuts 28178  Lcleft 28244  Rcright 28245   +_s cadds 28378

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5236  ax-sep 5253  ax-nul 5264  ax-pow 5332  ax-pr 5396  ax-un 7778

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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-br 5107  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5551  df-eprel 5556  df-po 5564  df-so 5565  df-fr 5609  df-se 5610  df-we 5611  df-xp 5662  df-rel 5663  df-cnv 5664  df-co 5665  df-dm 5666  df-rn 5667  df-res 5668  df-ima 5669  df-pred 6325  df-ord 6386  df-on 6387  df-suc 6389  df-iota 6515  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-riota 7403  df-ov 7449  df-oprab 7450  df-mpo 7451  df-1st 8028  df-2nd 8029  df-frecs 8330  df-wrecs 8361  df-recs 8410  df-1o 8507  df-2o 8508  df-nadd 8706  df-no 28033  df-lts 28034  df-bday 28035  df-slts 28177  df-cuts 28179  df-0s 28226  df-made 28246  df-old 28247  df-left 28249  df-right 28250  df-norec2 28368  df-adds 28379

This theorem is used by:  addonbday  28698  bdaypw2bnd  28884  z12bdaylem2  28890  z12bdaylem  28903