Merge branch 'Reference-LAPACK:master' into implement-axpby

Author: grisuthedragon

.github/workflows/cmake.yml

@@ -75,12 +75,12 @@ jobs:
     - name: Install ninja-build tool
       uses: seanmiddleditch/gha-setup-ninja@16b940825621068d98711680b6c3ff92201f8fc0 # v3
 
-    - name: Use GCC-11 on MacOS
+    - name: Use GCC-14 on MacOS
       if: ${{ matrix.os == 'macos-latest' }}
       run: >
         cmake -B build -G Ninja
-        -D CMAKE_C_COMPILER="gcc-11"
-        -D CMAKE_Fortran_COMPILER="gfortran-11"
+        -D CMAKE_C_COMPILER="gcc-14"
+        -D CMAKE_Fortran_COMPILER="gfortran-14"
         -D USE_FLAT_NAMESPACE:BOOL=ON
 
     - name: Special flags for Windows
@@ -237,4 +237,4 @@ jobs:
             fi
           done
           exit 0
-        fi
+        fi

.github/workflows/makefile.yml

@@ -90,8 +90,8 @@ jobs:
         echo "DOCSDIR = ${{github.workspace}}/DOCS" >> make.inc
     - name: Alias for GCC compilers
       run: |
-        sudo ln -s $(which gcc-11) /usr/local/bin/gcc
-        sudo ln -s $(which gfortran-11) /usr/local/bin/gfortran
+        sudo ln -s $(which gcc-14) /usr/local/bin/gcc
+        sudo ln -s $(which gfortran-14) /usr/local/bin/gfortran
     - name: Install
       run: |
         make -s -j2 all

.github/workflows/scorecard.yml

@@ -32,12 +32,12 @@ jobs:
 
     steps:
       - name: "Checkout code"
-        uses: actions/checkout@c85c95e3d7251135ab7dc9ce3241c5835cc595a9 # v3.5.3
+        uses: actions/checkout@d632683dd7b4114ad314bca15554477dd762a938 # tag=v4.2.0
         with:
           persist-credentials: false
 
       - name: "Run analysis"
-        uses: ossf/scorecard-action@08b4669551908b1024bb425080c797723083c031 # v2.2.0
+        uses: ossf/scorecard-action@62b2cac7ed8198b15735ed49ab1e5cf35480ba46 # v2.4.0
         with:
           results_file: results.sarif
           results_format: sarif
@@ -59,14 +59,14 @@ jobs:
       # Upload the results as artifacts (optional). Commenting out will disable uploads of run results in SARIF
       # format to the repository Actions tab.
       - name: "Upload artifact"
-        uses: actions/upload-artifact@0b7f8abb1508181956e8e162db84b466c27e18ce # v3.1.2
+        uses: actions/upload-artifact@b4b15b8c7c6ac21ea08fcf65892d2ee8f75cf882 # v4.4.3
         with:
           name: SARIF file
           path: results.sarif
           retention-days: 5
 
       # Upload the results to GitHub's code scanning dashboard.
       - name: "Upload to code-scanning"
-        uses: github/codeql-action/upload-sarif@f9a7c6738f28efb36e31d49c53a201a9c5d6a476 # v2.14.2
+        uses: github/codeql-action/upload-sarif@662472033e021d55d94146f66f6058822b0b39fd # v3.27.0
         with:
           sarif_file: results.sarif

.gitignore

@@ -43,3 +43,7 @@ build*
 DOCS/man
 DOCS/explore-html
 output_err
+
+# Mod files from compilation in SRC
+SRC/la_constants.mod
+SRC/la_xisnan.mod

BLAS/SRC/cgemmtr.f

@@ -50,9 +50,9 @@
 *>           On entry, UPLO specifies whether the lower or the upper
 *>           triangular part of C is access and updated.
 *>
-*>              UPLO = 'L' or 'l', the lower tringular part of C is used.
+*>              UPLO = 'L' or 'l', the lower triangular part of C is used.
 *>
-*>              UPLO = 'U' or 'u', the upper tringular part of C is used.
+*>              UPLO = 'U' or 'u', the upper triangular part of C is used.
 *> \endverbatim
 *
 *> \param[in] TRANSA
@@ -154,7 +154,7 @@
 *>           Before entry, the leading  n by n  part of the array  C must
 *>           contain the matrix  C,  except when  beta  is zero, in which
 *>           case C need not be set on entry.
-*>           On exit, the upper or lower trinangular part of the matrix
+*>           On exit, the upper or lower triangular part of the matrix
 *>           C  is overwritten by the n by n matrix
 *>           ( alpha*op( A )*op( B ) + beta*C ).
 *> \endverbatim

BLAS/SRC/dgemmtr.f

@@ -50,9 +50,9 @@
 *>           On entry, UPLO specifies whether the lower or the upper
 *>           triangular part of C is access and updated.
 *>
-*>              UPLO = 'L' or 'l', the lower tringular part of C is used.
+*>              UPLO = 'L' or 'l', the lower triangular part of C is used.
 *>
-*>              UPLO = 'U' or 'u', the upper tringular part of C is used.
+*>              UPLO = 'U' or 'u', the upper triangular part of C is used.
 *> \endverbatim
 *
 *> \param[in] TRANSA
@@ -154,7 +154,7 @@
 *>           Before entry, the leading  n by n  part of the array  C must
 *>           contain the matrix  C,  except when  beta  is zero, in which
 *>           case C need not be set on entry.
-*>           On exit, the upper or lower trinangular part of the matrix
+*>           On exit, the upper or lower triangular part of the matrix
 *>           C  is overwritten by the n by n matrix
 *>           ( alpha*op( A )*op( B ) + beta*C ).
 *> \endverbatim

BLAS/SRC/drotm.f

@@ -38,6 +38,10 @@
 *>    H=(          )    (          )    (          )    (          )
 *>      (DH21  DH22),   (DH21  1.D0),   (-1.D0 DH22),   (0.D0  1.D0).
 *>    SEE DROTMG FOR A DESCRIPTION OF DATA STORAGE IN DPARAM.
+*>
+*>    IF DFLAG IS NOT ONE OF THE LISTED ABOVE, THE BEHAVIOR IS UNDEFINED.
+*>    NANS IN DFLAG MAY NOT PROPAGATE TO THE OUTPUT.
+*>
 *> \endverbatim
 *
 *  Arguments:

BLAS/SRC/sgemmtr.f

@@ -50,9 +50,9 @@
 *>           On entry, UPLO specifies whether the lower or the upper
 *>           triangular part of C is access and updated.
 *>
-*>              UPLO = 'L' or 'l', the lower tringular part of C is used.
+*>              UPLO = 'L' or 'l', the lower triangular part of C is used.
 *>
-*>              UPLO = 'U' or 'u', the upper tringular part of C is used.
+*>              UPLO = 'U' or 'u', the upper triangular part of C is used.
 *> \endverbatim
 *
 *> \param[in] TRANSA
@@ -154,7 +154,7 @@
 *>           Before entry, the leading  n by n  part of the array  C must
 *>           contain the matrix  C,  except when  beta  is zero, in which
 *>           case C need not be set on entry.
-*>           On exit, the upper or lower trinangular part of the matrix
+*>           On exit, the upper or lower triangular part of the matrix
 *>           C  is overwritten by the n by n matrix
 *>           ( alpha*op( A )*op( B ) + beta*C ).
 *> \endverbatim

BLAS/SRC/srotm.f

@@ -39,6 +39,9 @@
 *>      (SH21  SH22),   (SH21  1.E0),   (-1.E0 SH22),   (0.E0  1.E0).
 *>    SEE  SROTMG FOR A DESCRIPTION OF DATA STORAGE IN SPARAM.
 *>
+*>    IF SFLAG IS NOT ONE OF THE LISTED ABOVE, THE BEHAVIOR IS UNDEFINED.
+*>    NANS IN SFLAG MAY NOT PROPAGATE TO THE OUTPUT.
+*>
 *> \endverbatim
 *
 *  Arguments:

BLAS/SRC/zgemmtr.f

@@ -50,9 +50,9 @@
 *>           On entry, UPLO specifies whether the lower or the upper
 *>           triangular part of C is access and updated.
 *>
-*>              UPLO = 'L' or 'l', the lower tringular part of C is used.
+*>              UPLO = 'L' or 'l', the lower triangular part of C is used.
 *>
-*>              UPLO = 'U' or 'u', the upper tringular part of C is used.
+*>              UPLO = 'U' or 'u', the upper triangular part of C is used.
 *> \endverbatim
 *
 *> \param[in] TRANSA
@@ -154,7 +154,7 @@
 *>           Before entry, the leading  n by n  part of the array  C must
 *>           contain the matrix  C,  except when  beta  is zero, in which
 *>           case C need not be set on entry.
-*>           On exit, the upper or lower trinangular part of the matrix
+*>           On exit, the upper or lower triangular part of the matrix
 *>           C  is overwritten by the n by n matrix
 *>           ( alpha*op( A )*op( B ) + beta*C ).
 *> \endverbatim