4 lines
68 B
Text
4 lines
68 B
Text
fn gcdRec a b =
|
|
(
|
|
if b > 0 then gcdRec b (mod a b) else abs a
|
|
)
|