Index: INSTALL/dlamchf77.f
===================================================================
--- INSTALL/dlamchf77.f	(revision 1137)
+++ INSTALL/dlamchf77.f	(revision 1138)
@@ -71,35 +71,6 @@
 *     .. Scalar Arguments ..
       CHARACTER          CMACH
 *     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            IEEE1, RND
-      INTEGER            BETA, T
-*     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            RND
-      INTEGER            BETA, EMAX, EMIN, T
-      DOUBLE PRECISION   EPS, RMAX, RMIN
-*     ..
-*
-*     .. Scalar Arguments ..
-      DOUBLE PRECISION   A, B
-*     ..
-*
-*     .. Scalar Arguments ..
-      INTEGER            BASE, EMIN
-      DOUBLE PRECISION   START
-*     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            IEEE
-      INTEGER            BETA, EMAX, EMIN, P
-      DOUBLE PRECISION   RMAX
-*     ..
-*
-* =====================================================================
-*
 *     .. Parameters ..
       DOUBLE PRECISION   ONE, ZERO
       PARAMETER          ( ONE = 1.0D+0, ZERO = 0.0D+0 )
Index: INSTALL/slamchf77.f
===================================================================
--- INSTALL/slamchf77.f	(revision 1137)
+++ INSTALL/slamchf77.f	(revision 1138)
@@ -75,36 +75,6 @@
 *     .. Scalar Arguments ..
       CHARACTER          CMACH
 *     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            IEEE1, RND
-      INTEGER            BETA, T
-*     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            RND
-      INTEGER            BETA, EMAX, EMIN, T
-      REAL               EPS, RMAX, RMIN
-*     ..
-*
-*     .. Scalar Arguments ..
-      REAL               A, B
-*     ..
-*
-*     .. Scalar Arguments ..
-      INTEGER            BASE
-      INTEGER            EMIN
-      REAL               START
-*     ..
-*
-*     .. Scalar Arguments ..
-      LOGICAL            IEEE
-      INTEGER            BETA, EMAX, EMIN, P
-      REAL               RMAX
-*     ..
-*
-* =====================================================================
-*
 *     .. Parameters ..
       REAL               ONE, ZERO
       PARAMETER          ( ONE = 1.0E+0, ZERO = 0.0E+0 )