From 16a5cd7a5a0b5b8ed6078987f3f0ecf0d1773fe6 Mon Sep 17 00:00:00 2001 From: Yan Wittmann <2121578@stud.hs-mannheim.de> Date: Tue, 8 Nov 2022 11:53:02 +0100 Subject: [PATCH] fixed gt and lt test cases Signed-off-by: Skyball2000 --- aufgaben/tests/Pflichtuebung_01/DateTests.elm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/aufgaben/tests/Pflichtuebung_01/DateTests.elm b/aufgaben/tests/Pflichtuebung_01/DateTests.elm index d81d354..e70a25d 100644 --- a/aufgaben/tests/Pflichtuebung_01/DateTests.elm +++ b/aufgaben/tests/Pflichtuebung_01/DateTests.elm @@ -205,7 +205,7 @@ ltTest = Expect.equal True (lt (1, 1, 1970) (1, 2, 2000)) , test "lt 01.01.2000 01.01.1999" <| \() -> - Expect.equal False (lt (1, 1, 1970) (1, 1, 1999)) + Expect.equal False (lt (1, 1, 2000) (1, 1, 1999)) ] eqTest : Test @@ -239,7 +239,7 @@ gtTest = Expect.equal False (gt (1, 1, 1970) (1, 2, 2000)) , test "gt 01.01.2000 01.01.1999" <| \() -> - Expect.equal True (gt (1, 1, 1970) (1, 1, 1999)) + Expect.equal True (gt (1, 1, 2000) (1, 1, 1999)) , test "gt 05.01.2000 01.01.2000" <| \() -> Expect.equal True (gt (5, 1, 2000) (1, 1, 2000))