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

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

Proof of Theorem zcuts
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elzn0s 28404 . 2 (𝐴 ∈ ℤs ↔ (𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)))
2 n0cut 28340 . . . . 5 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s ∅))
3 n0no 28329 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 No )
4 1no 27816 . . . . . . . . 9 1s No
54a1i 11 . . . . . . . 8 (𝐴 ∈ ℕ0s → 1s No )
63, 5subscld 28069 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ∈ No )
7 snelpwi 5391 . . . . . . 7 ((𝐴 -s 1s ) ∈ No → {(𝐴 -s 1s )} ∈ 𝒫 No )
8 nulsgts 27782 . . . . . . 7 ({(𝐴 -s 1s )} ∈ 𝒫 No → {(𝐴 -s 1s )} <<s ∅)
96, 7, 83syl 18 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s ∅)
10 lesid 27745 . . . . . . . 8 ((𝐴 -s 1s ) ∈ No → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
116, 10syl 17 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
12 ovex 7393 . . . . . . . . 9 (𝐴 -s 1s ) ∈ V
13 breq1 5089 . . . . . . . . . 10 (𝑥 = (𝐴 -s 1s ) → (𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s 𝑦))
1413rexbidv 3162 . . . . . . . . 9 (𝑥 = (𝐴 -s 1s ) → (∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦))
1512, 14ralsn 4626 . . . . . . . 8 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦)
16 breq2 5090 . . . . . . . . 9 (𝑦 = (𝐴 -s 1s ) → ((𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s )))
1712, 16rexsn 4627 . . . . . . . 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 4439 . . . . . . 7 𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥
2120a1i 11 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥)
223ltsm1d 28108 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) <s 𝐴)
236, 3, 22sltssn 27776 . . . . . . 7 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {𝐴})
242sneqd 4580 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} = {({(𝐴 -s 1s )} |s ∅)})
2523, 24breqtrd 5112 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {({(𝐴 -s 1s )} |s ∅)})
263, 5addscld 27986 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 +s 1s ) ∈ No )
273ltsp1d 28021 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 <s (𝐴 +s 1s ))
283, 26, 27sltssn 27776 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} <<s {(𝐴 +s 1s )})
2924, 28eqbrtrrd 5110 . . . . . 6 (𝐴 ∈ ℕ0s → {({(𝐴 -s 1s )} |s ∅)} <<s {(𝐴 +s 1s )})
309, 19, 21, 25, 29cofcut1d 27927 . . . . 5 (𝐴 ∈ ℕ0s → ({(𝐴 -s 1s )} |s ∅) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
312, 30eqtrd 2772 . . . 4 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
3231adantl 481 . . 3 ((𝐴 No 𝐴 ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
33 negsfn 28029 . . . . . . . 8 -us Fn No
34 simpl 482 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 No )
354a1i 11 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 1s No )
3634, 35addscld 27986 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 +s 1s ) ∈ No )
37 fnsnfv 6913 . . . . . . . 8 (( -us Fn No ∧ (𝐴 +s 1s ) ∈ No ) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
3833, 36, 37sylancr 588 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
39 negsdi 28056 . . . . . . . . . 10 ((𝐴 No ∧ 1s No ) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
4034, 4, 39sylancl 587 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
41 n0no 28329 . . . . . . . . . . 11 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) ∈ No )
4241adantl 481 . . . . . . . . . 10 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) ∈ No )
4342, 35subsvald 28067 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) -s 1s ) = (( -us𝐴) +s ( -us ‘ 1s )))
4440, 43eqtr4d 2775 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) -s 1s ))
4544sneqd 4580 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = {(( -us𝐴) -s 1s )})
4638, 45eqtr3d 2774 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 +s 1s )}) = {(( -us𝐴) -s 1s )})
4734, 35subscld 28069 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) ∈ No )
48 fnsnfv 6913 . . . . . . . 8 (( -us Fn No ∧ (𝐴 -s 1s ) ∈ No ) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
4933, 47, 48sylancr 588 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
5035, 34subsvald 28067 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( 1s -s 𝐴) = ( 1s +s ( -us𝐴)))
5134, 35negsubsdi2d 28086 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = ( 1s -s 𝐴))
5242, 35addscomd 27973 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) +s 1s ) = ( 1s +s ( -us𝐴)))
5350, 51, 523eqtr4d 2782 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = (( -us𝐴) +s 1s ))
5453sneqd 4580 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = {(( -us𝐴) +s 1s )})
5549, 54eqtr3d 2774 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 -s 1s )}) = {(( -us𝐴) +s 1s )})
5646, 55oveq12d 7378 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
5734ltsm1d 28108 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s 𝐴)
5834ltsp1d 28021 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 <s (𝐴 +s 1s ))
5947, 34, 36, 57, 58ltstrd 27741 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s (𝐴 +s 1s ))
6047, 36, 59sltssn 27776 . . . . . 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 28061 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) = (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})))
63 n0cut 28340 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s ∅))
644a1i 11 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → 1s No )
6541, 64subscld 28069 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ∈ No )
66 snelpwi 5391 . . . . . . . . 9 ((( -us𝐴) -s 1s ) ∈ No → {(( -us𝐴) -s 1s )} ∈ 𝒫 No )
67 nulsgts 27782 . . . . . . . . 9 ({(( -us𝐴) -s 1s )} ∈ 𝒫 No → {(( -us𝐴) -s 1s )} <<s ∅)
6865, 66, 673syl 18 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s ∅)
69 lesid 27745 . . . . . . . . . 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 7393 . . . . . . . . . . 11 (( -us𝐴) -s 1s ) ∈ V
72 breq1 5089 . . . . . . . . . . . 12 (𝑥 = (( -us𝐴) -s 1s ) → (𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s 𝑦))
7372rexbidv 3162 . . . . . . . . . . 11 (𝑥 = (( -us𝐴) -s 1s ) → (∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦))
7471, 73ralsn 4626 . . . . . . . . . 10 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦)
75 breq2 5090 . . . . . . . . . . 11 (𝑦 = (( -us𝐴) -s 1s ) → ((( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s )))
7671, 75rexsn 4627 . . . . . . . . . 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 4439 . . . . . . . . 9 𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥
8079a1i 11 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥)
8141ltsm1d 28108 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) <s ( -us𝐴))
8265, 41, 81sltssn 27776 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {( -us𝐴)})
8363sneqd 4580 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} = {({(( -us𝐴) -s 1s )} |s ∅)})
8482, 83breqtrd 5112 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {({(( -us𝐴) -s 1s )} |s ∅)})
8541, 64addscld 27986 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) +s 1s ) ∈ No )
8641ltsp1d 28021 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) <s (( -us𝐴) +s 1s ))
8741, 85, 86sltssn 27776 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} <<s {(( -us𝐴) +s 1s )})
8883, 87eqbrtrrd 5110 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {({(( -us𝐴) -s 1s )} |s ∅)} <<s {(( -us𝐴) +s 1s )})
8968, 78, 80, 84, 88cofcut1d 27927 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ({(( -us𝐴) -s 1s )} |s ∅) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9063, 89eqtrd 2772 . . . . . 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 2783 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9360cutscld 27789 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No )
94 negs11 28055 . . . . 5 ((𝐴 No ∧ ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No ) → (( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) ↔ 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9593, 94syldan 592 . . . 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 1542  wcel 2114  wral 3052  wrex 3062  c0 4274  𝒫 cpw 4542  {csn 4568   class class class wbr 5086  cima 5627   Fn wfn 6487  cfv 6492  (class class class)co 7360   No csur 27617   ≤s cles 27722   <<s cslts 27763   |s ccuts 27765   1s c1s 27812   +s cadds 27965   -us cnegs 28025   -s csubs 28026  0scn0s 28318  sczs 28384
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-ot 4577  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-2o 8399  df-nadd 8595  df-no 27620  df-lts 27621  df-bday 27622  df-les 27723  df-slts 27764  df-cuts 27766  df-0s 27813  df-1s 27814  df-made 27833  df-old 27834  df-left 27836  df-right 27837  df-norec 27944  df-norec2 27955  df-adds 27966  df-negs 28027  df-subs 28028  df-n0s 28320  df-nns 28321  df-zs 28385
This theorem is referenced by:  pw2cutp1  28467  pw2cut2  28468
  Copyright terms: Public domain W3C validator