Jump to content

Greatest common divisor: Difference between revisions

Greatest common divisor (view source)

Revision as of 09:12, 17 April 2013

30 bytes added ,  11 years ago
→‎{{header|Erlang}}
Line 586:
=={{header|Erlang}}==
 
<lang erlang>% Implemented by Arjun Sunel
{{trans|OCaml}}
-module(gcd).
<lang erlang>gcd(0,B) -> abs(B);
-export([main/0]).
gcd(A,0) -> abs(A);▼
 
gcd(A,B) when A > B -> gcd(B, A rem B);▼
gcdmain(A,B) -> gcd(A-36, B rem A4).</lang>
▲gcd(A, 0) -> abs(A);
 
▲gcd(A, B) when A > B -> gcd(B, A rem B);.</lang>
{{out}}
<pre>4
</pre>
 
=={{header|Euler Math Toolbox}}==
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/51656"
Cookies help us deliver our services. By using our services, you agree to our use of cookies.
More information