From 9b6420b8a89c6389159c4cf872207a2c3f3f901d Mon Sep 17 00:00:00 2001
From: Sven van Heugten <sven@memcmp.org>
Date: Thu, 1 Jan 2026 18:51:34 +0100
Subject: [PATCH] Make the day start at 5.30am instead

---
 NightLight.Core/PartsOfDay.fs | 6 +++++-
 README.md                     | 2 +-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/NightLight.Core/PartsOfDay.fs b/NightLight.Core/PartsOfDay.fs
index f7b47d2..f50c002 100644
--- a/NightLight.Core/PartsOfDay.fs
+++ b/NightLight.Core/PartsOfDay.fs
@@ -8,5 +8,9 @@ type PartOfDay =
 
 let getPartOfDay (dateTime: DateTime) =
     match dateTime with
-    | _ when dateTime.TimeOfDay >= TimeSpan.FromHours 4.75 && dateTime.TimeOfDay < TimeSpan.FromHours 20.5 -> Day
+    | _ when
+        dateTime.TimeOfDay >= TimeSpan.FromHours 5.5
+        && dateTime.TimeOfDay < TimeSpan.FromHours 20.5
+        ->
+        Day
     | _ -> Night
diff --git a/README.md b/README.md
index 1446cf8..b70f026 100644
--- a/README.md
+++ b/README.md
@@ -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 4.45am in the morning.
+* _white_/_yellow_ (depending on the room) at 5.30am in the morning.
 
 `NightLight.Core` is the functional core, and `NightLight` is the imperative shell.