Excise streaming
This commit is contained in:
@@ -9,7 +9,6 @@ import Control.Lens
|
||||
import Data.Aeson
|
||||
import Data.Aeson.TH
|
||||
import Geometry.Data
|
||||
import Streaming
|
||||
|
||||
data Verx = Verx
|
||||
{ _vxPos :: !Point3
|
||||
@@ -52,8 +51,6 @@ textNum = ShadNum 3
|
||||
arcNum = ShadNum 4
|
||||
ellNum = ShadNum 5
|
||||
|
||||
type Picture' = Stream (Of Verx) IO ()
|
||||
|
||||
type Picture = [Verx]
|
||||
|
||||
flatV2 :: V2 a -> [a]
|
||||
|
||||
Reference in New Issue
Block a user