Metamath Proof Explorer


Theorem ncoprmlnprm

Description: If two positive integers are not coprime, the larger of them is not a prime number. (Contributed by AV, 9-Aug-2020)

Ref Expression
Assertion ncoprmlnprm ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → 1 < A gcd B → B ∉ ℙ

Proof

Step Hyp Ref Expression
1 ncoprmgcdgt1b ⊢ A ∈ ℕ ∧ B ∈ ℕ → ∃ i ∈ ℤ ≥ 2 i ∥ A ∧ i ∥ B ↔ 1 < A gcd B
2 1 bicomd ⊢ A ∈ ℕ ∧ B ∈ ℕ → 1 < A gcd B ↔ ∃ i ∈ ℤ ≥ 2 i ∥ A ∧ i ∥ B
3 2 3adant3 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → 1 < A gcd B ↔ ∃ i ∈ ℤ ≥ 2 i ∥ A ∧ i ∥ B
4 simp1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → A ∈ ℕ
5 eluzelz ⊢ i ∈ ℤ ≥ 2 → i ∈ ℤ
6 4 5 anim12ci ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ∈ ℤ ∧ A ∈ ℕ
7 dvdsle ⊢ i ∈ ℤ ∧ A ∈ ℕ → i ∥ A → i ≤ A
8 6 7 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ∥ A → i ≤ A
9 nnre ⊢ A ∈ ℕ → A ∈ ℝ
10 nnre ⊢ B ∈ ℕ → B ∈ ℝ
11 eluzelre ⊢ i ∈ ℤ ≥ 2 → i ∈ ℝ
12 9 10 11 3anim123i ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ i ∈ ℤ ≥ 2 → A ∈ ℝ ∧ B ∈ ℝ ∧ i ∈ ℝ
13 3anrot ⊢ i ∈ ℝ ∧ A ∈ ℝ ∧ B ∈ ℝ ↔ A ∈ ℝ ∧ B ∈ ℝ ∧ i ∈ ℝ
14 12 13 sylibr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ i ∈ ℤ ≥ 2 → i ∈ ℝ ∧ A ∈ ℝ ∧ B ∈ ℝ
15 lelttr ⊢ i ∈ ℝ ∧ A ∈ ℝ ∧ B ∈ ℝ → i ≤ A ∧ A < B → i < B
16 14 15 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ i ∈ ℤ ≥ 2 → i ≤ A ∧ A < B → i < B
17 16 expcomd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ i ∈ ℤ ≥ 2 → A < B → i ≤ A → i < B
18 17 3exp ⊢ A ∈ ℕ → B ∈ ℕ → i ∈ ℤ ≥ 2 → A < B → i ≤ A → i < B
19 18 com34 ⊢ A ∈ ℕ → B ∈ ℕ → A < B → i ∈ ℤ ≥ 2 → i ≤ A → i < B
20 19 3imp1 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ≤ A → i < B
21 20 imp ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ≤ A → i < B
22 nnz ⊢ B ∈ ℕ → B ∈ ℤ
23 22 3ad2ant2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → B ∈ ℤ
24 23 5 anim12ci ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ∈ ℤ ∧ B ∈ ℤ
25 24 adantr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ≤ A → i ∈ ℤ ∧ B ∈ ℤ
26 zltlem1 ⊢ i ∈ ℤ ∧ B ∈ ℤ → i < B ↔ i ≤ B − 1
27 25 26 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ≤ A → i < B ↔ i ≤ B − 1
28 21 27 mpbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ≤ A → i ≤ B − 1
29 28 ex ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ≤ A → i ≤ B − 1
30 8 29 syldc ⊢ i ∥ A → A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ≤ B − 1
31 30 adantr ⊢ i ∥ A ∧ i ∥ B → A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ≤ B − 1
32 31 impcom ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → i ≤ B − 1
33 peano2zm ⊢ B ∈ ℤ → B − 1 ∈ ℤ
34 22 33 syl ⊢ B ∈ ℕ → B − 1 ∈ ℤ
35 34 3ad2ant2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → B − 1 ∈ ℤ
36 35 anim1ci ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 → i ∈ ℤ ≥ 2 ∧ B − 1 ∈ ℤ
37 36 adantr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → i ∈ ℤ ≥ 2 ∧ B − 1 ∈ ℤ
38 elfz5 ⊢ i ∈ ℤ ≥ 2 ∧ B − 1 ∈ ℤ → i ∈ 2 … B − 1 ↔ i ≤ B − 1
39 37 38 syl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → i ∈ 2 … B − 1 ↔ i ≤ B − 1
40 32 39 mpbird ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → i ∈ 2 … B − 1
41 breq1 ⊢ j = i → j ∥ B ↔ i ∥ B
42 41 adantl ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B ∧ j = i → j ∥ B ↔ i ∥ B
43 simprr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → i ∥ B
44 40 42 43 rspcedvd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → ∃ j ∈ 2 … B − 1 j ∥ B
45 rexnal ⊢ ∃ j ∈ 2 … B − 1 ¬ ¬ j ∥ B ↔ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
46 notnotb ⊢ j ∥ B ↔ ¬ ¬ j ∥ B
47 46 bicomi ⊢ ¬ ¬ j ∥ B ↔ j ∥ B
48 47 rexbii ⊢ ∃ j ∈ 2 … B − 1 ¬ ¬ j ∥ B ↔ ∃ j ∈ 2 … B − 1 j ∥ B
49 45 48 bitr3i ⊢ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B ↔ ∃ j ∈ 2 … B − 1 j ∥ B
50 44 49 sylibr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
51 50 olcd ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → ¬ B ∈ ℤ ≥ 2 ∨ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
52 df-nel ⊢ B ∉ ℙ ↔ ¬ B ∈ ℙ
53 ianor ⊢ ¬ B ∈ ℤ ≥ 2 ∧ ∀ j ∈ 2 … B − 1 ¬ j ∥ B ↔ ¬ B ∈ ℤ ≥ 2 ∨ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
54 isprm3 ⊢ B ∈ ℙ ↔ B ∈ ℤ ≥ 2 ∧ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
55 53 54 xchnxbir ⊢ ¬ B ∈ ℙ ↔ ¬ B ∈ ℤ ≥ 2 ∨ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
56 52 55 bitri ⊢ B ∉ ℙ ↔ ¬ B ∈ ℤ ≥ 2 ∨ ¬ ∀ j ∈ 2 … B − 1 ¬ j ∥ B
57 51 56 sylibr ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B ∧ i ∈ ℤ ≥ 2 ∧ i ∥ A ∧ i ∥ B → B ∉ ℙ
58 57 rexlimdva2 ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → ∃ i ∈ ℤ ≥ 2 i ∥ A ∧ i ∥ B → B ∉ ℙ
59 3 58 sylbid ⊢ A ∈ ℕ ∧ B ∈ ℕ ∧ A < B → 1 < A gcd B → B ∉ ℙ