diff --git a/2019/day4/day4.hs b/2019/day4/day4.hs
index 0c36f2f..26684d2 100644
--- a/2019/day4/day4.hs
+++ b/2019/day4/day4.hs
@@ -1,10 +1,8 @@
 import Data.List
 
 main = do
-    let bottom = 130254
-    let top = 678275
-    print (day4a bottom top)
-    print (day4b bottom top)
+    print (day4a 130254 678275)
+    print (day4b 130254 678275)
 
 day4a bottom top = dumbbrute bottom top p 0
 day4b bottom top = dumbbrute bottom top p' 0