Metamath Proof Explorer


Theorem nn0xmulclb

Description: Finite multiplication in the extended nonnegative integers. (Contributed by Thierry Arnoux, 30-Jul-2023)

Ref Expression
Assertion nn0xmulclb ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 → A ⋅ 𝑒 B ∈ ℕ 0 ↔ A ∈ ℕ 0 ∧ B ∈ ℕ 0

Proof

Step Hyp Ref Expression
1 simplr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ⋅ 𝑒 B ∈ ℕ 0
2 simpr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → A = +∞
3 2 oveq1d ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → A ⋅ 𝑒 B = +∞ ⋅ 𝑒 B
4 xnn0xr ⊢ B ∈ ℕ 0 * → B ∈ ℝ *
5 4 ad5antlr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → B ∈ ℝ *
6 simp-5r ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → B ∈ ℕ 0 *
7 simprr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 → B ≠ 0
8 7 ad3antrrr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → B ≠ 0
9 xnn0gt0 ⊢ B ∈ ℕ 0 * ∧ B ≠ 0 → 0 < B
10 6 8 9 syl2anc ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → 0 < B
11 xmulpnf2 ⊢ B ∈ ℝ * ∧ 0 < B → +∞ ⋅ 𝑒 B = +∞
12 5 10 11 syl2anc ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → +∞ ⋅ 𝑒 B = +∞
13 pnfnre2 ⊢ ¬ +∞ ∈ ℝ
14 nn0re ⊢ +∞ ∈ ℕ 0 → +∞ ∈ ℝ
15 13 14 mto ⊢ ¬ +∞ ∈ ℕ 0
16 15 a1i ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → ¬ +∞ ∈ ℕ 0
17 12 16 eqneltrd ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → ¬ +∞ ⋅ 𝑒 B ∈ ℕ 0
18 3 17 eqneltrd ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ A = +∞ → ¬ A ⋅ 𝑒 B ∈ ℕ 0
19 simpr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → B = +∞
20 19 oveq2d ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → A ⋅ 𝑒 B = A ⋅ 𝑒 +∞
21 xnn0xr ⊢ A ∈ ℕ 0 * → A ∈ ℝ *
22 21 ad5antr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → A ∈ ℝ *
23 simp-5l ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → A ∈ ℕ 0 *
24 simprl ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 → A ≠ 0
25 24 ad3antrrr ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → A ≠ 0
26 xnn0gt0 ⊢ A ∈ ℕ 0 * ∧ A ≠ 0 → 0 < A
27 23 25 26 syl2anc ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → 0 < A
28 xmulpnf1 ⊢ A ∈ ℝ * ∧ 0 < A → A ⋅ 𝑒 +∞ = +∞
29 22 27 28 syl2anc ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → A ⋅ 𝑒 +∞ = +∞
30 15 a1i ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → ¬ +∞ ∈ ℕ 0
31 29 30 eqneltrd ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → ¬ A ⋅ 𝑒 +∞ ∈ ℕ 0
32 20 31 eqneltrd ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 ∧ B = +∞ → ¬ A ⋅ 𝑒 B ∈ ℕ 0
33 xnn0nnn0pnf ⊢ A ∈ ℕ 0 * ∧ ¬ A ∈ ℕ 0 → A = +∞
34 33 ad5ant15 ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 → A = +∞
35 34 ex ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 → ¬ A ∈ ℕ 0 → A = +∞
36 xnn0nnn0pnf ⊢ B ∈ ℕ 0 * ∧ ¬ B ∈ ℕ 0 → B = +∞
37 36 ad5ant25 ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ B ∈ ℕ 0 → B = +∞
38 37 ex ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 → ¬ B ∈ ℕ 0 → B = +∞
39 35 38 orim12d ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 → ¬ A ∈ ℕ 0 ∨ ¬ B ∈ ℕ 0 → A = +∞ ∨ B = +∞
40 pm3.13 ⊢ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → ¬ A ∈ ℕ 0 ∨ ¬ B ∈ ℕ 0
41 39 40 impel ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A = +∞ ∨ B = +∞
42 18 32 41 mpjaodan ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 ∧ ¬ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → ¬ A ⋅ 𝑒 B ∈ ℕ 0
43 1 42 condan ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ⋅ 𝑒 B ∈ ℕ 0 → A ∈ ℕ 0 ∧ B ∈ ℕ 0
44 nn0re ⊢ A ∈ ℕ 0 → A ∈ ℝ
45 44 ad2antrl ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ∈ ℝ
46 nn0re ⊢ B ∈ ℕ 0 → B ∈ ℝ
47 46 ad2antll ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → B ∈ ℝ
48 rexmul ⊢ A ∈ ℝ ∧ B ∈ ℝ → A ⋅ 𝑒 B = A ⁢ B
49 45 47 48 syl2anc ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ⋅ 𝑒 B = A ⁢ B
50 nn0mulcl ⊢ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ⁢ B ∈ ℕ 0
51 50 adantl ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ⁢ B ∈ ℕ 0
52 49 51 eqeltrd ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 ∧ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A ⋅ 𝑒 B ∈ ℕ 0
53 43 52 impbida ⊢ A ∈ ℕ 0 * ∧ B ∈ ℕ 0 * ∧ A ≠ 0 ∧ B ≠ 0 → A ⋅ 𝑒 B ∈ ℕ 0 ↔ A ∈ ℕ 0 ∧ B ∈ ℕ 0