Metamath Proof Explorer


Theorem lcmfunsnlem2lem1

Description: Lemma 1 for lcmfunsnlem2 . (Contributed by AV, 26-Aug-2020)

Ref Expression
Assertion lcmfunsnlem2lem1 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z lcm n k

Proof

Step Hyp Ref Expression
1 nfv k 0 y z 0 n 0
2 nfv k n
3 nfv k z y y Fin
4 nfra1 k k m y m k lcm _ y k
5 nfv k n lcm _ y n = lcm _ y lcm n
6 4 5 nfan k k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n
7 3 6 nfan k z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n
8 2 7 nfan k n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n
9 1 8 nfan k 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n
10 simprr 0 y z 0 n 0 z y y Fin n k k
11 simp2 z y y Fin y
12 snssi z z
13 12 3ad2ant1 z y y Fin z
14 11 13 unssd z y y Fin y z
15 simp3 z y y Fin y Fin
16 snfi z Fin
17 unfi y Fin z Fin y z Fin
18 15 16 17 sylancl z y y Fin y z Fin
19 14 18 jca z y y Fin y z y z Fin
20 lcmfcl y z y z Fin lcm _ y z 0
21 19 20 syl z y y Fin lcm _ y z 0
22 21 nn0zd z y y Fin lcm _ y z
23 22 adantl 0 y z 0 n 0 z y y Fin lcm _ y z
24 23 adantr 0 y z 0 n 0 z y y Fin n k lcm _ y z
25 simprl 0 y z 0 n 0 z y y Fin n k n
26 10 24 25 3jca 0 y z 0 n 0 z y y Fin n k k lcm _ y z n
27 14 adantl 0 y z 0 n 0 z y y Fin y z
28 18 adantl 0 y z 0 n 0 z y y Fin y z Fin
29 df-nel 0 y ¬ 0 y
30 29 biimpi 0 y ¬ 0 y
31 elsni 0 z 0 = z
32 31 eqcomd 0 z z = 0
33 32 necon3ai z 0 ¬ 0 z
34 30 33 anim12i 0 y z 0 ¬ 0 y ¬ 0 z
35 34 3adant3 0 y z 0 n 0 ¬ 0 y ¬ 0 z
36 df-nel 0 y z ¬ 0 y z
37 ioran ¬ 0 y 0 z ¬ 0 y ¬ 0 z
38 elun 0 y z 0 y 0 z
39 37 38 xchnxbir ¬ 0 y z ¬ 0 y ¬ 0 z
40 36 39 bitri 0 y z ¬ 0 y ¬ 0 z
41 35 40 sylibr 0 y z 0 n 0 0 y z
42 41 adantr 0 y z 0 n 0 z y y Fin 0 y z
43 27 28 42 3jca 0 y z 0 n 0 z y y Fin y z y z Fin 0 y z
44 43 adantr 0 y z 0 n 0 z y y Fin n k y z y z Fin 0 y z
45 lcmfn0cl y z y z Fin 0 y z lcm _ y z
46 44 45 syl 0 y z 0 n 0 z y y Fin n k lcm _ y z
47 46 nnne0d 0 y z 0 n 0 z y y Fin n k lcm _ y z 0
48 47 neneqd 0 y z 0 n 0 z y y Fin n k ¬ lcm _ y z = 0
49 neneq n 0 ¬ n = 0
50 49 3ad2ant3 0 y z 0 n 0 ¬ n = 0
51 50 ad2antrr 0 y z 0 n 0 z y y Fin n k ¬ n = 0
52 48 51 jca 0 y z 0 n 0 z y y Fin n k ¬ lcm _ y z = 0 ¬ n = 0
53 ioran ¬ lcm _ y z = 0 n = 0 ¬ lcm _ y z = 0 ¬ n = 0
54 52 53 sylibr 0 y z 0 n 0 z y y Fin n k ¬ lcm _ y z = 0 n = 0
55 26 54 jca 0 y z 0 n 0 z y y Fin n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
56 55 exp43 0 y z 0 n 0 z y y Fin n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
57 56 adantrd 0 y z 0 n 0 z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
58 57 com23 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
59 58 imp32 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
60 59 imp 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
61 60 adantr 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k k lcm _ y z n ¬ lcm _ y z = 0 n = 0
62 sneq n = z n = z
63 62 uneq2d n = z y n = y z
64 63 fveq2d n = z lcm _ y n = lcm _ y z
65 oveq2 n = z lcm _ y lcm n = lcm _ y lcm z
66 64 65 eqeq12d n = z lcm _ y n = lcm _ y lcm n lcm _ y z = lcm _ y lcm z
67 66 rspcv z n lcm _ y n = lcm _ y lcm n lcm _ y z = lcm _ y lcm z
68 67 3ad2ant1 z y y Fin n lcm _ y n = lcm _ y lcm n lcm _ y z = lcm _ y lcm z
69 nnz k k
70 69 adantl n k k
71 70 adantl z y y Fin k m y m k lcm _ y k n k k
72 lcmfcl y y Fin lcm _ y 0
73 72 nn0zd y y Fin lcm _ y
74 73 3adant1 z y y Fin lcm _ y
75 74 ad2antrr z y y Fin k m y m k lcm _ y k n k lcm _ y
76 simpll1 z y y Fin k m y m k lcm _ y k n k z
77 71 75 76 3jca z y y Fin k m y m k lcm _ y k n k k lcm _ y z
78 77 ad2antrr z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k k lcm _ y z
79 elun1 m y m y z
80 79 orcd m y m y z m n
81 elun m y z n m y z m n
82 80 81 sylibr m y m y z n
83 breq1 i = m i k m k
84 83 rspcv m y z n i y z n i k m k
85 82 84 syl m y i y z n i k m k
86 85 com12 i y z n i k m y m k
87 86 adantl z y y Fin i y z n i k m y m k
88 87 ralrimiv z y y Fin i y z n i k m y m k
89 88 adantr z y y Fin i y z n i k n k 0 y z 0 n 0 m y m k
90 breq2 k = l m k m l
91 90 ralbidv k = l m y m k m y m l
92 breq2 k = l lcm _ y k lcm _ y l
93 91 92 imbi12d k = l m y m k lcm _ y k m y m l lcm _ y l
94 93 cbvralvw k m y m k lcm _ y k l m y m l lcm _ y l
95 70 adantr n k 0 y z 0 n 0 k
96 95 adantl z y y Fin i y z n i k n k 0 y z 0 n 0 k
97 breq2 l = k m l m k
98 97 ralbidv l = k m y m l m y m k
99 breq2 l = k lcm _ y l lcm _ y k
100 98 99 imbi12d l = k m y m l lcm _ y l m y m k lcm _ y k
101 100 rspcv k l m y m l lcm _ y l m y m k lcm _ y k
102 96 101 syl z y y Fin i y z n i k n k 0 y z 0 n 0 l m y m l lcm _ y l m y m k lcm _ y k
103 94 102 syl5bi z y y Fin i y z n i k n k 0 y z 0 n 0 k m y m k lcm _ y k m y m k lcm _ y k
104 89 103 mpid z y y Fin i y z n i k n k 0 y z 0 n 0 k m y m k lcm _ y k lcm _ y k
105 104 exp31 z y y Fin i y z n i k n k 0 y z 0 n 0 k m y m k lcm _ y k lcm _ y k
106 105 com24 z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y k
107 106 imp z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y k
108 107 impl z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y k
109 108 imp z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y k
110 vsnid z z
111 110 olci z y z z
112 elun z y z z y z z
113 111 112 mpbir z y z
114 113 orci z y z z n
115 elun z y z n z y z z n
116 114 115 mpbir z y z n
117 breq1 i = z i k z k
118 117 rspcv z y z n i y z n i k z k
119 116 118 mp1i z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k z k
120 119 imp z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k z k
121 109 120 jca z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y k z k
122 lcmdvds k lcm _ y z lcm _ y k z k lcm _ y lcm z k
123 78 121 122 sylc z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y lcm z k
124 breq1 lcm _ y z = lcm _ y lcm z lcm _ y z k lcm _ y lcm z k
125 123 124 syl5ibr lcm _ y z = lcm _ y lcm z z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y z k
126 125 expd lcm _ y z = lcm _ y lcm z z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y z k
127 126 exp5j lcm _ y z = lcm _ y lcm z z y y Fin k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y z k
128 127 com12 z y y Fin lcm _ y z = lcm _ y lcm z k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y z k
129 68 128 syld z y y Fin n lcm _ y n = lcm _ y lcm n k m y m k lcm _ y k n k 0 y z 0 n 0 i y z n i k lcm _ y z k
130 129 com23 z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n n k 0 y z 0 n 0 i y z n i k lcm _ y z k
131 130 imp32 z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n n k 0 y z 0 n 0 i y z n i k lcm _ y z k
132 131 expd z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n n k 0 y z 0 n 0 i y z n i k lcm _ y z k
133 132 com34 z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n n 0 y z 0 n 0 k i y z n i k lcm _ y z k
134 133 com12 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n 0 y z 0 n 0 k i y z n i k lcm _ y z k
135 134 imp n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n 0 y z 0 n 0 k i y z n i k lcm _ y z k
136 135 com12 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z k
137 136 imp 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z k
138 137 imp 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z k
139 138 imp 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z k
140 vsnid n n
141 140 olci n y z n n
142 elun n y z n n y z n n
143 141 142 mpbir n y z n
144 breq1 i = n i k n k
145 144 rspcv n y z n i y z n i k n k
146 143 145 mp1i 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k n k
147 146 imp 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k n k
148 139 147 jca 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z k n k
149 lcmledvds k lcm _ y z n ¬ lcm _ y z = 0 n = 0 lcm _ y z k n k lcm _ y z lcm n k
150 61 148 149 sylc 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z lcm n k
151 150 exp31 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z lcm n k
152 9 151 ralrimi 0 y z 0 n 0 n z y y Fin k m y m k lcm _ y k n lcm _ y n = lcm _ y lcm n k i y z n i k lcm _ y z lcm n k