Anonymous user
Greatest common divisor: Difference between revisions
→{{header|OCaml}}
Line 1,295:
else if a > b then gcd b (a mod b)
else gcd a (b mod a)</lang>
=== Built-in ===
<lang ocaml>#load "nums.cma";;
open Big_int;;
let gcd a b =
int_of_big_int (gcd_big_int (big_int_of_int a) (big_int_of_int b))</lang>
=={{header|Octave}}==
| |||