diff --git a/src/Main.hs b/src/Main.hs index 3a13454..8f369bf 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -87,10 +87,10 @@ main = do -- with added in texture coordinates let vertexPositions = -- 3D positions | texture coordinates - [ 100, 100, 0, 0, 0 -- 0 - , 233, 100, 0, 1, 0 -- 1 - , 233, 300, 0, 1, 1 -- 2 - , 100, 300, 0, 0, 1 -- 3 + [ 100, 100, 0, 0, 0 + , 233, 100, 0, 1, 0 + , 233, 300, 0, 1, 1 + , 100, 300, 0, 0, 1 ] :: [GL.GLfloat] -- create draw order indices