From 96dfd765b1ce08e25f1c8a757e05825ef98430ae Mon Sep 17 00:00:00 2001 From: nek0 Date: Mon, 8 Jun 2020 16:40:43 +0200 Subject: [PATCH] resize to show lynx undistorted --- src/Main.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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