Revert pictures to using lists rather than streams of Verx

2022-07-10 09:30:00 +01:00
parent dc803b64b0
commit 21f814ede1
5 changed files with 30 additions and 21 deletions
@@ -45,8 +45,8 @@ bezNum      = ShadNum 2
 textNum     = ShadNum 3
 arcNum      = ShadNum 4
 ellNum      = ShadNum 5
-type Picture = Stream (Of Verx) IO ()
-type Picture' = [Verx]
+type Picture' = Stream (Of Verx) IO ()
+type Picture = [Verx]
 flat2 :: V2 a -> [a]
 flat2 (V2 x y) = [x,y]
 flat3 :: V3 a -> [a]