Metamath Proof Explorer


Theorem zindd

Description: Principle of Mathematical Induction on all integers, deduction version. The first five hypotheses give the substitutions; the last three are the basis, the induction, and the extension to negative numbers. (Contributed by Paul Chapman, 17-Apr-2009) (Proof shortened by Mario Carneiro, 4-Jan-2017)

Ref Expression
Hypotheses zindd.1 ⊢ x = 0 → φ ↔ ψ
zindd.2 ⊢ x = y → φ ↔ χ
zindd.3 ⊢ x = y + 1 → φ ↔ τ
zindd.4 ⊢ x = − y → φ ↔ θ
zindd.5 ⊢ x = A → φ ↔ η
zindd.6 ⊢ ζ → ψ
zindd.7 ⊢ ζ → y ∈ ℕ 0 → χ → τ
zindd.8 ⊢ ζ → y ∈ ℕ → χ → θ
Assertion zindd ⊢ ζ → A ∈ ℤ → η

Proof

Step Hyp Ref Expression
1 zindd.1 ⊢ x = 0 → φ ↔ ψ
2 zindd.2 ⊢ x = y → φ ↔ χ
3 zindd.3 ⊢ x = y + 1 → φ ↔ τ
4 zindd.4 ⊢ x = − y → φ ↔ θ
5 zindd.5 ⊢ x = A → φ ↔ η
6 zindd.6 ⊢ ζ → ψ
7 zindd.7 ⊢ ζ → y ∈ ℕ 0 → χ → τ
8 zindd.8 ⊢ ζ → y ∈ ℕ → χ → θ
9 znegcl ⊢ y ∈ ℤ → − y ∈ ℤ
10 elznn0nn ⊢ − y ∈ ℤ ↔ − y ∈ ℕ 0 ∨ − y ∈ ℝ ∧ − − y ∈ ℕ
11 9 10 sylib ⊢ y ∈ ℤ → − y ∈ ℕ 0 ∨ − y ∈ ℝ ∧ − − y ∈ ℕ
12 simpr ⊢ − y ∈ ℝ ∧ − − y ∈ ℕ → − − y ∈ ℕ
13 12 orim2i ⊢ − y ∈ ℕ 0 ∨ − y ∈ ℝ ∧ − − y ∈ ℕ → − y ∈ ℕ 0 ∨ − − y ∈ ℕ
14 11 13 syl ⊢ y ∈ ℤ → − y ∈ ℕ 0 ∨ − − y ∈ ℕ
15 zcn ⊢ y ∈ ℤ → y ∈ ℂ
16 15 negnegd ⊢ y ∈ ℤ → − − y = y
17 16 eleq1d ⊢ y ∈ ℤ → − − y ∈ ℕ ↔ y ∈ ℕ
18 17 orbi2d ⊢ y ∈ ℤ → − y ∈ ℕ 0 ∨ − − y ∈ ℕ ↔ − y ∈ ℕ 0 ∨ y ∈ ℕ
19 14 18 mpbid ⊢ y ∈ ℤ → − y ∈ ℕ 0 ∨ y ∈ ℕ
20 1 imbi2d ⊢ x = 0 → ζ → φ ↔ ζ → ψ
21 2 imbi2d ⊢ x = y → ζ → φ ↔ ζ → χ
22 3 imbi2d ⊢ x = y + 1 → ζ → φ ↔ ζ → τ
23 4 imbi2d ⊢ x = − y → ζ → φ ↔ ζ → θ
24 7 com12 ⊢ y ∈ ℕ 0 → ζ → χ → τ
25 24 a2d ⊢ y ∈ ℕ 0 → ζ → χ → ζ → τ
26 20 21 22 23 6 25 nn0ind ⊢ − y ∈ ℕ 0 → ζ → θ
27 26 com12 ⊢ ζ → − y ∈ ℕ 0 → θ
28 20 21 22 21 6 25 nn0ind ⊢ y ∈ ℕ 0 → ζ → χ
29 nnnn0 ⊢ y ∈ ℕ → y ∈ ℕ 0
30 28 29 syl11 ⊢ ζ → y ∈ ℕ → χ
31 30 8 mpdd ⊢ ζ → y ∈ ℕ → θ
32 27 31 jaod ⊢ ζ → − y ∈ ℕ 0 ∨ y ∈ ℕ → θ
33 19 32 syl5 ⊢ ζ → y ∈ ℤ → θ
34 33 ralrimiv ⊢ ζ → ∀ y ∈ ℤ θ
35 znegcl ⊢ x ∈ ℤ → − x ∈ ℤ
36 negeq ⊢ y = − x → − y = − − x
37 zcn ⊢ x ∈ ℤ → x ∈ ℂ
38 37 negnegd ⊢ x ∈ ℤ → − − x = x
39 36 38 sylan9eqr ⊢ x ∈ ℤ ∧ y = − x → − y = x
40 39 eqcomd ⊢ x ∈ ℤ ∧ y = − x → x = − y
41 40 4 syl ⊢ x ∈ ℤ ∧ y = − x → φ ↔ θ
42 41 bicomd ⊢ x ∈ ℤ ∧ y = − x → θ ↔ φ
43 35 42 rspcdv ⊢ x ∈ ℤ → ∀ y ∈ ℤ θ → φ
44 43 com12 ⊢ ∀ y ∈ ℤ θ → x ∈ ℤ → φ
45 44 ralrimiv ⊢ ∀ y ∈ ℤ θ → ∀ x ∈ ℤ φ
46 5 rspccv ⊢ ∀ x ∈ ℤ φ → A ∈ ℤ → η
47 34 45 46 3syl ⊢ ζ → A ∈ ℤ → η