From 0e79b2f1cf71bee25e604ff526a0ff96207c1c09 Mon Sep 17 00:00:00 2001
From: Alexis Montoison <35051714+amontoison@users.noreply.github.com>
Date: Wed, 7 Jun 2023 03:29:08 -0400
Subject: [PATCH] prefer linear solvers such as MUMPS over SPRAL (#677)

- not clear yet how stable Spral actually is
---
 ChangeLog.md                   | 4 ++++
 src/Algorithm/IpAlgBuilder.cpp | 8 ++++----
 2 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/ChangeLog.md b/ChangeLog.md
index b834829c7..c82bde275 100644
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -7,6 +7,10 @@ More detailed information about incremental changes can be found in the
 
 ## 3.14
 
+### 3.14.13 (2023-xx-yy)
+
+- Reduced priority for making Spral the default value for option linear_solver [#677].
+
 ### 3.14.12 (2023-04-05)
 
 - Fix that a source file was installed and install more header files.
diff --git a/src/Algorithm/IpAlgBuilder.cpp b/src/Algorithm/IpAlgBuilder.cpp
index 8c622c17f..83d66cd50 100644
--- a/src/Algorithm/IpAlgBuilder.cpp
+++ b/src/Algorithm/IpAlgBuilder.cpp
@@ -225,10 +225,6 @@ void AlgorithmBuilder::RegisterOptions(
    {
       defaultsolver = "pardiso";
    }
-   else if( availablesolverslinked & IPOPTLINEARSOLVER_SPRAL )
-   {
-      defaultsolver = "spral";
-   }
    else if( availablesolverslinked & IPOPTLINEARSOLVER_WSMP )
    {
       defaultsolver = "wsmp";
@@ -241,6 +237,10 @@ void AlgorithmBuilder::RegisterOptions(
    {
       defaultsolver = "pardisomkl";
    }
+   else if( availablesolverslinked & IPOPTLINEARSOLVER_SPRAL )
+   {
+      defaultsolver = "spral";
+   }
    else if( availablesolverslinked & IPOPTLINEARSOLVER_MA77 )
    {
       defaultsolver = "ma77";