Merge pull request #8 from jchristopherson/v1.5.3

V1.5.3 - Bug Fix
jchristopherson · Sep 6, 2024 · c534f2c · c534f2c
2 parents 1559032 + 09606b9
commit c534f2c
Show file tree

Hide file tree

Showing 5 changed files with 5 additions and 8 deletions.
diff --git a/.github/workflows/fpm.yml b/.github/workflows/fpm.yml
@@ -8,15 +8,12 @@ jobs:
     strategy:
       fail-fast: false
       matrix:
-        os: [ubuntu-latest, macos-11]
+        os: [ubuntu-latest]
         gcc_v: [10] # Version of GFortran we want to use.
         include:
         - os: ubuntu-latest
           os-arch: linux-x86_64
 
-        - os: macos-11
-          os-arch: macos-x86_64
-
     env:
       FC: gfortran
       GCC_V: ${{ matrix.gcc_v }}

diff --git a/CMakeLists.txt b/CMakeLists.txt
@@ -3,7 +3,7 @@ cmake_minimum_required(VERSION 3.24)
 project(
     nonlin
     LANGUAGES Fortran
-    VERSION 1.5.2
+    VERSION 1.5.3
 )
 
 # Get helper macros and functions

diff --git a/docs/html/index.html b/docs/html/index.html
@@ -27,7 +27,7 @@
  <tbody>
  <tr id="projectrow">
   <td id="projectalign">
-   <div id="projectname">nonlin<span id="projectnumber">&#160;1.5.2</span>
+   <div id="projectname">nonlin<span id="projectnumber">&#160;1.5.3</span>
    </div>
    <div id="projectbrief">A library that provides routines to compute the solutions to systems of nonlinear equations.</div>
   </td>

diff --git a/fpm.toml b/fpm.toml
@@ -1,5 +1,5 @@
 name = "nonlin"
-version = "1.5.2"
+version = "1.5.3"
 license = "GPL-3.0"
 author = "Jason Christopherson"
 maintainer = "Jason Christopherson"

diff --git a/src/nonlin_least_squares.f90 b/src/nonlin_least_squares.f90
@@ -675,7 +675,7 @@ subroutine lmpar(r, ipvt, diag, qtb, delta, par, x, sdiag, wa1, wa2)
             temp = sqrt(par)
             wa1 = temp * diag
             call lmsolve(r(1:n,1:n), ipvt, wa1, qtb, x, sdiag, wa2)
-            wa2 = diag * x
+            wa2(1:n) = diag * x
             dxnorm = norm2(wa2)
             temp = fp
             fp = dxnorm - delta