diff --git a/gloss-examples.cabal b/gloss-examples.cabal
--- a/gloss-examples.cabal
+++ b/gloss-examples.cabal
@@ -1,5 +1,5 @@
 Name:                gloss-examples
-Version:             1.7.2.1
+Version:             1.7.2.2
 License:             MIT
 License-file:        LICENSE
 Author:              Ben Lippmeier
diff --git a/raster/Wave/Main.hs b/raster/Wave/Main.hs
--- a/raster/Wave/Main.hs
+++ b/raster/Wave/Main.hs
@@ -29,7 +29,7 @@
         {-# INLINE get #-}
 
    in   animateField 
-                (InWindow "Wave" (1500, 1000) (100, 100))
+                (InWindow "Wave" (800, 600) (100, 100))
                 (1, 1)
                 get