Remove unnecessary functions in example

This commit is contained in:
Sven van Heugten 2026-05-12 16:31:05 +02:00
parent 500b3f0d8c
commit 9ff53f1803
No known key found for this signature in database
GPG key ID: D612F88666F4F660
2 changed files with 3 additions and 15 deletions

View file

@ -1,10 +1,4 @@
namespace Example
module Calculator =
let addOne value = value + 1
let absoluteDifference left right =
if left >= right then left - right else right - left
let isLeapYear year =
year % 4 = 0 && (year % 100 <> 0 || year % 400 = 0)
let addOne value = value - 1

View file

@ -8,20 +8,14 @@ type CalculatorTests() =
[<Fact>]
[<MutationCase("""
diff --git a/Example.Tests/Calculator.fs b/Example.Tests/Calculator.fs
index cfcce3b..39be7f3 100644
index 6f0c515..030e391 100644
--- a/Example.Tests/Calculator.fs
+++ b/Example.Tests/Calculator.fs
@@ -1,7 +1,7 @@
@@ -1,4 +1,4 @@
namespace Example
module Calculator =
- let addOne value = value + 1
+ let addOne value = value - 1
let absoluteDifference left right =
if left >= right then left - right else right - left
member _.AddOne_increments() =
Assert.Equal(42, Calculator.addOne 41)
""")>]
member _.AddOne_increments() = Assert.Equal(42, Calculator.addOne 41)