Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  noextenddif Structured version   Visualization version   GIF version

Theorem noextenddif 32784
Description: Calculate the place where a surreal and its extension differ. (Contributed by Scott Fenton, 22-Nov-2021.)
Hypothesis
Ref Expression
noextend.1 𝑋 ∈ {1o, 2o}
Assertion
Ref Expression
noextenddif (𝐴 No {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)} = dom 𝐴)
Distinct variable groups:   𝑥,𝐴   𝑥,𝑋

Proof of Theorem noextenddif
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 nodmon 32766 . . 3 (𝐴 No → dom 𝐴 ∈ On)
2 noextend.1 . . . . . 6 𝑋 ∈ {1o, 2o}
32nosgnn0i 32775 . . . . 5 ∅ ≠ 𝑋
43a1i 11 . . . 4 (𝐴 No → ∅ ≠ 𝑋)
5 nodmord 32769 . . . . . 6 (𝐴 No → Ord dom 𝐴)
6 ordirr 6084 . . . . . 6 (Ord dom 𝐴 → ¬ dom 𝐴 ∈ dom 𝐴)
75, 6syl 17 . . . . 5 (𝐴 No → ¬ dom 𝐴 ∈ dom 𝐴)
8 ndmfv 6568 . . . . 5 (¬ dom 𝐴 ∈ dom 𝐴 → (𝐴‘dom 𝐴) = ∅)
97, 8syl 17 . . . 4 (𝐴 No → (𝐴‘dom 𝐴) = ∅)
10 nofun 32765 . . . . . . 7 (𝐴 No → Fun 𝐴)
11 funfn 6255 . . . . . . 7 (Fun 𝐴𝐴 Fn dom 𝐴)
1210, 11sylib 219 . . . . . 6 (𝐴 No 𝐴 Fn dom 𝐴)
13 fnsng 6276 . . . . . . 7 ((dom 𝐴 ∈ On ∧ 𝑋 ∈ {1o, 2o}) → {⟨dom 𝐴, 𝑋⟩} Fn {dom 𝐴})
141, 2, 13sylancl 586 . . . . . 6 (𝐴 No → {⟨dom 𝐴, 𝑋⟩} Fn {dom 𝐴})
15 disjsn 4554 . . . . . . 7 ((dom 𝐴 ∩ {dom 𝐴}) = ∅ ↔ ¬ dom 𝐴 ∈ dom 𝐴)
167, 15sylibr 235 . . . . . 6 (𝐴 No → (dom 𝐴 ∩ {dom 𝐴}) = ∅)
17 snidg 4504 . . . . . . 7 (dom 𝐴 ∈ On → dom 𝐴 ∈ {dom 𝐴})
181, 17syl 17 . . . . . 6 (𝐴 No → dom 𝐴 ∈ {dom 𝐴})
19 fvun2 6622 . . . . . 6 ((𝐴 Fn dom 𝐴 ∧ {⟨dom 𝐴, 𝑋⟩} Fn {dom 𝐴} ∧ ((dom 𝐴 ∩ {dom 𝐴}) = ∅ ∧ dom 𝐴 ∈ {dom 𝐴})) → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴) = ({⟨dom 𝐴, 𝑋⟩}‘dom 𝐴))
2012, 14, 16, 18, 19syl112anc 1367 . . . . 5 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴) = ({⟨dom 𝐴, 𝑋⟩}‘dom 𝐴))
21 fvsng 6805 . . . . . 6 ((dom 𝐴 ∈ On ∧ 𝑋 ∈ {1o, 2o}) → ({⟨dom 𝐴, 𝑋⟩}‘dom 𝐴) = 𝑋)
221, 2, 21sylancl 586 . . . . 5 (𝐴 No → ({⟨dom 𝐴, 𝑋⟩}‘dom 𝐴) = 𝑋)
2320, 22eqtrd 2831 . . . 4 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴) = 𝑋)
244, 9, 233netr4d 3061 . . 3 (𝐴 No → (𝐴‘dom 𝐴) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴))
25 fveq2 6538 . . . . 5 (𝑥 = dom 𝐴 → (𝐴𝑥) = (𝐴‘dom 𝐴))
26 fveq2 6538 . . . . 5 (𝑥 = dom 𝐴 → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥) = ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴))
2725, 26neeq12d 3045 . . . 4 (𝑥 = dom 𝐴 → ((𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥) ↔ (𝐴‘dom 𝐴) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴)))
2827onintss 6116 . . 3 (dom 𝐴 ∈ On → ((𝐴‘dom 𝐴) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘dom 𝐴) → {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)} ⊆ dom 𝐴))
291, 24, 28sylc 65 . 2 (𝐴 No {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)} ⊆ dom 𝐴)
30 eloni 6076 . . . . . . . 8 (𝑦 ∈ On → Ord 𝑦)
31 ordtri2 6101 . . . . . . . . . 10 ((Ord 𝑦 ∧ Ord dom 𝐴) → (𝑦 ∈ dom 𝐴 ↔ ¬ (𝑦 = dom 𝐴 ∨ dom 𝐴𝑦)))
32 eqcom 2802 . . . . . . . . . . . . 13 (𝑦 = dom 𝐴 ↔ dom 𝐴 = 𝑦)
3332orbi1i 908 . . . . . . . . . . . 12 ((𝑦 = dom 𝐴 ∨ dom 𝐴𝑦) ↔ (dom 𝐴 = 𝑦 ∨ dom 𝐴𝑦))
34 orcom 865 . . . . . . . . . . . 12 ((dom 𝐴 = 𝑦 ∨ dom 𝐴𝑦) ↔ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦))
3533, 34bitri 276 . . . . . . . . . . 11 ((𝑦 = dom 𝐴 ∨ dom 𝐴𝑦) ↔ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦))
3635notbii 321 . . . . . . . . . 10 (¬ (𝑦 = dom 𝐴 ∨ dom 𝐴𝑦) ↔ ¬ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦))
3731, 36syl6bb 288 . . . . . . . . 9 ((Ord 𝑦 ∧ Ord dom 𝐴) → (𝑦 ∈ dom 𝐴 ↔ ¬ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦)))
38 ordsseleq 6095 . . . . . . . . . . 11 ((Ord dom 𝐴 ∧ Ord 𝑦) → (dom 𝐴𝑦 ↔ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦)))
3938notbid 319 . . . . . . . . . 10 ((Ord dom 𝐴 ∧ Ord 𝑦) → (¬ dom 𝐴𝑦 ↔ ¬ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦)))
4039ancoms 459 . . . . . . . . 9 ((Ord 𝑦 ∧ Ord dom 𝐴) → (¬ dom 𝐴𝑦 ↔ ¬ (dom 𝐴𝑦 ∨ dom 𝐴 = 𝑦)))
4137, 40bitr4d 283 . . . . . . . 8 ((Ord 𝑦 ∧ Ord dom 𝐴) → (𝑦 ∈ dom 𝐴 ↔ ¬ dom 𝐴𝑦))
4230, 5, 41syl2anr 596 . . . . . . 7 ((𝐴 No 𝑦 ∈ On) → (𝑦 ∈ dom 𝐴 ↔ ¬ dom 𝐴𝑦))
43123ad2ant1 1126 . . . . . . . . . 10 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → 𝐴 Fn dom 𝐴)
44143ad2ant1 1126 . . . . . . . . . 10 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → {⟨dom 𝐴, 𝑋⟩} Fn {dom 𝐴})
45163ad2ant1 1126 . . . . . . . . . 10 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → (dom 𝐴 ∩ {dom 𝐴}) = ∅)
46 simp3 1131 . . . . . . . . . 10 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → 𝑦 ∈ dom 𝐴)
47 fvun1 6621 . . . . . . . . . 10 ((𝐴 Fn dom 𝐴 ∧ {⟨dom 𝐴, 𝑋⟩} Fn {dom 𝐴} ∧ ((dom 𝐴 ∩ {dom 𝐴}) = ∅ ∧ 𝑦 ∈ dom 𝐴)) → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦) = (𝐴𝑦))
4843, 44, 45, 46, 47syl112anc 1367 . . . . . . . . 9 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦) = (𝐴𝑦))
4948eqcomd 2801 . . . . . . . 8 ((𝐴 No 𝑦 ∈ On ∧ 𝑦 ∈ dom 𝐴) → (𝐴𝑦) = ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦))
50493expia 1114 . . . . . . 7 ((𝐴 No 𝑦 ∈ On) → (𝑦 ∈ dom 𝐴 → (𝐴𝑦) = ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦)))
5142, 50sylbird 261 . . . . . 6 ((𝐴 No 𝑦 ∈ On) → (¬ dom 𝐴𝑦 → (𝐴𝑦) = ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦)))
5251necon1ad 3001 . . . . 5 ((𝐴 No 𝑦 ∈ On) → ((𝐴𝑦) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦) → dom 𝐴𝑦))
5352ralrimiva 3149 . . . 4 (𝐴 No → ∀𝑦 ∈ On ((𝐴𝑦) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦) → dom 𝐴𝑦))
54 fveq2 6538 . . . . . 6 (𝑥 = 𝑦 → (𝐴𝑥) = (𝐴𝑦))
55 fveq2 6538 . . . . . 6 (𝑥 = 𝑦 → ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥) = ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦))
5654, 55neeq12d 3045 . . . . 5 (𝑥 = 𝑦 → ((𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥) ↔ (𝐴𝑦) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦)))
5756ralrab 3623 . . . 4 (∀𝑦 ∈ {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)}dom 𝐴𝑦 ↔ ∀𝑦 ∈ On ((𝐴𝑦) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑦) → dom 𝐴𝑦))
5853, 57sylibr 235 . . 3 (𝐴 No → ∀𝑦 ∈ {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)}dom 𝐴𝑦)
59 ssint 4798 . . 3 (dom 𝐴 {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)} ↔ ∀𝑦 ∈ {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)}dom 𝐴𝑦)
6058, 59sylibr 235 . 2 (𝐴 No → dom 𝐴 {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)})
6129, 60eqssd 3906 1 (𝐴 No {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 𝑋⟩})‘𝑥)} = dom 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  wo 842  w3a 1080   = wceq 1522  wcel 2081  wne 2984  wral 3105  {crab 3109  cun 3857  cin 3858  wss 3859  c0 4211  {csn 4472  {cpr 4474  cop 4478   cint 4782  dom cdm 5443  Ord word 6065  Oncon0 6066  Fun wfun 6219   Fn wfn 6220  cfv 6225  1oc1o 7946  2oc2o 7947   No csur 32756
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-ral 3110  df-rex 3111  df-reu 3112  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-sn 4473  df-pr 4475  df-op 4479  df-uni 4746  df-int 4783  df-iun 4827  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-ord 6069  df-on 6070  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-1o 7953  df-2o 7954  df-no 32759
This theorem is referenced by:  noextendlt  32785  noextendgt  32786
  Copyright terms: Public domain W3C validator