5 lines
93 B
OCaml
5 lines
93 B
OCaml
|
fun gcd (0,n) = n
|
||
|
|
| gcd (m,n) = gcd(n mod m, m)
|
||
|
|
|
||
|
|
fun lcm (m,n) = abs(x * y) div gcd (m, n)
|