From 9948874f738567e5e5059ccc12ee2f3c3165e59d Mon Sep 17 00:00:00 2001
From: kayan <kayan@kayan.me>
Date: Wed, 19 Feb 2020 18:08:04 +0300
Subject: [PATCH] Fixed incorrectly implemented row reducing

---
 src/FSharp/LinearAlgebra.Matrix.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/FSharp/LinearAlgebra.Matrix.fs b/src/FSharp/LinearAlgebra.Matrix.fs
index 64d44acd..1dc4dc13 100644
--- a/src/FSharp/LinearAlgebra.Matrix.fs
+++ b/src/FSharp/LinearAlgebra.Matrix.fs
@@ -159,7 +159,7 @@ module Matrix =
     let inline reduceCols f (m: #Matrix<_>) = m |> toColSeq |> Seq.reduce f
 
     /// Reduce all rows of a matrix.
-    let inline reduceRows f (m: #Matrix<_>) = m |> toColSeq |> Seq.reduce f
+    let inline reduceRows f (m: #Matrix<_>) = m |> toRowSeq |> Seq.reduce f
 
 
     /// Checks whether there is an entry in the matrix that satisfies a predicate.