Working implementation of light change when door opens

2021-09-29 01:34:54 +01:00
parent 6b937b115e
commit f3437adef7
12 changed files with 87 additions and 66 deletions
@@ -175,6 +175,7 @@ data LightSource = LS
    , _lsDir        :: !Float
    , _lsRad        :: !Float
    , _lsIntensity  :: !Point3
+    , _lsPict       :: LightSource -> Picture
    }
 data TempLightSource = TLS 
    { _tlsPos :: !Point3