MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  nosupbday Structured version   Visualization version   GIF version

Theorem nosupbday 27053
Description: Birthday bounding law for surreal supremum. (Contributed by Scott Fenton, 5-Dec-2021.)
Hypothesis
Ref Expression
nosupbday.1 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
Assertion
Ref Expression
nosupbday (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → ( bday 𝑆) ⊆ 𝑂)
Distinct variable groups:   𝐴,𝑔,𝑢,𝑣,𝑥,𝑦   𝑢,𝑂,𝑦
Allowed substitution hints:   𝑆(𝑥,𝑦,𝑣,𝑢,𝑔)   𝑂(𝑥,𝑣,𝑔)

Proof of Theorem nosupbday
StepHypRef Expression
1 nosupbday.1 . . . . 5 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
21nosupno 27051 . . . 4 ((𝐴 No 𝐴 ∈ V) → 𝑆 No )
32adantr 481 . . 3 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → 𝑆 No )
4 bdayval 26996 . . 3 (𝑆 No → ( bday 𝑆) = dom 𝑆)
53, 4syl 17 . 2 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → ( bday 𝑆) = dom 𝑆)
6 iftrue 4492 . . . . . . . 8 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)))) = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
71, 6eqtrid 2788 . . . . . . 7 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦𝑆 = ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
87dmeqd 5861 . . . . . 6 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}))
9 2oex 8423 . . . . . . . . 9 2o ∈ V
109dmsnop 6168 . . . . . . . 8 dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩} = {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)}
1110uneq2i 4120 . . . . . . 7 (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)})
12 dmun 5866 . . . . . . 7 dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ dom {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩})
13 df-suc 6323 . . . . . . 7 suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) = (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)})
1411, 12, 133eqtr4i 2774 . . . . . 6 dom ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}) = suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
158, 14eqtrdi 2792 . . . . 5 (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
1615adantr 481 . . . 4 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → dom 𝑆 = suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
17 simprrl 779 . . . . . 6 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → 𝑂 ∈ On)
18 eloni 6327 . . . . . 6 (𝑂 ∈ On → Ord 𝑂)
1917, 18syl 17 . . . . 5 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → Ord 𝑂)
20 simprll 777 . . . . . . . 8 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → 𝐴 No )
21 simpl 483 . . . . . . . . . . 11 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 No 𝐴 ∈ V)) → ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
22 nomaxmo 27046 . . . . . . . . . . . . 13 (𝐴 No → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
2322adantr 481 . . . . . . . . . . . 12 ((𝐴 No 𝐴 ∈ V) → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
2423adantl 482 . . . . . . . . . . 11 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 No 𝐴 ∈ V)) → ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
25 reu5 3355 . . . . . . . . . . 11 (∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ↔ (∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ∃*𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
2621, 24, 25sylanbrc 583 . . . . . . . . . 10 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ (𝐴 No 𝐴 ∈ V)) → ∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
2726adantrr 715 . . . . . . . . 9 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → ∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)
28 riotacl 7331 . . . . . . . . 9 (∃!𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ 𝐴)
2927, 28syl 17 . . . . . . . 8 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ 𝐴)
3020, 29sseldd 3945 . . . . . . 7 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ No )
31 bdayval 26996 . . . . . . 7 ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ No → ( bday ‘(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) = dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
3230, 31syl 17 . . . . . 6 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → ( bday ‘(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) = dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦))
33 simprrr 780 . . . . . . 7 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → ( bday 𝐴) ⊆ 𝑂)
34 bdayfo 27025 . . . . . . . . 9 bday : No onto→On
35 fofn 6758 . . . . . . . . 9 ( bday : No onto→On → bday Fn No )
3634, 35ax-mp 5 . . . . . . . 8 bday Fn No
37 fnfvima 7183 . . . . . . . 8 (( bday Fn No 𝐴 No ∧ (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ 𝐴) → ( bday ‘(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) ∈ ( bday 𝐴))
3836, 20, 29, 37mp3an2i 1466 . . . . . . 7 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → ( bday ‘(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) ∈ ( bday 𝐴))
3933, 38sseldd 3945 . . . . . 6 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → ( bday ‘(𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦)) ∈ 𝑂)
4032, 39eqeltrrd 2839 . . . . 5 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ 𝑂)
41 ordsucss 7753 . . . . 5 (Ord 𝑂 → (dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∈ 𝑂 → suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ⊆ 𝑂))
4219, 40, 41sylc 65 . . . 4 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → suc dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ⊆ 𝑂)
4316, 42eqsstrd 3982 . . 3 ((∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → dom 𝑆𝑂)
44 iffalse 4495 . . . . . . . 8 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)))) = (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
451, 44eqtrid 2788 . . . . . . 7 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦𝑆 = (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
4645dmeqd 5861 . . . . . 6 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = dom (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
47 iotaex 6469 . . . . . . 7 (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)) ∈ V
48 eqid 2736 . . . . . . 7 (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))) = (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥)))
4947, 48dmmpti 6645 . . . . . 6 dom (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))) = {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))}
5046, 49eqtrdi 2792 . . . . 5 (¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 → dom 𝑆 = {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))})
5150adantr 481 . . . 4 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → dom 𝑆 = {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))})
52 simplrl 775 . . . . . . . . . 10 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → 𝑂 ∈ On)
53 ssel2 3939 . . . . . . . . . . . . 13 ((𝐴 No 𝑢𝐴) → 𝑢 No )
5453ad4ant14 750 . . . . . . . . . . . 12 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → 𝑢 No )
55 bdayval 26996 . . . . . . . . . . . 12 (𝑢 No → ( bday 𝑢) = dom 𝑢)
5654, 55syl 17 . . . . . . . . . . 11 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → ( bday 𝑢) = dom 𝑢)
57 simplrr 776 . . . . . . . . . . . 12 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → ( bday 𝐴) ⊆ 𝑂)
58 fnfvima 7183 . . . . . . . . . . . . . 14 (( bday Fn No 𝐴 No 𝑢𝐴) → ( bday 𝑢) ∈ ( bday 𝐴))
5936, 58mp3an1 1448 . . . . . . . . . . . . 13 ((𝐴 No 𝑢𝐴) → ( bday 𝑢) ∈ ( bday 𝐴))
6059ad4ant14 750 . . . . . . . . . . . 12 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → ( bday 𝑢) ∈ ( bday 𝐴))
6157, 60sseldd 3945 . . . . . . . . . . 11 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → ( bday 𝑢) ∈ 𝑂)
6256, 61eqeltrrd 2839 . . . . . . . . . 10 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → dom 𝑢𝑂)
63 onelss 6359 . . . . . . . . . 10 (𝑂 ∈ On → (dom 𝑢𝑂 → dom 𝑢𝑂))
6452, 62, 63sylc 65 . . . . . . . . 9 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → dom 𝑢𝑂)
6564sseld 3943 . . . . . . . 8 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → (𝑦 ∈ dom 𝑢𝑦𝑂))
6665adantrd 492 . . . . . . 7 ((((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) ∧ 𝑢𝐴) → ((𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦))) → 𝑦𝑂))
6766rexlimdva 3152 . . . . . 6 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → (∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦))) → 𝑦𝑂))
6867abssdv 4025 . . . . 5 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ⊆ 𝑂)
6968adantl 482 . . . 4 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ⊆ 𝑂)
7051, 69eqsstrd 3982 . . 3 ((¬ ∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦 ∧ ((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂))) → dom 𝑆𝑂)
7143, 70pm2.61ian 810 . 2 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → dom 𝑆𝑂)
725, 71eqsstrd 3982 1 (((𝐴 No 𝐴 ∈ V) ∧ (𝑂 ∈ On ∧ ( bday 𝐴) ⊆ 𝑂)) → ( bday 𝑆) ⊆ 𝑂)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  w3a 1087   = wceq 1541  wcel 2106  {cab 2713  wral 3064  wrex 3073  ∃!wreu 3351  ∃*wrmo 3352  Vcvv 3445  cun 3908  wss 3910  ifcif 4486  {csn 4586  cop 4592   class class class wbr 5105  cmpt 5188  dom cdm 5633  cres 5635  cima 5636  Ord word 6316  Oncon0 6317  suc csuc 6319  cio 6446   Fn wfn 6491  ontowfo 6494  cfv 6496  crio 7312  2oc2o 8406   No csur 26988   <s cslt 26989   bday cbday 26990
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pr 5384  ax-un 7672
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-tp 4591  df-op 4593  df-uni 4866  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-ord 6320  df-on 6321  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-riota 7313  df-1o 8412  df-2o 8413  df-no 26991  df-slt 26992  df-bday 26993
This theorem is referenced by:  noetalem1  27089
  Copyright terms: Public domain W3C validator