Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > pcmptcl | Structured version Visualization version GIF version |
Description: Closure for the prime power map. (Contributed by Mario Carneiro, 12-Mar-2014.) |
Ref | Expression |
---|---|
pcmpt.1 | ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1)) |
pcmpt.2 | ⊢ (𝜑 → ∀𝑛 ∈ ℙ 𝐴 ∈ ℕ0) |
Ref | Expression |
---|---|
pcmptcl | ⊢ (𝜑 → (𝐹:ℕ⟶ℕ ∧ seq1( · , 𝐹):ℕ⟶ℕ)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | pcmpt.2 | . . . 4 ⊢ (𝜑 → ∀𝑛 ∈ ℙ 𝐴 ∈ ℕ0) | |
2 | pm2.27 42 | . . . . . . . 8 ⊢ (𝑛 ∈ ℙ → ((𝑛 ∈ ℙ → 𝐴 ∈ ℕ0) → 𝐴 ∈ ℕ0)) | |
3 | iftrue 4431 | . . . . . . . . . . 11 ⊢ (𝑛 ∈ ℙ → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) = (𝑛↑𝐴)) | |
4 | 3 | adantr 484 | . . . . . . . . . 10 ⊢ ((𝑛 ∈ ℙ ∧ 𝐴 ∈ ℕ0) → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) = (𝑛↑𝐴)) |
5 | prmnn 16194 | . . . . . . . . . . 11 ⊢ (𝑛 ∈ ℙ → 𝑛 ∈ ℕ) | |
6 | nnexpcl 13613 | . . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ 𝐴 ∈ ℕ0) → (𝑛↑𝐴) ∈ ℕ) | |
7 | 5, 6 | sylan 583 | . . . . . . . . . 10 ⊢ ((𝑛 ∈ ℙ ∧ 𝐴 ∈ ℕ0) → (𝑛↑𝐴) ∈ ℕ) |
8 | 4, 7 | eqeltrd 2831 | . . . . . . . . 9 ⊢ ((𝑛 ∈ ℙ ∧ 𝐴 ∈ ℕ0) → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ) |
9 | 8 | ex 416 | . . . . . . . 8 ⊢ (𝑛 ∈ ℙ → (𝐴 ∈ ℕ0 → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ)) |
10 | 2, 9 | syld 47 | . . . . . . 7 ⊢ (𝑛 ∈ ℙ → ((𝑛 ∈ ℙ → 𝐴 ∈ ℕ0) → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ)) |
11 | iffalse 4434 | . . . . . . . . 9 ⊢ (¬ 𝑛 ∈ ℙ → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) = 1) | |
12 | 1nn 11806 | . . . . . . . . 9 ⊢ 1 ∈ ℕ | |
13 | 11, 12 | eqeltrdi 2839 | . . . . . . . 8 ⊢ (¬ 𝑛 ∈ ℙ → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ) |
14 | 13 | a1d 25 | . . . . . . 7 ⊢ (¬ 𝑛 ∈ ℙ → ((𝑛 ∈ ℙ → 𝐴 ∈ ℕ0) → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ)) |
15 | 10, 14 | pm2.61i 185 | . . . . . 6 ⊢ ((𝑛 ∈ ℙ → 𝐴 ∈ ℕ0) → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ) |
16 | 15 | a1d 25 | . . . . 5 ⊢ ((𝑛 ∈ ℙ → 𝐴 ∈ ℕ0) → (𝑛 ∈ ℕ → if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ)) |
17 | 16 | ralimi2 3070 | . . . 4 ⊢ (∀𝑛 ∈ ℙ 𝐴 ∈ ℕ0 → ∀𝑛 ∈ ℕ if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ) |
18 | 1, 17 | syl 17 | . . 3 ⊢ (𝜑 → ∀𝑛 ∈ ℕ if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ) |
19 | pcmpt.1 | . . . 4 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1)) | |
20 | 19 | fmpt 6905 | . . 3 ⊢ (∀𝑛 ∈ ℕ if(𝑛 ∈ ℙ, (𝑛↑𝐴), 1) ∈ ℕ ↔ 𝐹:ℕ⟶ℕ) |
21 | 18, 20 | sylib 221 | . 2 ⊢ (𝜑 → 𝐹:ℕ⟶ℕ) |
22 | nnuz 12442 | . . 3 ⊢ ℕ = (ℤ≥‘1) | |
23 | 1zzd 12173 | . . 3 ⊢ (𝜑 → 1 ∈ ℤ) | |
24 | 21 | ffvelrnda 6882 | . . 3 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘𝑘) ∈ ℕ) |
25 | nnmulcl 11819 | . . . 4 ⊢ ((𝑘 ∈ ℕ ∧ 𝑝 ∈ ℕ) → (𝑘 · 𝑝) ∈ ℕ) | |
26 | 25 | adantl 485 | . . 3 ⊢ ((𝜑 ∧ (𝑘 ∈ ℕ ∧ 𝑝 ∈ ℕ)) → (𝑘 · 𝑝) ∈ ℕ) |
27 | 22, 23, 24, 26 | seqf 13562 | . 2 ⊢ (𝜑 → seq1( · , 𝐹):ℕ⟶ℕ) |
28 | 21, 27 | jca 515 | 1 ⊢ (𝜑 → (𝐹:ℕ⟶ℕ ∧ seq1( · , 𝐹):ℕ⟶ℕ)) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ∧ wa 399 = wceq 1543 ∈ wcel 2112 ∀wral 3051 ifcif 4425 ↦ cmpt 5120 ⟶wf 6354 (class class class)co 7191 1c1 10695 · cmul 10699 ℕcn 11795 ℕ0cn0 12055 seqcseq 13539 ↑cexp 13600 ℙcprime 16191 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1803 ax-4 1817 ax-5 1918 ax-6 1976 ax-7 2018 ax-8 2114 ax-9 2122 ax-10 2143 ax-11 2160 ax-12 2177 ax-ext 2708 ax-sep 5177 ax-nul 5184 ax-pow 5243 ax-pr 5307 ax-un 7501 ax-cnex 10750 ax-resscn 10751 ax-1cn 10752 ax-icn 10753 ax-addcl 10754 ax-addrcl 10755 ax-mulcl 10756 ax-mulrcl 10757 ax-mulcom 10758 ax-addass 10759 ax-mulass 10760 ax-distr 10761 ax-i2m1 10762 ax-1ne0 10763 ax-1rid 10764 ax-rnegex 10765 ax-rrecex 10766 ax-cnre 10767 ax-pre-lttri 10768 ax-pre-lttrn 10769 ax-pre-ltadd 10770 ax-pre-mulgt0 10771 |
This theorem depends on definitions: df-bi 210 df-an 400 df-or 848 df-3or 1090 df-3an 1091 df-tru 1546 df-fal 1556 df-ex 1788 df-nf 1792 df-sb 2073 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2728 df-clel 2809 df-nfc 2879 df-ne 2933 df-nel 3037 df-ral 3056 df-rex 3057 df-reu 3058 df-rab 3060 df-v 3400 df-sbc 3684 df-csb 3799 df-dif 3856 df-un 3858 df-in 3860 df-ss 3870 df-pss 3872 df-nul 4224 df-if 4426 df-pw 4501 df-sn 4528 df-pr 4530 df-tp 4532 df-op 4534 df-uni 4806 df-iun 4892 df-br 5040 df-opab 5102 df-mpt 5121 df-tr 5147 df-id 5440 df-eprel 5445 df-po 5453 df-so 5454 df-fr 5494 df-we 5496 df-xp 5542 df-rel 5543 df-cnv 5544 df-co 5545 df-dm 5546 df-rn 5547 df-res 5548 df-ima 5549 df-pred 6140 df-ord 6194 df-on 6195 df-lim 6196 df-suc 6197 df-iota 6316 df-fun 6360 df-fn 6361 df-f 6362 df-f1 6363 df-fo 6364 df-f1o 6365 df-fv 6366 df-riota 7148 df-ov 7194 df-oprab 7195 df-mpo 7196 df-om 7623 df-1st 7739 df-2nd 7740 df-wrecs 8025 df-recs 8086 df-rdg 8124 df-er 8369 df-en 8605 df-dom 8606 df-sdom 8607 df-pnf 10834 df-mnf 10835 df-xr 10836 df-ltxr 10837 df-le 10838 df-sub 11029 df-neg 11030 df-nn 11796 df-n0 12056 df-z 12142 df-uz 12404 df-fz 13061 df-seq 13540 df-exp 13601 df-prm 16192 |
This theorem is referenced by: pcmpt 16408 pcmpt2 16409 pcmptdvds 16410 pcprod 16411 1arithlem4 16442 bposlem3 26121 bposlem5 26123 bposlem6 26124 |
Copyright terms: Public domain | W3C validator |