Try to centralize the number of components per vertex in shapes

src/Shader/Data.hs

@@ -12,8 +12,8 @@ module Shader.Data
 -- | Lens functions
     , vaoName
 --    , vaoVBO
-    , vaoAttribSizes
-    , vaoStride
+--    , vaoAttribSizes
+--    , vaoStride
 
     , vboName
     , vboPtr
@@ -46,10 +46,8 @@ data FullShader = FullShader
     }
 {- | Vertex array object: contains the reference to the object,
 and its buffer targets.  -}
-data VAO = VAO
+newtype VAO = VAO
     { _vaoName  :: GLuint
-    , _vaoAttribSizes :: [Int]  -- ^ It is not clear to me if this is necessary to store or not
-    , _vaoStride      :: Int
     }
 {- | Vertex buffer object: contains the reference to the object,
 a pointer to a location with space that can be written to the buffer,