Free vao pointers at end

src/Picture/Render.hs

@@ -11,11 +11,6 @@ import Shader
 import Control.Lens
 import Control.Monad
 
-import qualified Control.Applicative as Ap
-
-import Linear.Matrix
-import Linear.V4
-
 import qualified Control.Foldl as F
 
 import Data.Bifunctor
@@ -28,22 +23,13 @@ import Picture.Preload
 
 import Foreign hiding (rotate)
 
-import Codec.Picture
-
-import Graphics.GL.Core43
-
 import Graphics.Rendering.OpenGL hiding (Line,translate,scale,imageHeight,imageWidth,Polygon,Color,T)
-import qualified Graphics.Rendering.OpenGL as GL
 
 import Data.Foldable
 import Data.List
 import Data.Maybe (fromJust)
 
---import qualified Data.Vector.Storable as V
-import qualified Data.IntMap as IM
---import qualified Data.DList as DL
-
---import Control.DeepSeq
+import qualified Data.IntMap.Strict as IM
 
 import qualified SDL as SDL