Metamath Proof Explorer


Theorem pythagtriplem13

Description: Lemma for pythagtrip . Show that N (which will eventually be closely related to the n in the final statement) is a natural. (Contributed by Scott Fenton, 17-Apr-2014) (Revised by Mario Carneiro, 19-Apr-2014)

Ref Expression
Hypothesis pythagtriplem13.1 ⊢ N = C + B − C − B 2
Assertion pythagtriplem13 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → N ∈ ℕ

Proof

Step Hyp Ref Expression
1 pythagtriplem13.1 ⊢ N = C + B − C − B 2
2 pythagtriplem9 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B ∈ ℕ
3 2 nnzd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B ∈ ℤ
4 simp3r ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → ¬ 2 ∥ A
5 2z ⊢ 2 ∈ ℤ
6 simp3 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C ∈ ℕ
7 simp2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → B ∈ ℕ
8 6 7 nnaddcld ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C + B ∈ ℕ
9 8 nnzd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C + B ∈ ℤ
10 9 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B ∈ ℤ
11 nnz ⊢ A ∈ ℕ → A ∈ ℤ
12 11 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → A ∈ ℤ
13 12 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → A ∈ ℤ
14 dvdsgcdb ⊢ 2 ∈ ℤ ∧ C + B ∈ ℤ ∧ A ∈ ℤ → 2 ∥ C + B ∧ 2 ∥ A ↔ 2 ∥ C + B gcd A
15 5 10 13 14 mp3an2i ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C + B ∧ 2 ∥ A ↔ 2 ∥ C + B gcd A
16 15 biimpar ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A ∧ 2 ∥ C + B gcd A → 2 ∥ C + B ∧ 2 ∥ A
17 16 simprd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A ∧ 2 ∥ C + B gcd A → 2 ∥ A
18 4 17 mtand ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → ¬ 2 ∥ C + B gcd A
19 pythagtriplem7 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B = C + B gcd A
20 19 breq2d ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C + B ↔ 2 ∥ C + B gcd A
21 18 20 mtbird ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → ¬ 2 ∥ C + B
22 pythagtriplem8 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B ∈ ℕ
23 22 nnzd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B ∈ ℤ
24 nnz ⊢ C ∈ ℕ → C ∈ ℤ
25 24 3ad2ant3 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C ∈ ℤ
26 nnz ⊢ B ∈ ℕ → B ∈ ℤ
27 26 3ad2ant2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → B ∈ ℤ
28 25 27 zsubcld ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C − B ∈ ℤ
29 28 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B ∈ ℤ
30 dvdsgcdb ⊢ 2 ∈ ℤ ∧ C − B ∈ ℤ ∧ A ∈ ℤ → 2 ∥ C − B ∧ 2 ∥ A ↔ 2 ∥ C − B gcd A
31 5 29 13 30 mp3an2i ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C − B ∧ 2 ∥ A ↔ 2 ∥ C − B gcd A
32 31 biimpar ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A ∧ 2 ∥ C − B gcd A → 2 ∥ C − B ∧ 2 ∥ A
33 32 simprd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A ∧ 2 ∥ C − B gcd A → 2 ∥ A
34 4 33 mtand ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → ¬ 2 ∥ C − B gcd A
35 pythagtriplem6 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B = C − B gcd A
36 35 breq2d ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C − B ↔ 2 ∥ C − B gcd A
37 34 36 mtbird ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → ¬ 2 ∥ C − B
38 omoe ⊢ C + B ∈ ℤ ∧ ¬ 2 ∥ C + B ∧ C − B ∈ ℤ ∧ ¬ 2 ∥ C − B → 2 ∥ C + B − C − B
39 3 21 23 37 38 syl22anc ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C + B − C − B
40 28 zred ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C − B ∈ ℝ
41 40 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B ∈ ℝ
42 simp13 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C ∈ ℕ
43 42 nnred ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C ∈ ℝ
44 8 nnred ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → C + B ∈ ℝ
45 44 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B ∈ ℝ
46 nnrp ⊢ B ∈ ℕ → B ∈ ℝ +
47 46 3ad2ant2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → B ∈ ℝ +
48 47 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → B ∈ ℝ +
49 43 48 ltsubrpd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B < C
50 nngt0 ⊢ B ∈ ℕ → 0 < B
51 50 3ad2ant2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → 0 < B
52 51 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < B
53 simp12 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → B ∈ ℕ
54 53 nnred ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → B ∈ ℝ
55 54 43 ltaddposd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < B ↔ C < C + B
56 52 55 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C < C + B
57 41 43 45 49 56 lttrd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B < C + B
58 pythagtriplem10 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 → 0 < C − B
59 58 3adant3 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C − B
60 0re ⊢ 0 ∈ ℝ
61 ltle ⊢ 0 ∈ ℝ ∧ C − B ∈ ℝ → 0 < C − B → 0 ≤ C − B
62 60 61 mpan ⊢ C − B ∈ ℝ → 0 < C − B → 0 ≤ C − B
63 41 59 62 sylc ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 ≤ C − B
64 nngt0 ⊢ C ∈ ℕ → 0 < C
65 64 3ad2ant3 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ → 0 < C
66 65 3ad2ant1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C
67 43 54 66 52 addgt0d ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C + B
68 ltle ⊢ 0 ∈ ℝ ∧ C + B ∈ ℝ → 0 < C + B → 0 ≤ C + B
69 60 68 mpan ⊢ C + B ∈ ℝ → 0 < C + B → 0 ≤ C + B
70 45 67 69 sylc ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 ≤ C + B
71 41 63 45 70 sqrtltd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B < C + B ↔ C − B < C + B
72 57 71 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B < C + B
73 nnsub ⊢ C − B ∈ ℕ ∧ C + B ∈ ℕ → C − B < C + B ↔ C + B − C − B ∈ ℕ
74 22 2 73 syl2anc ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C − B < C + B ↔ C + B − C − B ∈ ℕ
75 72 74 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B − C − B ∈ ℕ
76 75 nnzd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B − C − B ∈ ℤ
77 evend2 ⊢ C + B − C − B ∈ ℤ → 2 ∥ C + B − C − B ↔ C + B − C − B 2 ∈ ℤ
78 76 77 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 2 ∥ C + B − C − B ↔ C + B − C − B 2 ∈ ℤ
79 39 78 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B − C − B 2 ∈ ℤ
80 75 nngt0d ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C + B − C − B
81 75 nnred ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B − C − B ∈ ℝ
82 halfpos2 ⊢ C + B − C − B ∈ ℝ → 0 < C + B − C − B ↔ 0 < C + B − C − B 2
83 81 82 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C + B − C − B ↔ 0 < C + B − C − B 2
84 80 83 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → 0 < C + B − C − B 2
85 elnnz ⊢ C + B − C − B 2 ∈ ℕ ↔ C + B − C − B 2 ∈ ℤ ∧ 0 < C + B − C − B 2
86 79 84 85 sylanbrc ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → C + B − C − B 2 ∈ ℕ
87 1 86 eqeltrid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ C ∈ ℕ ∧ A 2 + B 2 = C 2 ∧ A gcd B = 1 ∧ ¬ 2 ∥ A → N ∈ ℕ