Change start of day to 6.00am

This commit is contained in:
Sven van Heugten 2026-01-10 21:09:44 +01:00
parent 2f6e46960f
commit a4b11e1ffa
3 changed files with 3 additions and 3 deletions

View file

@ -4,7 +4,7 @@ open System
open FsCheck.FSharp
let private isDay (time: DateTime) =
time.TimeOfDay >= TimeSpan.FromHours 5.5
time.TimeOfDay >= TimeSpan.FromHours 6
&& time.TimeOfDay < TimeSpan.FromHours 20.5
let private isTimeChangedMeetingCondition condition interaction =

View file

@ -9,7 +9,7 @@ type PartOfDay =
let getPartOfDay (dateTime: DateTime) =
match dateTime with
| _ when
dateTime.TimeOfDay >= TimeSpan.FromHours 5.5
dateTime.TimeOfDay >= TimeSpan.FromHours 6
&& dateTime.TimeOfDay < TimeSpan.FromHours 20.5
->
Day

View file

@ -3,7 +3,7 @@
This is an F# program that turns all the lights in our apartment
* _red_ at 8.30pm in the evening, and
* _white_/_yellow_ (depending on the room) at 5.30am in the morning.
* _white_/_yellow_ (depending on the room) at 6.00am in the morning.
`NightLight.Core` is the functional core, and `NightLight` is the imperative shell.