From 1d352b461ebc1c334c4288a57d0d4cb9b477fda7 Mon Sep 17 00:00:00 2001
From: gusty <1261319+gusty@users.noreply.github.com>
Date: Fri, 13 Oct 2023 09:04:47 +0200
Subject: [PATCH] + Test

---
 tests/FSharpPlus.Tests/Monoid.fs | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/tests/FSharpPlus.Tests/Monoid.fs b/tests/FSharpPlus.Tests/Monoid.fs
index 512bd84f4..3fe39def8 100644
--- a/tests/FSharpPlus.Tests/Monoid.fs
+++ b/tests/FSharpPlus.Tests/Monoid.fs
@@ -74,4 +74,16 @@ module Monoid =
             let! y = struct ("Ten", 10)
             return y - x }
         Assert.AreEqual (str, "FourTen")
-        Assert.AreEqual (num, 6)
\ No newline at end of file
+        Assert.AreEqual (num, 6)
+
+    #if NET6_0_OR_GREATER
+    [<Test>]
+    let testDateAndTimes =
+        let d1 = DateOnly(2020, 1, 1)
+        let d2 = d1 + zero + one
+        Assert.AreEqual (DateOnly(2020, 1, 2), d2)
+
+        let t1 = TimeOnly (2, 10, 30)
+        let t2 = t1 + zero
+        Assert.AreEqual (t1, t2)
+    #endif
\ No newline at end of file