fix tests

Author: goswinr

CHANGELOG.md

@@ -10,6 +10,8 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 ## [0.24.2] - 2026-01-24
 ### Fixed
 - minor internal optimizations
+### Added
+- more tests
 
 
 ## [0.24.1] - 2026-01-17

Tests/Module2.fs

@@ -746,9 +746,9 @@ module Module2 =
         testCase "Array.min3IndicesBy returns indices of three smallest" <| fun _ ->
             let xs = [|"apple"; "be"; "cat"; "do"; "e"|]
             let i1, i2, i3 = Array.min3IndicesBy String.length xs
-            Expect.equal i1 1 "min3IndicesBy first"
-            Expect.equal i2 3 "min3IndicesBy second"
-            Expect.equal i3 4 "min3IndicesBy third"
+            Expect.equal i1 4 "min3IndicesBy first"
+            Expect.equal i2 1 "min3IndicesBy second"
+            Expect.equal i3 3 "min3IndicesBy third"
 
         testCase "Array.min3IndicesBy throws on null array" <| fun _ ->
             let xs : string[] = null