Zone creatures

src/Geometry/Data.hs

@@ -8,6 +8,9 @@ module Geometry.Data
 import Linear.V2
 import Linear.V3
 import Linear.V4
+import Streaming
+type StreamOf a = Stream (Of a) Identity ()
+type Int2   = V2 Int
 type Point2 = V2 Float
 type Point3 = V3 Float
 type Point4 = V4 Float