diff --git a/System/Vacuum/OpenGL/Server.hs b/System/Vacuum/OpenGL/Server.hs
--- a/System/Vacuum/OpenGL/Server.hs
+++ b/System/Vacuum/OpenGL/Server.hs
@@ -167,10 +167,10 @@
 --------------------------------------------------------------------------------
 
 vt :: Double -> Double -> IO ()
-vt x y = vertex (Vertex2 x y)
+vt x y = vertex (Vertex2 (realToFrac x :: GLdouble) (realToFrac y :: GLdouble))
 
 tc :: Double -> Double -> IO ()
-tc x y = texCoord (TexCoord2 x y)
+tc x y = texCoord (TexCoord2 (realToFrac x :: GLdouble) (realToFrac y :: GLdouble))
 
 -- display callback  
 display :: IO ()
diff --git a/vacuum-opengl.cabal b/vacuum-opengl.cabal
--- a/vacuum-opengl.cabal
+++ b/vacuum-opengl.cabal
@@ -1,5 +1,5 @@
 Name:                vacuum-opengl
-Version:             0.0
+Version:             0.0.1
 Synopsis:            Visualize live Haskell data structures using vacuum, graphviz and OpenGL.
 Description:         Visualize live Haskell data structures using vacuum, graphviz and OpenGL.
                      Intended as an easier-to-build alternative (no large dependency chain)
