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

Theorem zscut 28419
Description: A cut expression for surreal integers. (Contributed by Scott Fenton, 20-Aug-2025.)
Assertion
Ref Expression
zscut (𝐴 ∈ ℤs𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))

Proof of Theorem zscut
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elzn0s 28410 . 2 (𝐴 ∈ ℤs ↔ (𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)))
2 n0scut 28364 . . . . 5 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s ∅))
3 n0sno 28354 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 No )
4 1sno 27898 . . . . . . . . 9 1s No
54a1i 11 . . . . . . . 8 (𝐴 ∈ ℕ0s → 1s No )
63, 5subscld 28119 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ∈ No )
7 snelpwi 5457 . . . . . . 7 ((𝐴 -s 1s ) ∈ No → {(𝐴 -s 1s )} ∈ 𝒫 No )
8 nulssgt 27869 . . . . . . 7 ({(𝐴 -s 1s )} ∈ 𝒫 No → {(𝐴 -s 1s )} <<s ∅)
96, 7, 83syl 18 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s ∅)
10 slerflex 27834 . . . . . . . 8 ((𝐴 -s 1s ) ∈ No → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
116, 10syl 17 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
12 ovex 7471 . . . . . . . . 9 (𝐴 -s 1s ) ∈ V
13 breq1 5154 . . . . . . . . . 10 (𝑥 = (𝐴 -s 1s ) → (𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s 𝑦))
1413rexbidv 3179 . . . . . . . . 9 (𝑥 = (𝐴 -s 1s ) → (∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦))
1512, 14ralsn 4689 . . . . . . . 8 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦)
16 breq2 5155 . . . . . . . . 9 (𝑦 = (𝐴 -s 1s ) → ((𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s )))
1712, 16rexsn 4690 . . . . . . . 8 (∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
1815, 17bitri 275 . . . . . . 7 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
1911, 18sylibr 234 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦)
20 ral0 4522 . . . . . . 7 𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥
2120a1i 11 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥)
223sltm1d 28157 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) <s 𝐴)
236, 3, 22ssltsn 27863 . . . . . . 7 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {𝐴})
242sneqd 4646 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} = {({(𝐴 -s 1s )} |s ∅)})
2523, 24breqtrd 5177 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {({(𝐴 -s 1s )} |s ∅)})
263, 5addscld 28039 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 +s 1s ) ∈ No )
273sltp1d 28074 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 <s (𝐴 +s 1s ))
283, 26, 27ssltsn 27863 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} <<s {(𝐴 +s 1s )})
2924, 28eqbrtrrd 5175 . . . . . 6 (𝐴 ∈ ℕ0s → {({(𝐴 -s 1s )} |s ∅)} <<s {(𝐴 +s 1s )})
309, 19, 21, 25, 29cofcut1d 27981 . . . . 5 (𝐴 ∈ ℕ0s → ({(𝐴 -s 1s )} |s ∅) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
312, 30eqtrd 2777 . . . 4 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
3231adantl 481 . . 3 ((𝐴 No 𝐴 ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
33 negsfn 28081 . . . . . . . 8 -us Fn No
34 simpl 482 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 No )
354a1i 11 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 1s No )
3634, 35addscld 28039 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 +s 1s ) ∈ No )
37 fnsnfv 6995 . . . . . . . 8 (( -us Fn No ∧ (𝐴 +s 1s ) ∈ No ) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
3833, 36, 37sylancr 587 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
39 negsdi 28108 . . . . . . . . . 10 ((𝐴 No ∧ 1s No ) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
4034, 4, 39sylancl 586 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
41 n0sno 28354 . . . . . . . . . . 11 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) ∈ No )
4241adantl 481 . . . . . . . . . 10 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) ∈ No )
4342, 35subsvald 28117 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) -s 1s ) = (( -us𝐴) +s ( -us ‘ 1s )))
4440, 43eqtr4d 2780 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) -s 1s ))
4544sneqd 4646 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = {(( -us𝐴) -s 1s )})
4638, 45eqtr3d 2779 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 +s 1s )}) = {(( -us𝐴) -s 1s )})
4734, 35subscld 28119 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) ∈ No )
48 fnsnfv 6995 . . . . . . . 8 (( -us Fn No ∧ (𝐴 -s 1s ) ∈ No ) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
4933, 47, 48sylancr 587 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
5035, 34subsvald 28117 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( 1s -s 𝐴) = ( 1s +s ( -us𝐴)))
5134, 35negsubsdi2d 28136 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = ( 1s -s 𝐴))
5242, 35addscomd 28026 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) +s 1s ) = ( 1s +s ( -us𝐴)))
5350, 51, 523eqtr4d 2787 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = (( -us𝐴) +s 1s ))
5453sneqd 4646 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = {(( -us𝐴) +s 1s )})
5549, 54eqtr3d 2779 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 -s 1s )}) = {(( -us𝐴) +s 1s )})
5646, 55oveq12d 7456 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
5734sltm1d 28157 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s 𝐴)
5834sltp1d 28074 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 <s (𝐴 +s 1s ))
5947, 34, 36, 57, 58slttrd 27830 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s (𝐴 +s 1s ))
6047, 36, 59ssltsn 27863 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {(𝐴 -s 1s )} <<s {(𝐴 +s 1s )})
61 eqidd 2738 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
6260, 61negsunif 28113 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) = (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})))
63 n0scut 28364 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s ∅))
644a1i 11 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → 1s No )
6541, 64subscld 28119 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ∈ No )
66 snelpwi 5457 . . . . . . . . 9 ((( -us𝐴) -s 1s ) ∈ No → {(( -us𝐴) -s 1s )} ∈ 𝒫 No )
67 nulssgt 27869 . . . . . . . . 9 ({(( -us𝐴) -s 1s )} ∈ 𝒫 No → {(( -us𝐴) -s 1s )} <<s ∅)
6865, 66, 673syl 18 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s ∅)
69 slerflex 27834 . . . . . . . . . 10 ((( -us𝐴) -s 1s ) ∈ No → (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7065, 69syl 17 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
71 ovex 7471 . . . . . . . . . . 11 (( -us𝐴) -s 1s ) ∈ V
72 breq1 5154 . . . . . . . . . . . 12 (𝑥 = (( -us𝐴) -s 1s ) → (𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s 𝑦))
7372rexbidv 3179 . . . . . . . . . . 11 (𝑥 = (( -us𝐴) -s 1s ) → (∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦))
7471, 73ralsn 4689 . . . . . . . . . 10 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦)
75 breq2 5155 . . . . . . . . . . 11 (𝑦 = (( -us𝐴) -s 1s ) → ((( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s )))
7671, 75rexsn 4690 . . . . . . . . . 10 (∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7774, 76bitri 275 . . . . . . . . 9 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7870, 77sylibr 234 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦)
79 ral0 4522 . . . . . . . . 9 𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥
8079a1i 11 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥)
8141sltm1d 28157 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) <s ( -us𝐴))
8265, 41, 81ssltsn 27863 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {( -us𝐴)})
8363sneqd 4646 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} = {({(( -us𝐴) -s 1s )} |s ∅)})
8482, 83breqtrd 5177 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {({(( -us𝐴) -s 1s )} |s ∅)})
8541, 64addscld 28039 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) +s 1s ) ∈ No )
8641sltp1d 28074 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) <s (( -us𝐴) +s 1s ))
8741, 85, 86ssltsn 27863 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} <<s {(( -us𝐴) +s 1s )})
8883, 87eqbrtrrd 5175 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {({(( -us𝐴) -s 1s )} |s ∅)} <<s {(( -us𝐴) +s 1s )})
8968, 78, 80, 84, 88cofcut1d 27981 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ({(( -us𝐴) -s 1s )} |s ∅) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9063, 89eqtrd 2777 . . . . . 6 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9190adantl 481 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9256, 62, 913eqtr4rd 2788 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9360scutcld 27874 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No )
94 negs11 28107 . . . . 5 ((𝐴 No ∧ ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No ) → (( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) ↔ 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9593, 94syldan 591 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) ↔ 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9692, 95mpbid 232 . . 3 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
9732, 96jaodan 960 . 2 ((𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
981, 97sylbi 217 1 (𝐴 ∈ ℤs𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wo 848   = wceq 1539  wcel 2108  wral 3061  wrex 3070  c0 4342  𝒫 cpw 4608  {csn 4634   class class class wbr 5151  cima 5696   Fn wfn 6564  cfv 6569  (class class class)co 7438   No csur 27710   ≤s csle 27815   <<s csslt 27851   |s cscut 27853   1s c1s 27894   +s cadds 28018   -us cnegs 28077   -s csubs 28078  0scnn0s 28344  sczs 28390
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5288  ax-sep 5305  ax-nul 5315  ax-pow 5374  ax-pr 5441  ax-un 7761
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3380  df-reu 3381  df-rab 3437  df-v 3483  df-sbc 3795  df-csb 3912  df-dif 3969  df-un 3971  df-in 3973  df-ss 3983  df-pss 3986  df-nul 4343  df-if 4535  df-pw 4610  df-sn 4635  df-pr 4637  df-tp 4639  df-op 4641  df-ot 4643  df-uni 4916  df-int 4955  df-iun 5001  df-br 5152  df-opab 5214  df-mpt 5235  df-tr 5269  df-id 5587  df-eprel 5593  df-po 5601  df-so 5602  df-fr 5645  df-se 5646  df-we 5647  df-xp 5699  df-rel 5700  df-cnv 5701  df-co 5702  df-dm 5703  df-rn 5704  df-res 5705  df-ima 5706  df-pred 6329  df-ord 6395  df-on 6396  df-lim 6397  df-suc 6398  df-iota 6522  df-fun 6571  df-fn 6572  df-f 6573  df-f1 6574  df-fo 6575  df-f1o 6576  df-fv 6577  df-riota 7395  df-ov 7441  df-oprab 7442  df-mpo 7443  df-om 7895  df-1st 8022  df-2nd 8023  df-frecs 8314  df-wrecs 8345  df-recs 8419  df-rdg 8458  df-1o 8514  df-2o 8515  df-nadd 8712  df-no 27713  df-slt 27714  df-bday 27715  df-sle 27816  df-sslt 27852  df-scut 27854  df-0s 27895  df-1s 27896  df-made 27912  df-old 27913  df-left 27915  df-right 27916  df-norec 27997  df-norec2 28008  df-adds 28019  df-negs 28079  df-subs 28080  df-n0s 28346  df-nns 28347  df-zs 28391
This theorem is referenced by:  zs12bday  28450
  Copyright terms: Public domain W3C validator