remove recursive qualifier

lammps · Nov 9, 2024 · 35a1c51 · 35a1c51
1 parent 8ef2b6e
commit 35a1c51
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 4 deletions.
diff --git a/fortran/dgetrf2.f b/fortran/dgetrf2.f
@@ -109,7 +109,7 @@
 *> \ingroup getrf2
 *
 *  =====================================================================
-      RECURSIVE SUBROUTINE DGETRF2( M, N, A, LDA, IPIV, INFO )
+      SUBROUTINE DGETRF2( M, N, A, LDA, IPIV, INFO )
 *
 *  -- LAPACK computational routine --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/fortran/dpotrf2.f b/fortran/dpotrf2.f
@@ -102,7 +102,7 @@
 *> \ingroup potrf2
 *
 *  =====================================================================
-      RECURSIVE SUBROUTINE DPOTRF2( UPLO, N, A, LDA, INFO )
+      SUBROUTINE DPOTRF2( UPLO, N, A, LDA, INFO )
 *
 *  -- LAPACK computational routine --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/fortran/zgetrf2.f b/fortran/zgetrf2.f
@@ -111,7 +111,7 @@
 *> \ingroup complex16GEcomputational
 *
 *  =====================================================================
-      RECURSIVE SUBROUTINE ZGETRF2( M, N, A, LDA, IPIV, INFO )
+      SUBROUTINE ZGETRF2( M, N, A, LDA, IPIV, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/fortran/zpotrf2.f b/fortran/zpotrf2.f
@@ -104,7 +104,7 @@
 *> \ingroup complex16POcomputational
 *
 *  =====================================================================
-      RECURSIVE SUBROUTINE ZPOTRF2( UPLO, N, A, LDA, INFO )
+      SUBROUTINE ZPOTRF2( UPLO, N, A, LDA, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --