Start modularising shader code

src/Shader/Parameters.hs

@@ -0,0 +1,15 @@
+module Shader.Parameters
+    ( floatSize
+    , numDrawableElements
+    ) where
+import Graphics.Rendering.OpenGL hiding (Point,translate,scale,imageHeight)
+import Foreign
+
+floatSize :: Int
+floatSize = sizeOf (0.5 :: GLfloat)
+{-# INLINE floatSize #-}
+
+numDrawableElements :: Int
+{-# INLINE numDrawableElements #-}
+numDrawableElements = 50000
+