9 lines
131 B
Text
9 lines
131 B
Text
|
abs:|/-:\
|
||
|
|
gcd:{$[~x;y;o[x!y;x]]}
|
||
|
|
lcm:{abs[`i$x*y%gcd[x;y]]}
|
||
|
|
|
||
|
|
lcm .'(12 18; -6 14; 35 0)
|
||
|
|
36 42 0
|
||
|
|
lcm/1+!20
|
||
|
|
232792560
|