Metamath Proof Explorer


Theorem prmdvdsfmtnof1lem2

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

Ref Expression
Assertion prmdvdsfmtnof1lem2 F ran FermatNo G ran FermatNo I I F I G F = G

Proof

Step Hyp Ref Expression
1 fmtnorn F ran FermatNo n 0 FermatNo n = F
2 fmtnorn G ran FermatNo m 0 FermatNo m = G
3 2a1 F = G FermatNo n = F I I F I G F = G
4 3 2a1d F = G n 0 m 0 FermatNo m = G FermatNo n = F I I F I G F = G
5 fmtnonn n 0 FermatNo n
6 5 ad2antrl ¬ F = G n 0 m 0 FermatNo n
7 6 adantr ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F FermatNo n
8 eleq1 FermatNo n = F FermatNo n F
9 8 ad2antll ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F FermatNo n F
10 7 9 mpbid ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F F
11 fmtnonn m 0 FermatNo m
12 11 ad2antll ¬ F = G n 0 m 0 FermatNo m
13 12 adantr ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F FermatNo m
14 eleq1 FermatNo m = G FermatNo m G
15 14 ad2antrl ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F FermatNo m G
16 13 15 mpbid ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F G
17 simpll n 0 m 0 ¬ FermatNo n = FermatNo m n 0
18 simplr n 0 m 0 ¬ FermatNo n = FermatNo m m 0
19 fveq2 n = m FermatNo n = FermatNo m
20 19 con3i ¬ FermatNo n = FermatNo m ¬ n = m
21 20 adantl n 0 m 0 ¬ FermatNo n = FermatNo m ¬ n = m
22 21 neqned n 0 m 0 ¬ FermatNo n = FermatNo m n m
23 goldbachth n 0 m 0 n m FermatNo n gcd FermatNo m = 1
24 17 18 22 23 syl3anc n 0 m 0 ¬ FermatNo n = FermatNo m FermatNo n gcd FermatNo m = 1
25 24 ex n 0 m 0 ¬ FermatNo n = FermatNo m FermatNo n gcd FermatNo m = 1
26 eqeq12 FermatNo n = F FermatNo m = G FermatNo n = FermatNo m F = G
27 26 notbid FermatNo n = F FermatNo m = G ¬ FermatNo n = FermatNo m ¬ F = G
28 oveq12 FermatNo n = F FermatNo m = G FermatNo n gcd FermatNo m = F gcd G
29 28 eqeq1d FermatNo n = F FermatNo m = G FermatNo n gcd FermatNo m = 1 F gcd G = 1
30 27 29 imbi12d FermatNo n = F FermatNo m = G ¬ FermatNo n = FermatNo m FermatNo n gcd FermatNo m = 1 ¬ F = G F gcd G = 1
31 30 ancoms FermatNo m = G FermatNo n = F ¬ FermatNo n = FermatNo m FermatNo n gcd FermatNo m = 1 ¬ F = G F gcd G = 1
32 25 31 syl5ibcom n 0 m 0 FermatNo m = G FermatNo n = F ¬ F = G F gcd G = 1
33 32 com23 n 0 m 0 ¬ F = G FermatNo m = G FermatNo n = F F gcd G = 1
34 33 impcom ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F F gcd G = 1
35 34 imp ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F F gcd G = 1
36 prmnn I I
37 coprmdvds1 F G F gcd G = 1 I I F I G I = 1
38 37 imp F G F gcd G = 1 I I F I G I = 1
39 36 38 syl3anr1 F G F gcd G = 1 I I F I G I = 1
40 eleq1 I = 1 I 1
41 1nprm ¬ 1
42 41 pm2.21i 1 F = G
43 40 42 syl6bi I = 1 I F = G
44 43 com12 I I = 1 F = G
45 44 a1d I F G F gcd G = 1 I = 1 F = G
46 45 3ad2ant1 I I F I G F G F gcd G = 1 I = 1 F = G
47 46 impcom F G F gcd G = 1 I I F I G I = 1 F = G
48 39 47 mpd F G F gcd G = 1 I I F I G F = G
49 48 ex F G F gcd G = 1 I I F I G F = G
50 10 16 35 49 syl3anc ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F I I F I G F = G
51 50 exp43 ¬ F = G n 0 m 0 FermatNo m = G FermatNo n = F I I F I G F = G
52 4 51 pm2.61i n 0 m 0 FermatNo m = G FermatNo n = F I I F I G F = G
53 52 rexlimdva n 0 m 0 FermatNo m = G FermatNo n = F I I F I G F = G
54 53 com23 n 0 FermatNo n = F m 0 FermatNo m = G I I F I G F = G
55 54 rexlimiv n 0 FermatNo n = F m 0 FermatNo m = G I I F I G F = G
56 55 imp n 0 FermatNo n = F m 0 FermatNo m = G I I F I G F = G
57 1 2 56 syl2anb F ran FermatNo G ran FermatNo I I F I G F = G