From ec540fa25cf63ad27efe718680637957f7b9e154 Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Mon, 27 Jan 2014 21:52:21 +0400 Subject: Fixed stupid error --- gcd.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcd.hs b/gcd.hs index 078563d..fe07fc0 100644 --- a/gcd.hs +++ b/gcd.hs @@ -1,7 +1,7 @@ import System.Environment(getArgs) gcd2 a 0 = a -gcd2 a b = gcd2 b (rem b a) +gcd2 a b = gcd2 b (a `rem` b) gcdn n = foldl1 gcd2 n -- cgit v1.2.3