Metamath Proof Explorer


Theorem ppivalnnprm

Description: Value of a term of the prime-counting function pi for positive integers, according to Ján Mináč, for a prime number. (Contributed by AV, 10-Apr-2026)

Ref Expression
Assertion ppivalnnprm P P 1 ! + 1 P P 1 ! P = 1

Proof

Step Hyp Ref Expression
1 wilth P P 2 P P 1 ! + 1
2 eluzelz P 2 P
3 eluz2nn P 2 P
4 nnm1nn0 P P 1 0
5 3 4 syl P 2 P 1 0
6 5 faccld P 2 P 1 !
7 6 nnzd P 2 P 1 !
8 7 peano2zd P 2 P 1 ! + 1
9 divides P P 1 ! + 1 P P 1 ! + 1 m m P = P 1 ! + 1
10 2 8 9 syl2anc P 2 P P 1 ! + 1 m m P = P 1 ! + 1
11 oveq1 P 1 ! + 1 = m P P 1 ! + 1 P = m P P
12 11 eqcoms m P = P 1 ! + 1 P 1 ! + 1 P = m P P
13 zcn m m
14 13 adantl P 2 m m
15 eluzelcn P 2 P
16 15 adantr P 2 m P
17 eluz2n0 P 2 P 0
18 17 adantr P 2 m P 0
19 14 16 18 divcan4d P 2 m m P P = m
20 12 19 sylan9eqr P 2 m m P = P 1 ! + 1 P 1 ! + 1 P = m
21 6 nncnd P 2 P 1 !
22 pncan1 P 1 ! P 1 ! + 1 - 1 = P 1 !
23 21 22 syl P 2 P 1 ! + 1 - 1 = P 1 !
24 23 eqcomd P 2 P 1 ! = P 1 ! + 1 - 1
25 24 adantr P 2 m P 1 ! = P 1 ! + 1 - 1
26 oveq1 P 1 ! + 1 = m P P 1 ! + 1 - 1 = m P 1
27 26 eqcoms m P = P 1 ! + 1 P 1 ! + 1 - 1 = m P 1
28 25 27 sylan9eq P 2 m m P = P 1 ! + 1 P 1 ! = m P 1
29 28 oveq1d P 2 m m P = P 1 ! + 1 P 1 ! P = m P 1 P
30 simpr P 2 m m
31 2 adantr P 2 m P
32 30 31 zmulcld P 2 m m P
33 32 zcnd P 2 m m P
34 1cnd P 2 m 1
35 33 34 16 18 divsubdird P 2 m m P 1 P = m P P 1 P
36 19 oveq1d P 2 m m P P 1 P = m 1 P
37 35 36 eqtrd P 2 m m P 1 P = m 1 P
38 37 adantr P 2 m m P = P 1 ! + 1 m P 1 P = m 1 P
39 29 38 eqtrd P 2 m m P = P 1 ! + 1 P 1 ! P = m 1 P
40 39 fveq2d P 2 m m P = P 1 ! + 1 P 1 ! P = m 1 P
41 3 anim1ci P 2 m m P
42 flmrecm1 m P m 1 P = m 1
43 41 42 syl P 2 m m 1 P = m 1
44 43 adantr P 2 m m P = P 1 ! + 1 m 1 P = m 1
45 40 44 eqtrd P 2 m m P = P 1 ! + 1 P 1 ! P = m 1
46 20 45 oveq12d P 2 m m P = P 1 ! + 1 P 1 ! + 1 P P 1 ! P = m m 1
47 46 fveq2d P 2 m m P = P 1 ! + 1 P 1 ! + 1 P P 1 ! P = m m 1
48 1cnd m 1
49 13 48 nncand m m m 1 = 1
50 49 fveq2d m m m 1 = 1
51 1z 1
52 flid 1 1 = 1
53 51 52 mp1i m 1 = 1
54 50 53 eqtrd m m m 1 = 1
55 54 adantl P 2 m m m 1 = 1
56 55 adantr P 2 m m P = P 1 ! + 1 m m 1 = 1
57 47 56 eqtrd P 2 m m P = P 1 ! + 1 P 1 ! + 1 P P 1 ! P = 1
58 57 ex P 2 m m P = P 1 ! + 1 P 1 ! + 1 P P 1 ! P = 1
59 58 rexlimdva P 2 m m P = P 1 ! + 1 P 1 ! + 1 P P 1 ! P = 1
60 10 59 sylbid P 2 P P 1 ! + 1 P 1 ! + 1 P P 1 ! P = 1
61 60 imp P 2 P P 1 ! + 1 P 1 ! + 1 P P 1 ! P = 1
62 1 61 sylbi P P 1 ! + 1 P P 1 ! P = 1