Remove default light sources
This commit is contained in:
@@ -1,5 +1,5 @@
|
||||
{-# LANGUAGE DeriveGeneric #-}
|
||||
{-# LANGUAGE DeriveAnyClass #-}
|
||||
{-# LANGUAGE DeriveGeneric #-}
|
||||
{-# LANGUAGE StrictData #-}
|
||||
{-# LANGUAGE TemplateHaskell #-}
|
||||
|
||||
@@ -23,8 +23,6 @@ data LSParam = LSParam -- LSPosRadCol
|
||||
data LightSource = LS
|
||||
{ _lsID :: Int
|
||||
, _lsParam :: LSParam
|
||||
-- , _lsDir :: Float
|
||||
-- , _lsPict :: LightSourceDraw --LightSource -> Picture
|
||||
}
|
||||
deriving (Eq, Ord, Show, Read) --Generic, Flat)
|
||||
|
||||
|
||||
Reference in New Issue
Block a user