8 lines
131 B
Text
8 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
|