From fe73c3a6b03f1889685b44d22dac79361350fafc Mon Sep 17 00:00:00 2001
From: Stefan Dresselhaus <sdressel@techfak.uni-bielefeld.de>
Date: Mon, 19 May 2014 21:45:09 +0200
Subject: [PATCH] removed dysfunctional code

---
 src/Render/Render.hs | 75 --------------------------------------------
 1 file changed, 75 deletions(-)

diff --git a/src/Render/Render.hs b/src/Render/Render.hs
index dbed6c8..d09493f 100644
--- a/src/Render/Render.hs
+++ b/src/Render/Render.hs
@@ -281,81 +281,6 @@ initRendering = do
         glCullFace gl_BACK
         checkError "initRendering"
 
-{-renderOverview :: Pioneers ()
-renderOverview = do
-    liftIO $ do
-        ---- RENDER OVERVIEW MAP ------------------------------------------
-
-
-        bindFramebuffer Framebuffer $= (state ^. gl.glFramebuffer)
-        bindRenderbuffer Renderbuffer $= (state ^. gl.glRenderbuffer)
-        framebufferRenderbuffer
-                Framebuffer
-                DepthAttachment
-                Renderbuffer
-                (state ^. gl.glRenderbuffer)
-        textureBinding Texture2D $= Just (state ^. gl.glMap.renderedMapTexture)
-
-        framebufferTexture2D
-                Framebuffer
-                (ColorAttachment 0)
-                Texture2D
-                (state ^. gl.glMap.renderedMapTexture)
-                0
-
-        -- Render to FrameBufferObject
-        drawBuffers $= [FBOColorAttachment 0]
-        checkError "setup Render-Target"
-
-        clear [ColorBuffer, DepthBuffer]
-        checkError "clear buffer"
-
-
-        currentProgram $= Just (state ^. gl.glMap.mapProgram)
-
-        checkError "setting up buffer"
-        --set up projection (= copy from state)
-        with (distribute frust) $ \ptr ->
-              glUniformMatrix4fv proj 1 0 (castPtr (ptr :: Ptr (L.M44 CFloat)))
-        checkError "copy projection"
-
-        --set up camera
-        let ! cam = getCam camPos zDist' xa ya
-        with (distribute cam) $ \ptr ->
-              glUniformMatrix4fv vmat 1 0 (castPtr (ptr :: Ptr (L.M44 CFloat)))
-        checkError "copy cam"
-
-        --set up normal--Mat transpose((model*camera)^-1)
-        let normal' = (case L.inv33 (fmap (^. L._xyz) cam ^. L._xyz) of
-                                             (Just a) -> a
-                                             Nothing  -> L.eye3) :: L.M33 CFloat
-            nmap = collect id normal' :: L.M33 CFloat --transpose...
-
-        with (distribute nmap) $ \ptr ->
-              glUniformMatrix3fv nmat 1 0 (castPtr (ptr :: Ptr (L.M33 CFloat)))
-
-        checkError "nmat"
-
-        glUniform1f tli (fromIntegral tessFac)
-        glUniform1f tlo (fromIntegral tessFac)
-
-        bindBuffer ArrayBuffer $= Just map'
-        vertexAttribPointer ci $= fgColorIndex
-        vertexAttribArray ci   $= Enabled
-        vertexAttribPointer ni $= fgNormalIndex
-        vertexAttribArray ni   $= Enabled
-        vertexAttribPointer vi $= fgVertexIndex
-        vertexAttribArray vi   $= Enabled
-        checkError "beforeDraw"
-
-        glPatchParameteri gl_PATCH_VERTICES 3
-
-        cullFace $= Just Front
-
-        glDrawArrays gl_PATCHES 0 (fromIntegral numVert)
-        checkError "draw map"
--}
-
 
 -- | renders an IQM-Model at Position with scaling
 renderIQM :: IQM -> L.V3 CFloat -> L.V3 CFloat -> IO ()