diff --git a/palette-generator/Stylix/Main.hs b/palette-generator/Stylix/Main.hs
index ea4c38b..e480081 100644
--- a/palette-generator/Stylix/Main.hs
+++ b/palette-generator/Stylix/Main.hs
@@ -14,7 +14,7 @@ loadImage :: String -- ^ Path to the file
           -> IO DynamicImage
 loadImage input = either error id <$> readImage input
 
-mainProcess :: (String,Float,Float String, String) -> IO ()
+mainProcess :: (String,Float,Float, String, String) -> IO ()
 mainProcess (polarity,primaryScaleDark,primaryScaleLight, input, output) = do
   putStrLn $ "Processing " ++ input