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

Theorem zmulscld 28355
Description: The surreal integers are closed under multiplication. (Contributed by Scott Fenton, 20-Aug-2025.)
Hypotheses
Ref Expression
zmulscld.1 (𝜑𝐴 ∈ ℤs)
zmulscld.2 (𝜑𝐵 ∈ ℤs)
Assertion
Ref Expression
zmulscld (𝜑 → (𝐴 ·s 𝐵) ∈ ℤs)

Proof of Theorem zmulscld
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑡 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 zmulscld.1 . . 3 (𝜑𝐴 ∈ ℤs)
2 elzs 28342 . . 3 (𝐴 ∈ ℤs ↔ ∃𝑥 ∈ ℕs𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦))
31, 2sylib 218 . 2 (𝜑 → ∃𝑥 ∈ ℕs𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦))
4 zmulscld.2 . . 3 (𝜑𝐵 ∈ ℤs)
5 elzs 28342 . . 3 (𝐵 ∈ ℤs ↔ ∃𝑧 ∈ ℕs𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤))
64, 5sylib 218 . 2 (𝜑 → ∃𝑧 ∈ ℕs𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤))
7 reeanv 3206 . . . . 5 (∃𝑦 ∈ ℕs𝑤 ∈ ℕs (𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) ↔ (∃𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)))
872rexbii 3110 . . . 4 (∃𝑥 ∈ ℕs𝑧 ∈ ℕs𝑦 ∈ ℕs𝑤 ∈ ℕs (𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) ↔ ∃𝑥 ∈ ℕs𝑧 ∈ ℕs (∃𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)))
9 reeanv 3206 . . . 4 (∃𝑥 ∈ ℕs𝑧 ∈ ℕs (∃𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)) ↔ (∃𝑥 ∈ ℕs𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑧 ∈ ℕs𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)))
108, 9bitri 275 . . 3 (∃𝑥 ∈ ℕs𝑧 ∈ ℕs𝑦 ∈ ℕs𝑤 ∈ ℕs (𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) ↔ (∃𝑥 ∈ ℕs𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑧 ∈ ℕs𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)))
11 nnsno 28285 . . . . . . . . . . 11 (𝑥 ∈ ℕs𝑥 No )
1211ad2antrr 726 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑥 No )
13 nnsno 28285 . . . . . . . . . . 11 (𝑦 ∈ ℕs𝑦 No )
1413ad2antrl 728 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑦 No )
1512, 14subscld 28032 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑥 -s 𝑦) ∈ No )
16 nnsno 28285 . . . . . . . . . 10 (𝑧 ∈ ℕs𝑧 No )
1716ad2antlr 727 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑧 No )
18 nnsno 28285 . . . . . . . . . 10 (𝑤 ∈ ℕs𝑤 No )
1918ad2antll 729 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑤 No )
2015, 17, 19subsdid 28127 . . . . . . . 8 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 -s 𝑦) ·s (𝑧 -s 𝑤)) = (((𝑥 -s 𝑦) ·s 𝑧) -s ((𝑥 -s 𝑦) ·s 𝑤)))
21 nnmulscl 28307 . . . . . . . . . . . . 13 ((𝑥 ∈ ℕs𝑧 ∈ ℕs) → (𝑥 ·s 𝑧) ∈ ℕs)
2221adantr 480 . . . . . . . . . . . 12 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑥 ·s 𝑧) ∈ ℕs)
2322nnsnod 28287 . . . . . . . . . . 11 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑥 ·s 𝑧) ∈ No )
24 simprl 770 . . . . . . . . . . . . 13 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑦 ∈ ℕs)
25 simplr 768 . . . . . . . . . . . . 13 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → 𝑧 ∈ ℕs)
26 nnmulscl 28307 . . . . . . . . . . . . 13 ((𝑦 ∈ ℕs𝑧 ∈ ℕs) → (𝑦 ·s 𝑧) ∈ ℕs)
2724, 25, 26syl2anc 584 . . . . . . . . . . . 12 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑦 ·s 𝑧) ∈ ℕs)
2827nnsnod 28287 . . . . . . . . . . 11 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑦 ·s 𝑧) ∈ No )
2923, 28subscld 28032 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)) ∈ No )
30 nnmulscl 28307 . . . . . . . . . . . 12 ((𝑥 ∈ ℕs𝑤 ∈ ℕs) → (𝑥 ·s 𝑤) ∈ ℕs)
3130ad2ant2rl 749 . . . . . . . . . . 11 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑥 ·s 𝑤) ∈ ℕs)
3231nnsnod 28287 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑥 ·s 𝑤) ∈ No )
33 nnmulscl 28307 . . . . . . . . . . . 12 ((𝑦 ∈ ℕs𝑤 ∈ ℕs) → (𝑦 ·s 𝑤) ∈ ℕs)
3433adantl 481 . . . . . . . . . . 11 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑦 ·s 𝑤) ∈ ℕs)
3534nnsnod 28287 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (𝑦 ·s 𝑤) ∈ No )
3629, 32, 35subsubs2d 28064 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)) -s ((𝑥 ·s 𝑤) -s (𝑦 ·s 𝑤))) = (((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)) +s ((𝑦 ·s 𝑤) -s (𝑥 ·s 𝑤))))
3712, 14, 17subsdird 28128 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 -s 𝑦) ·s 𝑧) = ((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)))
3812, 14, 19subsdird 28128 . . . . . . . . . 10 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 -s 𝑦) ·s 𝑤) = ((𝑥 ·s 𝑤) -s (𝑦 ·s 𝑤)))
3937, 38oveq12d 7374 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (((𝑥 -s 𝑦) ·s 𝑧) -s ((𝑥 -s 𝑦) ·s 𝑤)) = (((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)) -s ((𝑥 ·s 𝑤) -s (𝑦 ·s 𝑤))))
4023, 35, 28, 32addsubs4d 28070 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (((𝑥 ·s 𝑧) -s (𝑦 ·s 𝑧)) +s ((𝑦 ·s 𝑤) -s (𝑥 ·s 𝑤))))
4136, 39, 403eqtr4d 2779 . . . . . . . 8 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (((𝑥 -s 𝑦) ·s 𝑧) -s ((𝑥 -s 𝑦) ·s 𝑤)) = (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))))
4220, 41eqtrd 2769 . . . . . . 7 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 -s 𝑦) ·s (𝑧 -s 𝑤)) = (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))))
43 nnaddscl 28306 . . . . . . . . . 10 (((𝑥 ·s 𝑧) ∈ ℕs ∧ (𝑦 ·s 𝑤) ∈ ℕs) → ((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) ∈ ℕs)
4422, 34, 43syl2anc 584 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) ∈ ℕs)
45 nnaddscl 28306 . . . . . . . . . 10 (((𝑦 ·s 𝑧) ∈ ℕs ∧ (𝑥 ·s 𝑤) ∈ ℕs) → ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)) ∈ ℕs)
4627, 31, 45syl2anc 584 . . . . . . . . 9 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)) ∈ ℕs)
47 eqid 2734 . . . . . . . . . 10 (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)))
48 rspceov 7405 . . . . . . . . . 10 ((((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) ∈ ℕs ∧ ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)) ∈ ℕs ∧ (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)))) → ∃𝑡 ∈ ℕs𝑢 ∈ ℕs (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (𝑡 -s 𝑢))
4947, 48mp3an3 1452 . . . . . . . . 9 ((((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) ∈ ℕs ∧ ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤)) ∈ ℕs) → ∃𝑡 ∈ ℕs𝑢 ∈ ℕs (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (𝑡 -s 𝑢))
5044, 46, 49syl2anc 584 . . . . . . . 8 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ∃𝑡 ∈ ℕs𝑢 ∈ ℕs (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (𝑡 -s 𝑢))
51 elzs 28342 . . . . . . . 8 ((((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) ∈ ℤs ↔ ∃𝑡 ∈ ℕs𝑢 ∈ ℕs (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) = (𝑡 -s 𝑢))
5250, 51sylibr 234 . . . . . . 7 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → (((𝑥 ·s 𝑧) +s (𝑦 ·s 𝑤)) -s ((𝑦 ·s 𝑧) +s (𝑥 ·s 𝑤))) ∈ ℤs)
5342, 52eqeltrd 2834 . . . . . 6 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝑥 -s 𝑦) ·s (𝑧 -s 𝑤)) ∈ ℤs)
54 oveq12 7365 . . . . . . 7 ((𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) → (𝐴 ·s 𝐵) = ((𝑥 -s 𝑦) ·s (𝑧 -s 𝑤)))
5554eleq1d 2819 . . . . . 6 ((𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) → ((𝐴 ·s 𝐵) ∈ ℤs ↔ ((𝑥 -s 𝑦) ·s (𝑧 -s 𝑤)) ∈ ℤs))
5653, 55syl5ibrcom 247 . . . . 5 (((𝑥 ∈ ℕs𝑧 ∈ ℕs) ∧ (𝑦 ∈ ℕs𝑤 ∈ ℕs)) → ((𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) → (𝐴 ·s 𝐵) ∈ ℤs))
5756rexlimdvva 3191 . . . 4 ((𝑥 ∈ ℕs𝑧 ∈ ℕs) → (∃𝑦 ∈ ℕs𝑤 ∈ ℕs (𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) → (𝐴 ·s 𝐵) ∈ ℤs))
5857rexlimivv 3176 . . 3 (∃𝑥 ∈ ℕs𝑧 ∈ ℕs𝑦 ∈ ℕs𝑤 ∈ ℕs (𝐴 = (𝑥 -s 𝑦) ∧ 𝐵 = (𝑧 -s 𝑤)) → (𝐴 ·s 𝐵) ∈ ℤs)
5910, 58sylbir 235 . 2 ((∃𝑥 ∈ ℕs𝑦 ∈ ℕs 𝐴 = (𝑥 -s 𝑦) ∧ ∃𝑧 ∈ ℕs𝑤 ∈ ℕs 𝐵 = (𝑧 -s 𝑤)) → (𝐴 ·s 𝐵) ∈ ℤs)
603, 6, 59syl2anc 584 1 (𝜑 → (𝐴 ·s 𝐵) ∈ ℤs)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1541  wcel 2113  wrex 3058  (class class class)co 7356   No csur 27605   +s cadds 27929   -s csubs 27989   ·s cmuls 28075  scnns 28274  sczs 28336
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 2706  ax-rep 5222  ax-sep 5239  ax-nul 5249  ax-pow 5308  ax-pr 5375  ax-un 7678
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 2567  df-clab 2713  df-cleq 2726  df-clel 2809  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 4284  df-if 4478  df-pw 4554  df-sn 4579  df-pr 4581  df-tp 4583  df-op 4585  df-ot 4587  df-uni 4862  df-int 4901  df-iun 4946  df-br 5097  df-opab 5159  df-mpt 5178  df-tr 5204  df-id 5517  df-eprel 5522  df-po 5530  df-so 5531  df-fr 5575  df-se 5576  df-we 5577  df-xp 5628  df-rel 5629  df-cnv 5630  df-co 5631  df-dm 5632  df-rn 5633  df-res 5634  df-ima 5635  df-pred 6257  df-ord 6318  df-on 6319  df-lim 6320  df-suc 6321  df-iota 6446  df-fun 6492  df-fn 6493  df-f 6494  df-f1 6495  df-fo 6496  df-f1o 6497  df-fv 6498  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-nadd 8592  df-no 27608  df-slt 27609  df-bday 27610  df-sle 27711  df-sslt 27748  df-scut 27750  df-0s 27795  df-1s 27796  df-made 27815  df-old 27816  df-left 27818  df-right 27819  df-norec 27908  df-norec2 27919  df-adds 27930  df-negs 27990  df-subs 27991  df-muls 28076  df-n0s 28275  df-nns 28276  df-zs 28337
This theorem is referenced by:  zsoring  28367  zexpscl  28392  pw2cutp1  28418  zs12addscl  28426  zs12bday  28433
  Copyright terms: Public domain W3C validator