Initial commit

NightLight.Core/Lights.fs

@@ -0,0 +1,18 @@
+module internal NightLight.Lights
+
+open NightLight.Moods
+
+type Bulb =
+    | IkeaBulb
+    | PaulmannBulb
+
+type Color =
+    | ColorByCoordinates of float * float
+    | ColorByTemperature of int
+
+type Brightness = Brightness of int
+
+type Light =
+    { FriendlyName: string
+      Room: Room
+      Bulb: Bulb }