Declare DROT as EXTERNAL

OpenMathLib · Jun 16, 2021 · 9e1b43e · 9e1b43e
1 parent 5269348
commit 9e1b43e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lapack-netlib/TESTING/EIG/dckcsd.f b/lapack-netlib/TESTING/EIG/dckcsd.f
@@ -226,7 +226,7 @@ SUBROUTINE DCKCSD( NM, MVAL, PVAL, QVAL, NMATS, ISEED, THRESH,
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           ALAHDG, ALAREQ, ALASUM, DCSDTS, DLACSG, DLAROR,
-     $                   DLASET
+     $                   DLASET, DROT
 *     ..
 *     .. Intrinsic Functions ..
       INTRINSIC          ABS, MIN