diff --git a/shaders/tessEval.shader b/shaders/tessEval.shader
index d0c6648..7ed631a 100644
--- a/shaders/tessEval.shader
+++ b/shaders/tessEval.shader
@@ -4,8 +4,8 @@ layout(triangles, equal_spacing, cw) in;
 in vec3 tcPosition[];
 in vec4 tcColor[];
 in vec3 tcNormal[];
-out vec3 tePosition;
 out vec4 teColor;
+smooth out vec3 tePosition;
 smooth out vec3 teNormal;
 smooth out float gmix; //mixture of gravel
 //out vec3 tePatchDistance;
diff --git a/src/Main.hs b/src/Main.hs
index b0445db..3a26626 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -50,7 +50,7 @@ import qualified Debug.Trace                          as D (trace)
 main :: IO ()
 main = do
         SDL.withInit [InitVideo, InitAudio] $ do --also: InitNoParachute -> faster, without parachute!
-        SDL.withWindow "Pioneers" (Position 1500 100) (Size 1024 768) [WindowOpengl     -- we want openGL
+        SDL.withWindow "Pioneers" (Position 100 100) (Size 1024 600) [WindowOpengl     -- we want openGL
                                                                              ,WindowShown      -- window should be visible
                                                                              ,WindowResizable  -- and resizable 
                                                                              ,WindowInputFocus -- focused (=> active)
@@ -422,4 +422,4 @@ processEvent e = do
                     }
             Quit -> modify $ \s -> s {stateWinClose = True}
             -- there is more (joystic, touchInterface, ...), but currently ignored
-            _ ->  liftIO $ putStrLn $ unwords ["Not processing Event:", show e]
\ No newline at end of file
+            _ ->  liftIO $ putStrLn $ unwords ["Not processing Event:", show e]