8 lines
135 B
Text
8 lines
135 B
Text
(gcd=
|
|
a b
|
|
. !arg:(?a.?b)
|
|
& den$(!a*!b^-1)
|
|
* (!a:<0&-1|1)
|
|
* !a
|
|
);
|
|
out$(gcd$(12.18) gcd$(-6.14) gcd$(35.0) gcd$(117.18))
|