diff --git a/lib/PNGRenderer.hs b/lib/PNGRenderer.hs
index 8c342dd..04955bc 100644
--- a/lib/PNGRenderer.hs
+++ b/lib/PNGRenderer.hs
@@ -31,8 +31,10 @@ renderPNG = fromJust . unsafePerformIO . loadJuicyPNG
 blank :: Picture
 blank = Gloss.Blank
 
+-- Translate a picture by moving it along two axis.
 translate :: Float -> Float -> Picture -> Picture
 translate = Gloss.translate
 
+-- Compose multiple pictures into a single picture.
 compose :: [Picture] -> Picture
 compose = Gloss.Pictures
diff --git a/src/Main.hs b/src/Main.hs
index 55d35ac..927c356 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -1,4 +1,12 @@
-import VoorbeeldModule (hoi)
+import Patience
 
-main :: IO ()
-main = putStrLn hoi
+----------------------------- Constants ------------------------------
+
+-- Framerate of the game
+fps :: Int
+fps = 60
+
+----------------------------------------------------------------------
+
+main :: IO()
+main = playPatience fps