1 files changed, 4 insertions, 2 deletions

diff --git a/testdata/editor-examples/LambdaCube2.lc b/testdata/editor-examples/LambdaCube2.lc
index fe6909ff..b174240d 100644
--- a/testdata/editor-examples/LambdaCube2.lc
+++ b/testdata/editor-examples/LambdaCube2.lc
@@ -2,7 +2,6 @@
 len2 v = v%x*v%x + v%y*v%y + v%z*v%z
 
 makeFrame (time :: Float)
-          (projmat :: Mat 4 4 Float)
           (vertexstream :: PrimitiveStream Triangle ((Vec 4 Float)))
 
     = imageFrame (emptyDepthImage 1, emptyColorImage navy)
@@ -15,6 +14,10 @@ makeFrame (time :: Float)
   where
     h = 0.25
 
+    projmat = perspective 0.1 100.0 30.0 1.0
+          .*. lookat (V3 3.0 1.3 0.3) (V3 0.0 0.0 0.0) (V3 0.0 1.0 0.0)
+          .*. rotMatrixY (pi / 24.0 * time)
+
     ffilter ((v)) =
            (v%y + v%x + v%z > 1 || abs (v%y - v%x + v%z - 1.0) > h)
         && (v%y + v%x - v%z > 1 || abs (v%y + v%x + v%z - 1.0) > h)
@@ -26,6 +29,5 @@ makeFrame (time :: Float)
 
 main = renderFrame $
    makeFrame (Uniform "Time")
-             (Uniform "MVP")
              (fetch "stream4" (Attribute "position4"))