diff --git a/TESTING/MATGEN/clatmr.f b/TESTING/MATGEN/clatmr.f
index 8510092ae3..c066d76daf 100644
--- a/TESTING/MATGEN/clatmr.f
+++ b/TESTING/MATGEN/clatmr.f
@@ -531,7 +531,8 @@ SUBROUTINE CLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       LOGICAL            LSAME
       REAL               CLANGB, CLANGE, CLANSB, CLANSP, CLANSY
       COMPLEX            CLATM2, CLATM3
-      EXTERNAL           LSAME, CLANGB, CLANGE, CLANSB, CLANSP, CLANSY,
+      EXTERNAL           LSAME, CLANGB, CLANGE,
+     $                   CLANSB, CLANSP, CLANSY,
      $                   CLATM2, CLATM3
 *     ..
 *     .. External Subroutines ..
diff --git a/TESTING/MATGEN/clatms.f b/TESTING/MATGEN/clatms.f
index 382f9e67ec..8211a3f3a7 100644
--- a/TESTING/MATGEN/clatms.f
+++ b/TESTING/MATGEN/clatms.f
@@ -375,7 +375,8 @@ SUBROUTINE CLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       EXTERNAL           LSAME, SLARND, CLARND
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           CLAGGE, CLAGHE, CLAGSY, CLAROT, CLARTG, CLASET,
+      EXTERNAL           CLAGGE, CLAGHE, CLAGSY,
+     $                   CLAROT, CLARTG, CLASET,
      $                   SLATM1, SSCAL, XERBLA
 *     ..
 *     .. Intrinsic Functions ..
diff --git a/TESTING/MATGEN/clatmt.f b/TESTING/MATGEN/clatmt.f
index 6a18f2ae28..336b298c6a 100644
--- a/TESTING/MATGEN/clatmt.f
+++ b/TESTING/MATGEN/clatmt.f
@@ -383,7 +383,8 @@ SUBROUTINE CLATMT( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       EXTERNAL           CLARND, SLARND, LSAME
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           CLAGGE, CLAGHE, CLAGSY, CLAROT, CLARTG, CLASET,
+      EXTERNAL           CLAGGE, CLAGHE, CLAGSY,
+     $                   CLAROT, CLARTG, CLASET,
      $                   SLATM7, SSCAL, XERBLA
 *     ..
 *     .. Intrinsic Functions ..
diff --git a/TESTING/MATGEN/dlatmr.f b/TESTING/MATGEN/dlatmr.f
index d041a9aa39..836dcec83b 100644
--- a/TESTING/MATGEN/dlatmr.f
+++ b/TESTING/MATGEN/dlatmr.f
@@ -504,9 +504,11 @@ SUBROUTINE DLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
 *     ..
 *     .. External Functions ..
       LOGICAL            LSAME
-      DOUBLE PRECISION   DLANGB, DLANGE, DLANSB, DLANSP, DLANSY, DLATM2,
+      DOUBLE PRECISION   DLANGB, DLANGE, DLANSB,
+     $                   DLANSP, DLANSY, DLATM2,
      $                   DLATM3
-      EXTERNAL           LSAME, DLANGB, DLANGE, DLANSB, DLANSP, DLANSY,
+      EXTERNAL           LSAME, DLANGB, DLANGE,
+     $                   DLANSB, DLANSP, DLANSY,
      $                   DLATM2, DLATM3
 *     ..
 *     .. External Subroutines ..
diff --git a/TESTING/MATGEN/dlatms.f b/TESTING/MATGEN/dlatms.f
index d0cf9356cc..0ca3b7fb56 100644
--- a/TESTING/MATGEN/dlatms.f
+++ b/TESTING/MATGEN/dlatms.f
@@ -359,7 +359,8 @@ SUBROUTINE DLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       EXTERNAL           LSAME, DLARND
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           DCOPY, DLAGGE, DLAGSY, DLAROT, DLARTG, DLASET,
+      EXTERNAL           DCOPY, DLAGGE, DLAGSY,
+     $                   DLAROT, DLARTG, DLASET,
      $                   DLATM1, DSCAL, XERBLA
 *     ..
 *     .. Intrinsic Functions ..
diff --git a/TESTING/MATGEN/slatmr.f b/TESTING/MATGEN/slatmr.f
index 3fb12d4944..7635395a21 100644
--- a/TESTING/MATGEN/slatmr.f
+++ b/TESTING/MATGEN/slatmr.f
@@ -504,9 +504,11 @@ SUBROUTINE SLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
 *     ..
 *     .. External Functions ..
       LOGICAL            LSAME
-      REAL               SLANGB, SLANGE, SLANSB, SLANSP, SLANSY, SLATM2,
+      REAL               SLANGB, SLANGE, SLANSB,
+     $                   SLANSP, SLANSY, SLATM2,
      $                   SLATM3
-      EXTERNAL           LSAME, SLANGB, SLANGE, SLANSB, SLANSP, SLANSY,
+      EXTERNAL           LSAME, SLANGB, SLANGE,
+     $                   SLANSB, SLANSP, SLANSY,
      $                   SLATM2, SLATM3
 *     ..
 *     .. External Subroutines ..
diff --git a/TESTING/MATGEN/slatms.f b/TESTING/MATGEN/slatms.f
index c03d4cbc9f..dad00527fe 100644
--- a/TESTING/MATGEN/slatms.f
+++ b/TESTING/MATGEN/slatms.f
@@ -359,7 +359,8 @@ SUBROUTINE SLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       EXTERNAL           LSAME, SLARND
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           SCOPY, SLAGGE, SLAGSY, SLAROT, SLARTG, SLATM1,
+      EXTERNAL           SCOPY, SLAGGE, SLAGSY,
+     $                   SLAROT, SLARTG, SLATM1,
      $                   SLASET, SSCAL, XERBLA
 *     ..
 *     .. Intrinsic Functions ..
diff --git a/TESTING/MATGEN/zlatmr.f b/TESTING/MATGEN/zlatmr.f
index f87b4919ae..2d6b342638 100644
--- a/TESTING/MATGEN/zlatmr.f
+++ b/TESTING/MATGEN/zlatmr.f
@@ -529,9 +529,11 @@ SUBROUTINE ZLATMR( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
 *     ..
 *     .. External Functions ..
       LOGICAL            LSAME
-      DOUBLE PRECISION   ZLANGB, ZLANGE, ZLANSB, ZLANSP, ZLANSY
+      DOUBLE PRECISION   ZLANGB, ZLANGE, ZLANSB,
+     $                   ZLANSP, ZLANSY
       COMPLEX*16         ZLATM2, ZLATM3
-      EXTERNAL           LSAME, ZLANGB, ZLANGE, ZLANSB, ZLANSP, ZLANSY,
+      EXTERNAL           LSAME, ZLANGB, ZLANGE,
+     $                   ZLANSB, ZLANSP, ZLANSY,
      $                   ZLATM2, ZLATM3
 *     ..
 *     .. External Subroutines ..
diff --git a/TESTING/MATGEN/zlatms.f b/TESTING/MATGEN/zlatms.f
index 5118cc57f1..779edf2bfb 100644
--- a/TESTING/MATGEN/zlatms.f
+++ b/TESTING/MATGEN/zlatms.f
@@ -375,7 +375,8 @@ SUBROUTINE ZLATMS( M, N, DIST, ISEED, SYM, D, MODE, COND, DMAX,
       EXTERNAL           LSAME, DLARND, ZLARND
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           DLATM1, DSCAL, XERBLA, ZLAGGE, ZLAGHE, ZLAGSY,
+      EXTERNAL           DLATM1, DSCAL, XERBLA,
+     $                   ZLAGGE, ZLAGHE, ZLAGSY,
      $                   ZLAROT, ZLARTG, ZLASET
 *     ..
 *     .. Intrinsic Functions ..