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

Theorem noextendlt 27161
Description: Extending a surreal with a negative sign results in a smaller surreal. (Contributed by Scott Fenton, 22-Nov-2021.)
Assertion
Ref Expression
noextendlt (𝐴 No → (𝐴 ∪ {⟨dom 𝐴, 1o⟩}) <s 𝐴)

Proof of Theorem noextendlt
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 nofun 27141 . . . . . . . . 9 (𝐴 No → Fun 𝐴)
2 funfn 6575 . . . . . . . . 9 (Fun 𝐴𝐴 Fn dom 𝐴)
31, 2sylib 217 . . . . . . . 8 (𝐴 No 𝐴 Fn dom 𝐴)
4 nodmon 27142 . . . . . . . . 9 (𝐴 No → dom 𝐴 ∈ On)
5 1on 8474 . . . . . . . . 9 1o ∈ On
6 fnsng 6597 . . . . . . . . 9 ((dom 𝐴 ∈ On ∧ 1o ∈ On) → {⟨dom 𝐴, 1o⟩} Fn {dom 𝐴})
74, 5, 6sylancl 586 . . . . . . . 8 (𝐴 No → {⟨dom 𝐴, 1o⟩} Fn {dom 𝐴})
8 nodmord 27145 . . . . . . . . . 10 (𝐴 No → Ord dom 𝐴)
9 ordirr 6379 . . . . . . . . . 10 (Ord dom 𝐴 → ¬ dom 𝐴 ∈ dom 𝐴)
108, 9syl 17 . . . . . . . . 9 (𝐴 No → ¬ dom 𝐴 ∈ dom 𝐴)
11 disjsn 4714 . . . . . . . . 9 ((dom 𝐴 ∩ {dom 𝐴}) = ∅ ↔ ¬ dom 𝐴 ∈ dom 𝐴)
1210, 11sylibr 233 . . . . . . . 8 (𝐴 No → (dom 𝐴 ∩ {dom 𝐴}) = ∅)
13 snidg 4661 . . . . . . . . 9 (dom 𝐴 ∈ On → dom 𝐴 ∈ {dom 𝐴})
144, 13syl 17 . . . . . . . 8 (𝐴 No → dom 𝐴 ∈ {dom 𝐴})
15 fvun2 6980 . . . . . . . 8 ((𝐴 Fn dom 𝐴 ∧ {⟨dom 𝐴, 1o⟩} Fn {dom 𝐴} ∧ ((dom 𝐴 ∩ {dom 𝐴}) = ∅ ∧ dom 𝐴 ∈ {dom 𝐴})) → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = ({⟨dom 𝐴, 1o⟩}‘dom 𝐴))
163, 7, 12, 14, 15syl112anc 1374 . . . . . . 7 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = ({⟨dom 𝐴, 1o⟩}‘dom 𝐴))
17 fvsng 7174 . . . . . . . 8 ((dom 𝐴 ∈ On ∧ 1o ∈ On) → ({⟨dom 𝐴, 1o⟩}‘dom 𝐴) = 1o)
184, 5, 17sylancl 586 . . . . . . 7 (𝐴 No → ({⟨dom 𝐴, 1o⟩}‘dom 𝐴) = 1o)
1916, 18eqtrd 2772 . . . . . 6 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o)
20 ndmfv 6923 . . . . . . 7 (¬ dom 𝐴 ∈ dom 𝐴 → (𝐴‘dom 𝐴) = ∅)
2110, 20syl 17 . . . . . 6 (𝐴 No → (𝐴‘dom 𝐴) = ∅)
2219, 21jca 512 . . . . 5 (𝐴 No → (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o ∧ (𝐴‘dom 𝐴) = ∅))
23223mix1d 1336 . . . 4 (𝐴 No → ((((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o ∧ (𝐴‘dom 𝐴) = ∅) ∨ (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o ∧ (𝐴‘dom 𝐴) = 2o) ∨ (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = ∅ ∧ (𝐴‘dom 𝐴) = 2o)))
24 fvex 6901 . . . . 5 ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) ∈ V
25 fvex 6901 . . . . 5 (𝐴‘dom 𝐴) ∈ V
2624, 25brtp 5522 . . . 4 (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴){⟨1o, ∅⟩, ⟨1o, 2o⟩, ⟨∅, 2o⟩} (𝐴‘dom 𝐴) ↔ ((((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o ∧ (𝐴‘dom 𝐴) = ∅) ∨ (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = 1o ∧ (𝐴‘dom 𝐴) = 2o) ∨ (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴) = ∅ ∧ (𝐴‘dom 𝐴) = 2o)))
2723, 26sylibr 233 . . 3 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴){⟨1o, ∅⟩, ⟨1o, 2o⟩, ⟨∅, 2o⟩} (𝐴‘dom 𝐴))
28 necom 2994 . . . . . . 7 (((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥) ↔ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥))
2928rabbii 3438 . . . . . 6 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)} = {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥)}
3029inteqi 4953 . . . . 5 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)} = {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥)}
31 1oex 8472 . . . . . . 7 1o ∈ V
3231prid1 4765 . . . . . 6 1o ∈ {1o, 2o}
3332noextenddif 27160 . . . . 5 (𝐴 No {𝑥 ∈ On ∣ (𝐴𝑥) ≠ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥)} = dom 𝐴)
3430, 33eqtrid 2784 . . . 4 (𝐴 No {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)} = dom 𝐴)
3534fveq2d 6892 . . 3 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘ {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}) = ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘dom 𝐴))
3634fveq2d 6892 . . 3 (𝐴 No → (𝐴 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}) = (𝐴‘dom 𝐴))
3727, 35, 363brtr4d 5179 . 2 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘ {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}){⟨1o, ∅⟩, ⟨1o, 2o⟩, ⟨∅, 2o⟩} (𝐴 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}))
3832noextend 27158 . . 3 (𝐴 No → (𝐴 ∪ {⟨dom 𝐴, 1o⟩}) ∈ No )
39 sltval2 27148 . . 3 (((𝐴 ∪ {⟨dom 𝐴, 1o⟩}) ∈ No 𝐴 No ) → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩}) <s 𝐴 ↔ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘ {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}){⟨1o, ∅⟩, ⟨1o, 2o⟩, ⟨∅, 2o⟩} (𝐴 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)})))
4038, 39mpancom 686 . 2 (𝐴 No → ((𝐴 ∪ {⟨dom 𝐴, 1o⟩}) <s 𝐴 ↔ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘ {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)}){⟨1o, ∅⟩, ⟨1o, 2o⟩, ⟨∅, 2o⟩} (𝐴 {𝑥 ∈ On ∣ ((𝐴 ∪ {⟨dom 𝐴, 1o⟩})‘𝑥) ≠ (𝐴𝑥)})))
4137, 40mpbird 256 1 (𝐴 No → (𝐴 ∪ {⟨dom 𝐴, 1o⟩}) <s 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396  w3o 1086   = wceq 1541  wcel 2106  wne 2940  {crab 3432  cun 3945  cin 3946  c0 4321  {csn 4627  {ctp 4631  cop 4633   cint 4949   class class class wbr 5147  dom cdm 5675  Ord word 6360  Oncon0 6361  Fun wfun 6534   Fn wfn 6535  cfv 6540  1oc1o 8455  2oc2o 8456   No csur 27132   <s cslt 27133
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 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pr 5426  ax-un 7721
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 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-tp 4632  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-ord 6364  df-on 6365  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-1o 8462  df-2o 8463  df-no 27135  df-slt 27136
This theorem is referenced by:  noinfbnd1  27221
  Copyright terms: Public domain W3C validator