Merge branch 'tessallation' of pwning.de:/pioneers into tessallation
This commit is contained in:
commit
17301f0635
@ -4,8 +4,8 @@ layout(triangles, equal_spacing, cw) in;
|
|||||||
in vec3 tcPosition[];
|
in vec3 tcPosition[];
|
||||||
in vec4 tcColor[];
|
in vec4 tcColor[];
|
||||||
in vec3 tcNormal[];
|
in vec3 tcNormal[];
|
||||||
out vec3 tePosition;
|
|
||||||
out vec4 teColor;
|
out vec4 teColor;
|
||||||
|
smooth out vec3 tePosition;
|
||||||
smooth out vec3 teNormal;
|
smooth out vec3 teNormal;
|
||||||
smooth out float gmix; //mixture of gravel
|
smooth out float gmix; //mixture of gravel
|
||||||
//out vec3 tePatchDistance;
|
//out vec3 tePatchDistance;
|
||||||
|
@ -50,7 +50,7 @@ import qualified Debug.Trace as D (trace)
|
|||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = do
|
main = do
|
||||||
SDL.withInit [InitVideo, InitAudio] $ do --also: InitNoParachute -> faster, without parachute!
|
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
|
,WindowShown -- window should be visible
|
||||||
,WindowResizable -- and resizable
|
,WindowResizable -- and resizable
|
||||||
,WindowInputFocus -- focused (=> active)
|
,WindowInputFocus -- focused (=> active)
|
||||||
|
Loading…
Reference in New Issue
Block a user