Metamath Proof Explorer


Theorem prmdvdsfmtnof

Description: The mapping of a Fermat number to its smallest prime factor is a function. (Contributed by AV, 4-Aug-2021) (Proof shortened by II, 16-Feb-2023)

Ref Expression
Hypothesis prmdvdsfmtnof.1 F=franFermatNosupp|pf<
Assertion prmdvdsfmtnof F:ranFermatNo

Proof

Step Hyp Ref Expression
1 prmdvdsfmtnof.1 F=franFermatNosupp|pf<
2 fmtnorn franFermatNon0FermatNon=f
3 ltso <Or
4 3 a1i n0FermatNon=f<Or
5 fmtnoge3 n0FermatNon3
6 5 adantr n0FermatNon=fFermatNon3
7 eleq1 FermatNon=fFermatNon3f3
8 7 adantl n0FermatNon=fFermatNon3f3
9 6 8 mpbid n0FermatNon=ff3
10 uzuzle23 f3f2
11 9 10 syl n0FermatNon=ff2
12 eluz2nn f2f
13 prmdvdsfi fp|pfFin
14 11 12 13 3syl n0FermatNon=fp|pfFin
15 exprmfct f2ppf
16 11 15 syl n0FermatNon=fppf
17 rabn0 p|pfppf
18 16 17 sylibr n0FermatNon=fp|pf
19 ssrab2 p|pf
20 prmssnn
21 nnssre
22 20 21 sstri
23 19 22 sstri p|pf
24 23 a1i n0FermatNon=fp|pf
25 fiinfcl <Orp|pfFinp|pfp|pfsupp|pf<p|pf
26 19 25 sselid <Orp|pfFinp|pfp|pfsupp|pf<
27 4 14 18 24 26 syl13anc n0FermatNon=fsupp|pf<
28 27 rexlimiva n0FermatNon=fsupp|pf<
29 2 28 sylbi franFermatNosupp|pf<
30 1 29 fmpti F:ranFermatNo