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

Theorem zcuts 28672
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 28663 . 2 (𝐴 ∈ ℤs ↔ (𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)))
2 n0cut 28599 . . . . 5 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s ∅))
3 n0no 28588 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 No )
4 1no 28075 . . . . . . . . 9 1s No
54a1i 11 . . . . . . . 8 (𝐴 ∈ ℕ0s → 1s No )
63, 5subscld 28328 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ∈ No )
7 snelpwi 5419 . . . . . . 7 ((𝐴 -s 1s ) ∈ No → {(𝐴 -s 1s )} ∈ 𝒫 No )
8 nulsgts 28041 . . . . . . 7 ({(𝐴 -s 1s )} ∈ 𝒫 No → {(𝐴 -s 1s )} <<s ∅)
96, 7, 83syl 19 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s ∅)
10 lesid 28003 . . . . . . . 8 ((𝐴 -s 1s ) ∈ No → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
116, 10syl 18 . . . . . . 7 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
12 ovex 7446 . . . . . . . . 9 (𝐴 -s 1s ) ∈ V
13 breq1 5106 . . . . . . . . . 10 (𝑥 = (𝐴 -s 1s ) → (𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s 𝑦))
1413rexbidv 3186 . . . . . . . . 9 (𝑥 = (𝐴 -s 1s ) → (∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦))
1512, 14ralsn 4642 . . . . . . . 8 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦)
16 breq2 5107 . . . . . . . . 9 (𝑦 = (𝐴 -s 1s ) → ((𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s )))
1712, 16rexsn 4643 . . . . . . . 8 (∃𝑦 ∈ {(𝐴 -s 1s )} (𝐴 -s 1s ) ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
1815, 17bitri 278 . . . . . . 7 (∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦 ↔ (𝐴 -s 1s ) ≤s (𝐴 -s 1s ))
1911, 18sylibr 237 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ {(𝐴 -s 1s )}∃𝑦 ∈ {(𝐴 -s 1s )}𝑥 ≤s 𝑦)
20 ral0 4454 . . . . . . 7 𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥
2120a1i 11 . . . . . 6 (𝐴 ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(𝐴 +s 1s )}𝑦 ≤s 𝑥)
223ltsm1d 28367 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 -s 1s ) <s 𝐴)
236, 3, 22sltssn 28035 . . . . . . 7 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {𝐴})
242sneqd 4596 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} = {({(𝐴 -s 1s )} |s ∅)})
2523, 24breqtrd 5131 . . . . . 6 (𝐴 ∈ ℕ0s → {(𝐴 -s 1s )} <<s {({(𝐴 -s 1s )} |s ∅)})
263, 5addscld 28245 . . . . . . . 8 (𝐴 ∈ ℕ0s → (𝐴 +s 1s ) ∈ No )
273ltsp1d 28280 . . . . . . . 8 (𝐴 ∈ ℕ0s𝐴 <s (𝐴 +s 1s ))
283, 26, 27sltssn 28035 . . . . . . 7 (𝐴 ∈ ℕ0s → {𝐴} <<s {(𝐴 +s 1s )})
2924, 28eqbrtrrd 5129 . . . . . 6 (𝐴 ∈ ℕ0s → {({(𝐴 -s 1s )} |s ∅)} <<s {(𝐴 +s 1s )})
309, 19, 21, 25, 29cofcut1d 28186 . . . . 5 (𝐴 ∈ ℕ0s → ({(𝐴 -s 1s )} |s ∅) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
312, 30eqtrd 2795 . . . 4 (𝐴 ∈ ℕ0s𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
3231adantl 487 . . 3 ((𝐴 No 𝐴 ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
33 negsfn 28288 . . . . . . . 8 -us Fn No
34 simpl 488 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 No )
354a1i 11 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 1s No )
3634, 35addscld 28245 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 +s 1s ) ∈ No )
37 fnsnfv 6957 . . . . . . . 8 (( -us Fn No ∧ (𝐴 +s 1s ) ∈ No ) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
3833, 36, 37sylancr 599 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = ( -us “ {(𝐴 +s 1s )}))
39 negsdi 28315 . . . . . . . . . 10 ((𝐴 No ∧ 1s No ) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
4034, 4, 39sylancl 598 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) +s ( -us ‘ 1s )))
41 n0no 28588 . . . . . . . . . . 11 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) ∈ No )
4241adantl 487 . . . . . . . . . 10 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) ∈ No )
4342, 35subsvald 28326 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) -s 1s ) = (( -us𝐴) +s ( -us ‘ 1s )))
4440, 43eqtr4d 2798 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 +s 1s )) = (( -us𝐴) -s 1s ))
4544sneqd 4596 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 +s 1s ))} = {(( -us𝐴) -s 1s )})
4638, 45eqtr3d 2797 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 +s 1s )}) = {(( -us𝐴) -s 1s )})
4734, 35subscld 28328 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) ∈ No )
48 fnsnfv 6957 . . . . . . . 8 (( -us Fn No ∧ (𝐴 -s 1s ) ∈ No ) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
4933, 47, 48sylancr 599 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = ( -us “ {(𝐴 -s 1s )}))
5035, 34subsvald 28326 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( 1s -s 𝐴) = ( 1s +s ( -us𝐴)))
5134, 35negsubsdi2d 28345 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = ( 1s -s 𝐴))
5242, 35addscomd 28232 . . . . . . . . 9 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) +s 1s ) = ( 1s +s ( -us𝐴)))
5350, 51, 523eqtr4d 2805 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘(𝐴 -s 1s )) = (( -us𝐴) +s 1s ))
5453sneqd 4596 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {( -us ‘(𝐴 -s 1s ))} = {(( -us𝐴) +s 1s )})
5549, 54eqtr3d 2797 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us “ {(𝐴 -s 1s )}) = {(( -us𝐴) +s 1s )})
5646, 55oveq12d 7431 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
5734ltsm1d 28367 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s 𝐴)
5834ltsp1d 28280 . . . . . . . 8 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 <s (𝐴 +s 1s ))
5947, 34, 36, 57, 58ltstrd 27999 . . . . . . 7 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (𝐴 -s 1s ) <s (𝐴 +s 1s ))
6047, 36, 59sltssn 28035 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → {(𝐴 -s 1s )} <<s {(𝐴 +s 1s )})
61 eqidd 2761 . . . . . 6 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
6260, 61negsunif 28320 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) = (( -us “ {(𝐴 +s 1s )}) |s ( -us “ {(𝐴 -s 1s )})))
63 n0cut 28599 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s ∅))
644a1i 11 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → 1s No )
6541, 64subscld 28328 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ∈ No )
66 snelpwi 5419 . . . . . . . . 9 ((( -us𝐴) -s 1s ) ∈ No → {(( -us𝐴) -s 1s )} ∈ 𝒫 No )
67 nulsgts 28041 . . . . . . . . 9 ({(( -us𝐴) -s 1s )} ∈ 𝒫 No → {(( -us𝐴) -s 1s )} <<s ∅)
6865, 66, 673syl 19 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s ∅)
69 lesid 28003 . . . . . . . . . 10 ((( -us𝐴) -s 1s ) ∈ No → (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7065, 69syl 18 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
71 ovex 7446 . . . . . . . . . . 11 (( -us𝐴) -s 1s ) ∈ V
72 breq1 5106 . . . . . . . . . . . 12 (𝑥 = (( -us𝐴) -s 1s ) → (𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s 𝑦))
7372rexbidv 3186 . . . . . . . . . . 11 (𝑥 = (( -us𝐴) -s 1s ) → (∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦))
7471, 73ralsn 4642 . . . . . . . . . 10 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ ∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦)
75 breq2 5107 . . . . . . . . . . 11 (𝑦 = (( -us𝐴) -s 1s ) → ((( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s )))
7671, 75rexsn 4643 . . . . . . . . . 10 (∃𝑦 ∈ {(( -us𝐴) -s 1s )} (( -us𝐴) -s 1s ) ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7774, 76bitri 278 . . . . . . . . 9 (∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦 ↔ (( -us𝐴) -s 1s ) ≤s (( -us𝐴) -s 1s ))
7870, 77sylibr 237 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ {(( -us𝐴) -s 1s )}∃𝑦 ∈ {(( -us𝐴) -s 1s )}𝑥 ≤s 𝑦)
79 ral0 4454 . . . . . . . . 9 𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥
8079a1i 11 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → ∀𝑥 ∈ ∅ ∃𝑦 ∈ {(( -us𝐴) +s 1s )}𝑦 ≤s 𝑥)
8141ltsm1d 28367 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) -s 1s ) <s ( -us𝐴))
8265, 41, 81sltssn 28035 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {( -us𝐴)})
8363sneqd 4596 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} = {({(( -us𝐴) -s 1s )} |s ∅)})
8482, 83breqtrd 5131 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {(( -us𝐴) -s 1s )} <<s {({(( -us𝐴) -s 1s )} |s ∅)})
8541, 64addscld 28245 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → (( -us𝐴) +s 1s ) ∈ No )
8641ltsp1d 28280 . . . . . . . . . 10 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) <s (( -us𝐴) +s 1s ))
8741, 85, 86sltssn 28035 . . . . . . . . 9 (( -us𝐴) ∈ ℕ0s → {( -us𝐴)} <<s {(( -us𝐴) +s 1s )})
8883, 87eqbrtrrd 5129 . . . . . . . 8 (( -us𝐴) ∈ ℕ0s → {({(( -us𝐴) -s 1s )} |s ∅)} <<s {(( -us𝐴) +s 1s )})
8968, 78, 80, 84, 88cofcut1d 28186 . . . . . . 7 (( -us𝐴) ∈ ℕ0s → ({(( -us𝐴) -s 1s )} |s ∅) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9063, 89eqtrd 2795 . . . . . 6 (( -us𝐴) ∈ ℕ0s → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9190adantl 487 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ({(( -us𝐴) -s 1s )} |s {(( -us𝐴) +s 1s )}))
9256, 62, 913eqtr4rd 2806 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9360cutscld 28048 . . . . 5 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No )
94 negs11 28314 . . . . 5 ((𝐴 No ∧ ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}) ∈ No ) → (( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) ↔ 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9593, 94syldan 603 . . . 4 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → (( -us𝐴) = ( -us ‘({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})) ↔ 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )})))
9692, 95mpbid 235 . . 3 ((𝐴 No ∧ ( -us𝐴) ∈ ℕ0s) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
9732, 96jaodan 972 . 2 ((𝐴 No ∧ (𝐴 ∈ ℕ0s ∨ ( -us𝐴) ∈ ℕ0s)) → 𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
981, 97sylbi 220 1 (𝐴 ∈ ℤs𝐴 = ({(𝐴 -s 1s )} |s {(𝐴 +s 1s )}))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  wo 861   = wceq 1570  wcel 2145  wral 3076  wrex 3086  c0 4279  𝒫 cpw 4557  {csn 4584   class class class wbr 5103  cima 5658   Fn wfn 6528  cfv 6533  (class class class)co 7413   No csur 27876   ≤s cles 27980   <<s cslts 28022   |s ccuts 28024   1s c1s 28071   +s cadds 28224   -us cnegs 28284   -s csubs 28285  0scn0s 28577  sczs 28643
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7736
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7370  df-ov 7416  df-oprab 7417  df-mpo 7418  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-2o 8456  df-nadd 8654  df-no 27879  df-lts 27880  df-bday 27881  df-les 27981  df-slts 28023  df-cuts 28025  df-0s 28072  df-1s 28073  df-made 28092  df-old 28093  df-left 28095  df-right 28096  df-norec 28203  df-norec2 28214  df-adds 28225  df-negs 28286  df-subs 28287  df-n0s 28579  df-nns 28580  df-zs 28644
This theorem is used by:  pw2cutp1  28726  pw2cut2  28727
  Copyright terms: Public domain W3C validator