Metamath Proof Explorer


Theorem nprmdvdsfacm1

Description: A non-prime integer greater than 5 divides the factorial of the integer decreased by 1 (see remark in Ribenboim p. 181). Note: not valid for N = 4 , but for N = 1 ! (Contributed by AV, 7-Apr-2026)

Ref Expression
Assertion nprmdvdsfacm1 ⊢ N ∈ ℤ ≥ 6 ∧ N ∉ ℙ → N ∥ N − 1 !

Proof

Step Hyp Ref Expression
1 4z ⊢ 4 ∈ ℤ
2 6nn ⊢ 6 ∈ ℕ
3 2 nnzi ⊢ 6 ∈ ℤ
4 4re ⊢ 4 ∈ ℝ
5 6re ⊢ 6 ∈ ℝ
6 4lt6 ⊢ 4 < 6
7 4 5 6 ltleii ⊢ 4 ≤ 6
8 eluz2 ⊢ 6 ∈ ℤ ≥ 4 ↔ 4 ∈ ℤ ∧ 6 ∈ ℤ ∧ 4 ≤ 6
9 1 3 7 8 mpbir3an ⊢ 6 ∈ ℤ ≥ 4
10 uzss ⊢ 6 ∈ ℤ ≥ 4 → ℤ ≥ 6 ⊆ ℤ ≥ 4
11 9 10 ax-mp ⊢ ℤ ≥ 6 ⊆ ℤ ≥ 4
12 11 sseli ⊢ N ∈ ℤ ≥ 6 → N ∈ ℤ ≥ 4
13 nprmmul3 ⊢ N ∈ ℤ ≥ 4 → N ∉ ℙ ↔ ∃ a ∈ 2 ..^ N ∃ b ∈ 2 ..^ N a < b ∧ N = a ⁢ b ∨ ∃ a ∈ 2 ..^ N N = a 2
14 12 13 syl ⊢ N ∈ ℤ ≥ 6 → N ∉ ℙ ↔ ∃ a ∈ 2 ..^ N ∃ b ∈ 2 ..^ N a < b ∧ N = a ⁢ b ∨ ∃ a ∈ 2 ..^ N N = a 2
15 elfzo2nn ⊢ a ∈ 2 ..^ N → a ∈ ℕ
16 15 ad2antrl ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N → a ∈ ℕ
17 16 adantr ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → a ∈ ℕ
18 elfzo2nn ⊢ b ∈ 2 ..^ N → b ∈ ℕ
19 18 ad2antll ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N → b ∈ ℕ
20 19 adantr ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → b ∈ ℕ
21 simprl ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → a < b
22 elfzo1 ⊢ a ∈ 1 ..^ b ↔ a ∈ ℕ ∧ b ∈ ℕ ∧ a < b
23 17 20 21 22 syl3anbrc ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → a ∈ 1 ..^ b
24 2eluzge1 ⊢ 2 ∈ ℤ ≥ 1
25 fzoss1 ⊢ 2 ∈ ℤ ≥ 1 → 2 ..^ N ⊆ 1 ..^ N
26 24 25 ax-mp ⊢ 2 ..^ N ⊆ 1 ..^ N
27 26 sseli ⊢ b ∈ 2 ..^ N → b ∈ 1 ..^ N
28 27 ad2antll ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N → b ∈ 1 ..^ N
29 28 adantr ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → b ∈ 1 ..^ N
30 muldvdsfacm1 ⊢ a ∈ 1 ..^ b ∧ b ∈ 1 ..^ N → a ⁢ b ∥ N − 1 !
31 23 29 30 syl2anc ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → a ⁢ b ∥ N − 1 !
32 breq1 ⊢ N = a ⁢ b → N ∥ N − 1 ! ↔ a ⁢ b ∥ N − 1 !
33 32 ad2antll ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → N ∥ N − 1 ! ↔ a ⁢ b ∥ N − 1 !
34 31 33 mpbird ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N ∧ a < b ∧ N = a ⁢ b → N ∥ N − 1 !
35 34 ex ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ b ∈ 2 ..^ N → a < b ∧ N = a ⁢ b → N ∥ N − 1 !
36 35 rexlimdvva ⊢ N ∈ ℤ ≥ 6 → ∃ a ∈ 2 ..^ N ∃ b ∈ 2 ..^ N a < b ∧ N = a ⁢ b → N ∥ N − 1 !
37 nprmdvdsfacm1lem4 ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N ∧ N = a 2 → N ∥ N − 1 !
38 37 3expia ⊢ N ∈ ℤ ≥ 6 ∧ a ∈ 2 ..^ N → N = a 2 → N ∥ N − 1 !
39 38 rexlimdva ⊢ N ∈ ℤ ≥ 6 → ∃ a ∈ 2 ..^ N N = a 2 → N ∥ N − 1 !
40 36 39 jaod ⊢ N ∈ ℤ ≥ 6 → ∃ a ∈ 2 ..^ N ∃ b ∈ 2 ..^ N a < b ∧ N = a ⁢ b ∨ ∃ a ∈ 2 ..^ N N = a 2 → N ∥ N − 1 !
41 14 40 sylbid ⊢ N ∈ ℤ ≥ 6 → N ∉ ℙ → N ∥ N − 1 !
42 41 imp ⊢ N ∈ ℤ ≥ 6 ∧ N ∉ ℙ → N ∥ N − 1 !