X-Git-Url: http://gitweb.michael.orlitzky.com/?p=spline3.git;a=blobdiff_plain;f=src%2FMisc.hs;h=56d33eb43c3969ce0c9c40b5efb81582d0b888b1;hp=83b439c4e503529b4dbe482a532e5c87d196f200;hb=9ecdab2b3a4bc6bdf50776a5d2092632988fa8fa;hpb=0b3152a88d2fa4a7c75f29a2859c31ef23d27bf3

diff --git a/src/Misc.hs b/src/Misc.hs
index 83b439c..56d33eb 100644
--- a/src/Misc.hs
+++ b/src/Misc.hs
@@ -35,6 +35,7 @@ factorial :: Int -> Int
 factorial !n =
   go 1 n
   where
+    go :: Int -> Int -> Int
     go !acc !i
       | i <= 1    = acc
       | otherwise = go (acc * i) (i - 1)