module Shader.Parameters
    ( floatSize
    , numDrawableElements
    , numSubElements
    ) 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 = 70000

numSubElements :: Int
{-# INLINE numSubElements #-}
numSubElements = 10000