Attrac-0.1.3: GLTypeConversion.hs

module GLTypeConversion where

import Graphics.Rendering.OpenGL
import Unsafe.Coerce

convertGLdouble :: Double -> GLdouble
-- convertGLdouble = realToFrac
convertGLdouble = unsafeCoerce