1 2 3 4 5 6
main = let frame = FrameBuffer (colorImage1 (V4 0.0 0.0 0.4 1.0) ,depthImage1 1.0 ,depthImage1 1.0 ) in ScreenOut frame