White space.

diff --git a/SRC/chetrs_aa.f b/SRC/chetrs_aa.f
index 1544f3c..47d7825 100644 (file)
--- a/SRC/chetrs_aa.f
+++ b/SRC/chetrs_aa.f
@@ -19,7 +19,7 @@
 *  ===========
 *
 *       SUBROUTINE CHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-*                                WORK, LWORK, INFO )
+*                             WORK, LWORK, INFO )
 *
 *       .. Scalar Arguments ..
 *       CHARACTER          UPLO
@@ -127,7 +127,7 @@
 *
 *  =====================================================================
       SUBROUTINE CHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-     $                         WORK, LWORK, INFO )
+     $                      WORK, LWORK, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/SRC/dsytrs_aa.f b/SRC/dsytrs_aa.f
index 641611e..ddb9d3f 100644 (file)
--- a/SRC/dsytrs_aa.f
+++ b/SRC/dsytrs_aa.f
@@ -19,7 +19,7 @@
 *  ===========
 *
 *       SUBROUTINE DSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-*                                WORK, LWORK, INFO )
+*                             WORK, LWORK, INFO )
 *
 *       .. Scalar Arguments ..
 *       CHARACTER          UPLO
@@ -127,7 +127,7 @@
 *
 *  =====================================================================
       SUBROUTINE DSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-     $                         WORK, LWORK, INFO )
+     $                      WORK, LWORK, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/SRC/ssytrs_aa.f b/SRC/ssytrs_aa.f
index 64fb8fa..06c793a 100644 (file)
--- a/SRC/ssytrs_aa.f
+++ b/SRC/ssytrs_aa.f
@@ -19,7 +19,7 @@
 *  ===========
 *
 *       SUBROUTINE SSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-*                                WORK, LWORK, INFO )
+*                             WORK, LWORK, INFO )
 *
 *       .. Scalar Arguments ..
 *       CHARACTER          UPLO
@@ -127,7 +127,7 @@
 *
 *  =====================================================================
       SUBROUTINE SSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-     $                         WORK, LWORK, INFO )
+     $                      WORK, LWORK, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --

diff --git a/SRC/zhetrs_aa.f b/SRC/zhetrs_aa.f
index 58237d1..fd819d5 100644 (file)
--- a/SRC/zhetrs_aa.f
+++ b/SRC/zhetrs_aa.f
@@ -19,7 +19,7 @@
 *  ===========
 *
 *       SUBROUTINE ZHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-*                                WORK, LWORK, INFO )
+*                             WORK, LWORK, INFO )
 *
 *       .. Scalar Arguments ..
 *       CHARACTER          UPLO
@@ -128,7 +128,7 @@
 *
 *  =====================================================================
       SUBROUTINE ZHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB,
-     $                         WORK, LWORK, INFO )
+     $                      WORK, LWORK, INFO )
 *
 *  -- LAPACK computational routine (version 3.7.0) --
 *  -- LAPACK is a software package provided by Univ. of Tennessee,    --