diff options
Diffstat (limited to 'Spear/Scene/Light.hs')
-rw-r--r-- | Spear/Scene/Light.hs | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/Spear/Scene/Light.hs b/Spear/Scene/Light.hs deleted file mode 100644 index fb4225b..0000000 --- a/Spear/Scene/Light.hs +++ /dev/null | |||
@@ -1,31 +0,0 @@ | |||
1 | module Spear.Scene.Light | ||
2 | ( | ||
3 | Light(..) | ||
4 | ) | ||
5 | where | ||
6 | |||
7 | |||
8 | import qualified Spear.Math.Matrix4 as M | ||
9 | import qualified Spear.Math.Spatial3 as S | ||
10 | import Spear.Math.Vector | ||
11 | |||
12 | |||
13 | data Light | ||
14 | = PointLight | ||
15 | { ambient :: Vector3 | ||
16 | , diffuse :: Vector3 | ||
17 | , specular :: Vector3 | ||
18 | , transform :: M.Matrix4 | ||
19 | } | ||
20 | | DirectionalLight | ||
21 | { ambient :: Vector3 | ||
22 | , diffuse :: Vector3 | ||
23 | , specular :: Vector3 | ||
24 | , direction :: Vector3 | ||
25 | } | ||
26 | | SpotLight | ||
27 | { ambient :: Vector3 | ||
28 | , diffuse :: Vector3 | ||
29 | , specular :: Vector3 | ||
30 | , transform :: M.Matrix4 | ||
31 | } | ||