diff --git a/src/Main.hs b/src/Main.hs index b9fd62b..3a13454 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -88,9 +88,9 @@ main = do let vertexPositions = -- 3D positions | texture coordinates [ 100, 100, 0, 0, 0 -- 0 - , 200, 100, 0, 1, 0 -- 1 - , 200, 200, 0, 1, 1 -- 2 - , 100, 200, 0, 0, 1 -- 3 + , 233, 100, 0, 1, 0 -- 1 + , 233, 300, 0, 1, 1 -- 2 + , 100, 300, 0, 0, 1 -- 3 ] :: [GL.GLfloat] -- create draw order indices