1 files changed, 1 insertions, 1 deletions

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