Metamath Proof Explorer


Theorem lcmfass

Description: Associative law for the _lcm function. (Contributed by AV, 27-Aug-2020)

Ref Expression
Assertion lcmfass Y Y Fin Z Z Fin lcm _ lcm _ Y Z = lcm _ Y lcm _ Z

Proof

Step Hyp Ref Expression
1 lcmfcl Y Y Fin lcm _ Y 0
2 1 nn0zd Y Y Fin lcm _ Y
3 lcmfsn lcm _ Y lcm _ lcm _ Y = lcm _ Y
4 2 3 syl Y Y Fin lcm _ lcm _ Y = lcm _ Y
5 nn0re lcm _ Y 0 lcm _ Y
6 nn0ge0 lcm _ Y 0 0 lcm _ Y
7 5 6 jca lcm _ Y 0 lcm _ Y 0 lcm _ Y
8 absid lcm _ Y 0 lcm _ Y lcm _ Y = lcm _ Y
9 1 7 8 3syl Y Y Fin lcm _ Y = lcm _ Y
10 4 9 eqtrd Y Y Fin lcm _ lcm _ Y = lcm _ Y
11 lcmfcl Z Z Fin lcm _ Z 0
12 11 nn0zd Z Z Fin lcm _ Z
13 lcmfsn lcm _ Z lcm _ lcm _ Z = lcm _ Z
14 12 13 syl Z Z Fin lcm _ lcm _ Z = lcm _ Z
15 nn0re lcm _ Z 0 lcm _ Z
16 nn0ge0 lcm _ Z 0 0 lcm _ Z
17 15 16 jca lcm _ Z 0 lcm _ Z 0 lcm _ Z
18 absid lcm _ Z 0 lcm _ Z lcm _ Z = lcm _ Z
19 11 17 18 3syl Z Z Fin lcm _ Z = lcm _ Z
20 14 19 eqtr2d Z Z Fin lcm _ Z = lcm _ lcm _ Z
21 10 20 oveqan12d Y Y Fin Z Z Fin lcm _ lcm _ Y lcm lcm _ Z = lcm _ Y lcm lcm _ lcm _ Z
22 2 snssd Y Y Fin lcm _ Y
23 snfi lcm _ Y Fin
24 22 23 jctir Y Y Fin lcm _ Y lcm _ Y Fin
25 lcmfun lcm _ Y lcm _ Y Fin Z Z Fin lcm _ lcm _ Y Z = lcm _ lcm _ Y lcm lcm _ Z
26 24 25 sylan Y Y Fin Z Z Fin lcm _ lcm _ Y Z = lcm _ lcm _ Y lcm lcm _ Z
27 12 snssd Z Z Fin lcm _ Z
28 snfi lcm _ Z Fin
29 27 28 jctir Z Z Fin lcm _ Z lcm _ Z Fin
30 lcmfun Y Y Fin lcm _ Z lcm _ Z Fin lcm _ Y lcm _ Z = lcm _ Y lcm lcm _ lcm _ Z
31 29 30 sylan2 Y Y Fin Z Z Fin lcm _ Y lcm _ Z = lcm _ Y lcm lcm _ lcm _ Z
32 21 26 31 3eqtr4d Y Y Fin Z Z Fin lcm _ lcm _ Y Z = lcm _ Y lcm _ Z