Metamath Proof Explorer


Theorem prmdvdsfmtnof1lem2

Description: Lemma 2 for prmdvdsfmtnof1 . (Contributed by AV, 3-Aug-2021)

Ref Expression
Assertion prmdvdsfmtnof1lem2 FranFermatNoGranFermatNoIIFIGF=G

Proof

Step Hyp Ref Expression
1 fmtnorn FranFermatNon0FermatNon=F
2 fmtnorn GranFermatNom0FermatNom=G
3 2a1 F=GFermatNon=FIIFIGF=G
4 3 2a1d F=Gn0m0FermatNom=GFermatNon=FIIFIGF=G
5 fmtnonn n0FermatNon
6 5 ad2antrl ¬F=Gn0m0FermatNon
7 6 adantr ¬F=Gn0m0FermatNom=GFermatNon=FFermatNon
8 eleq1 FermatNon=FFermatNonF
9 8 ad2antll ¬F=Gn0m0FermatNom=GFermatNon=FFermatNonF
10 7 9 mpbid ¬F=Gn0m0FermatNom=GFermatNon=FF
11 fmtnonn m0FermatNom
12 11 ad2antll ¬F=Gn0m0FermatNom
13 12 adantr ¬F=Gn0m0FermatNom=GFermatNon=FFermatNom
14 eleq1 FermatNom=GFermatNomG
15 14 ad2antrl ¬F=Gn0m0FermatNom=GFermatNon=FFermatNomG
16 13 15 mpbid ¬F=Gn0m0FermatNom=GFermatNon=FG
17 simpll n0m0¬FermatNon=FermatNomn0
18 simplr n0m0¬FermatNon=FermatNomm0
19 fveq2 n=mFermatNon=FermatNom
20 19 con3i ¬FermatNon=FermatNom¬n=m
21 20 adantl n0m0¬FermatNon=FermatNom¬n=m
22 21 neqned n0m0¬FermatNon=FermatNomnm
23 goldbachth n0m0nmFermatNongcdFermatNom=1
24 17 18 22 23 syl3anc n0m0¬FermatNon=FermatNomFermatNongcdFermatNom=1
25 24 ex n0m0¬FermatNon=FermatNomFermatNongcdFermatNom=1
26 eqeq12 FermatNon=FFermatNom=GFermatNon=FermatNomF=G
27 26 notbid FermatNon=FFermatNom=G¬FermatNon=FermatNom¬F=G
28 oveq12 FermatNon=FFermatNom=GFermatNongcdFermatNom=FgcdG
29 28 eqeq1d FermatNon=FFermatNom=GFermatNongcdFermatNom=1FgcdG=1
30 27 29 imbi12d FermatNon=FFermatNom=G¬FermatNon=FermatNomFermatNongcdFermatNom=1¬F=GFgcdG=1
31 30 ancoms FermatNom=GFermatNon=F¬FermatNon=FermatNomFermatNongcdFermatNom=1¬F=GFgcdG=1
32 25 31 syl5ibcom n0m0FermatNom=GFermatNon=F¬F=GFgcdG=1
33 32 com23 n0m0¬F=GFermatNom=GFermatNon=FFgcdG=1
34 33 impcom ¬F=Gn0m0FermatNom=GFermatNon=FFgcdG=1
35 34 imp ¬F=Gn0m0FermatNom=GFermatNon=FFgcdG=1
36 prmnn II
37 coprmdvds1 FGFgcdG=1IIFIGI=1
38 37 imp FGFgcdG=1IIFIGI=1
39 36 38 syl3anr1 FGFgcdG=1IIFIGI=1
40 eleq1 I=1I1
41 1nprm ¬1
42 41 pm2.21i 1F=G
43 40 42 syl6bi I=1IF=G
44 43 com12 II=1F=G
45 44 a1d IFGFgcdG=1I=1F=G
46 45 3ad2ant1 IIFIGFGFgcdG=1I=1F=G
47 46 impcom FGFgcdG=1IIFIGI=1F=G
48 39 47 mpd FGFgcdG=1IIFIGF=G
49 48 ex FGFgcdG=1IIFIGF=G
50 10 16 35 49 syl3anc ¬F=Gn0m0FermatNom=GFermatNon=FIIFIGF=G
51 50 exp43 ¬F=Gn0m0FermatNom=GFermatNon=FIIFIGF=G
52 4 51 pm2.61i n0m0FermatNom=GFermatNon=FIIFIGF=G
53 52 rexlimdva n0m0FermatNom=GFermatNon=FIIFIGF=G
54 53 com23 n0FermatNon=Fm0FermatNom=GIIFIGF=G
55 54 rexlimiv n0FermatNon=Fm0FermatNom=GIIFIGF=G
56 55 imp n0FermatNon=Fm0FermatNom=GIIFIGF=G
57 1 2 56 syl2anb FranFermatNoGranFermatNoIIFIGF=G