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

Theorem zscut 28341
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 28332 . 2 (𝐴 ∈ ℤs ↔ (𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)))
2 n0scut 28272 . . . . 5 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s ∅))
3 n0sno 28262 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 No )
4 1sno 27781 . . . . . . . . 9 1s No
54a1i 11 . . . . . . . 8 (𝐴 ∈ ℕ0s → 1s No )
63, 5subscld 28013 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ∈ No )
7 snelpwi 5389 . . . . . . 7 ((𝐴 -s 1s ) ∈ No → {(𝐴 -s 1s )} ∈ 𝒫 No )
8 nulssgt 27749 . . . . . . 7 ({(𝐴 -s 1s )} ∈ 𝒫 No → {(𝐴 -s 1s )} <<s ∅)
96, 7, 83syl 18 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s ∅)
10 slerflex 27712 . . . . . . . 8 ((𝐴 -s 1s ) ∈ No → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
116, 10syl 17 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
12 ovex 7388 . . . . . . . . 9 (𝐴 -s 1s ) ∈ V
13 breq1 5098 . . . . . . . . . 10 (𝑥 = (𝐴 -s 1s ) → (𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s 𝑦))
1413rexbidv 3158 . . . . . . . . 9 (𝑥 = (𝐴 -s 1s ) → (∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦))
1512, 14ralsn 4635 . . . . . . . 8 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦)
16 breq2 5099 . . . . . . . . 9 (𝑦 = (𝐴 -s 1s ) → ((𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s )))
1712, 16rexsn 4636 . . . . . . . 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 4464 . . . . . . 7 𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥
2120a1i 11 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥)
223sltm1d 28051 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) <s 𝐴)
236, 3, 22ssltsn 27743 . . . . . . 7 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {𝐴})
242sneqd 4589 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} = {({(𝐴 -s 1s )} |s ∅)})
2523, 24breqtrd 5121 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {({(𝐴 -s 1s )} |s ∅)})
263, 5addscld 27933 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 +s 1s ) ∈ No )
273sltp1d 27968 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 <s (𝐴 +s 1s ))
283, 26, 27ssltsn 27743 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} <<s {(𝐴 +s 1s )})
2924, 28eqbrtrrd 5119 . . . . . 6 (𝐴 ∈ ℕ0s → {({(𝐴 -s 1s )} |s ∅)} <<s {(𝐴 +s 1s )})
309, 19, 21, 25, 29cofcut1d 27875 . . . . 5 (𝐴 ∈ ℕ0s → ({(𝐴 -s 1s )} |s ∅) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
312, 30eqtrd 2768 . . . 4 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
3231adantl 481 . . 3 ((𝐴 No 𝐴 ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
33 negsfn 27975 . . . . . . . 8 -us Fn No
34 simpl 482 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 No )
354a1i 11 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 1s No )
3634, 35addscld 27933 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 +s 1s ) ∈ No )
37 fnsnfv 6910 . . . . . . . 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 28002 . . . . . . . . . 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 28262 . . . . . . . . . . 11 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) ∈ No )
4241adantl 481 . . . . . . . . . 10 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) ∈ No )
4342, 35subsvald 28011 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) -s 1s ) = (( -us𝐴) +s ( -us ‘ 1s )))
4440, 43eqtr4d 2771 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) -s 1s ))
4544sneqd 4589 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = {(( -us𝐴) -s 1s )})
4638, 45eqtr3d 2770 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 +s 1s )}) = {(( -us𝐴) -s 1s )})
4734, 35subscld 28013 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) ∈ No )
48 fnsnfv 6910 . . . . . . . 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 28011 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( 1s -s 𝐴) = ( 1s +s ( -us𝐴)))
5134, 35negsubsdi2d 28030 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = ( 1s -s 𝐴))
5242, 35addscomd 27920 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) +s 1s ) = ( 1s +s ( -us𝐴)))
5350, 51, 523eqtr4d 2778 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = (( -us𝐴) +s 1s ))
5453sneqd 4589 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = {(( -us𝐴) +s 1s )})
5549, 54eqtr3d 2770 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 -s 1s )}) = {(( -us𝐴) +s 1s )})
5646, 55oveq12d 7373 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
5734sltm1d 28051 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s 𝐴)
5834sltp1d 27968 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 <s (𝐴 +s 1s ))
5947, 34, 36, 57, 58slttrd 27708 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s (𝐴 +s 1s ))
6047, 36, 59ssltsn 27743 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {(𝐴 -s 1s )} <<s {(𝐴 +s 1s )})
61 eqidd 2734 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
6260, 61negsunif 28007 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) = (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})))
63 n0scut 28272 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s ∅))
644a1i 11 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → 1s No )
6541, 64subscld 28013 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ∈ No )
66 snelpwi 5389 . . . . . . . . 9 ((( -us𝐴) -s 1s ) ∈ No → {(( -us𝐴) -s 1s )} ∈ 𝒫 No )
67 nulssgt 27749 . . . . . . . . 9 ({(( -us𝐴) -s 1s )} ∈ 𝒫 No → {(( -us𝐴) -s 1s )} <<s ∅)
6865, 66, 673syl 18 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s ∅)
69 slerflex 27712 . . . . . . . . . 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 7388 . . . . . . . . . . 11 (( -us𝐴) -s 1s ) ∈ V
72 breq1 5098 . . . . . . . . . . . 12 (𝑥 = (( -us𝐴) -s 1s ) → (𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s 𝑦))
7372rexbidv 3158 . . . . . . . . . . 11 (𝑥 = (( -us𝐴) -s 1s ) → (∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦))
7471, 73ralsn 4635 . . . . . . . . . 10 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦)
75 breq2 5099 . . . . . . . . . . 11 (𝑦 = (( -us𝐴) -s 1s ) → ((( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s )))
7671, 75rexsn 4636 . . . . . . . . . 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 4464 . . . . . . . . 9 𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥
8079a1i 11 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥)
8141sltm1d 28051 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) <s ( -us𝐴))
8265, 41, 81ssltsn 27743 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {( -us𝐴)})
8363sneqd 4589 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} = {({(( -us𝐴) -s 1s )} |s ∅)})
8482, 83breqtrd 5121 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {({(( -us𝐴) -s 1s )} |s ∅)})
8541, 64addscld 27933 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) +s 1s ) ∈ No )
8641sltp1d 27968 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) <s (( -us𝐴) +s 1s ))
8741, 85, 86ssltsn 27743 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} <<s {(( -us𝐴) +s 1s )})
8883, 87eqbrtrrd 5119 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {({(( -us𝐴) -s 1s )} |s ∅)} <<s {(( -us𝐴) +s 1s )})
8968, 78, 80, 84, 88cofcut1d 27875 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ({(( -us𝐴) -s 1s )} |s ∅) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9063, 89eqtrd 2768 . . . . . 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 2779 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9360scutcld 27754 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No )
94 negs11 28001 . . . . 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 959 . 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 847   = wceq 1541  wcel 2113  wral 3049  wrex 3058  c0 4284  𝒫 cpw 4551  {csn 4577   class class class wbr 5095  cima 5624   Fn wfn 6484  cfv 6489  (class class class)co 7355   No csur 27588   ≤s csle 27693   <<s csslt 27730   |s cscut 27732   1s c1s 27777   +s cadds 27912   -us cnegs 27971   -s csubs 27972  0scnn0s 28252  sczs 28312
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2883  df-ne 2931  df-ral 3050  df-rex 3059  df-rmo 3348  df-reu 3349  df-rab 3398  df-v 3440  df-sbc 3739  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4285  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-tp 4582  df-op 4584  df-ot 4586  df-uni 4861  df-int 4900  df-iun 4945  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5516  df-eprel 5521  df-po 5529  df-so 5530  df-fr 5574  df-se 5575  df-we 5576  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-pred 6256  df-ord 6317  df-on 6318  df-lim 6319  df-suc 6320  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-riota 7312  df-ov 7358  df-oprab 7359  df-mpo 7360  df-om 7806  df-1st 7930  df-2nd 7931  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-2o 8395  df-nadd 8590  df-no 27591  df-slt 27592  df-bday 27593  df-sle 27694  df-sslt 27731  df-scut 27733  df-0s 27778  df-1s 27779  df-made 27798  df-old 27799  df-left 27801  df-right 27802  df-norec 27891  df-norec2 27902  df-adds 27913  df-negs 27973  df-subs 27974  df-n0s 28254  df-nns 28255  df-zs 28313
This theorem is referenced by:  pw2cutp1  28391  pw2cut2  28392  zs12bday  28404
  Copyright terms: Public domain W3C validator