Language: C C++ D Haskell Lua OCaml PHP Perl Plain Text Python Ruby Scheme Tcl (define (gcd m n) (cond ((< m n) (gcd m (- n m))) ((< n m) (gcd (- m n) n)) (else m))) Private [?] Run code