svenvanheugten/night-light
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Implement fading alarm

Browse source
This commit is contained in:
Sven van Heugten 2026-01-17 18:01:14 +01:00
parent 3e33e489aa
commit 6b73e32cda
3 changed files with 26 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

7
NightLight.Core/Models.fs
View file

@ -79,7 +79,12 @@ type internal State =
| On
| Off
type internal Brightness = Brightness of int
type internal Brightness =
| Brightness of int
member this.Scale(b: float) =
match this with
| Brightness brightness -> Brightness <| int (float brightness * b)
type internal Color =
| ColorByCoordinates of float * float