From 150c7294a6014923602106fbcdc3a8cb870722a1 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Thu, 8 Feb 2018 14:57:13 +0100 Subject: [PATCH] Remove spurious EXTERNAL reference From Reference-LAPACK issue 228, remove spurious EXTERNAL reference to unused and nonexistent function xLACGV that could cause linking problems. --- lapack-netlib/SRC/dsytrf_aa_2stage.f | 2 +- lapack-netlib/SRC/ssytrf_aa_2stage.f | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lapack-netlib/SRC/dsytrf_aa_2stage.f b/lapack-netlib/SRC/dsytrf_aa_2stage.f index 299130564..f5f06cc1d 100644 --- a/lapack-netlib/SRC/dsytrf_aa_2stage.f +++ b/lapack-netlib/SRC/dsytrf_aa_2stage.f @@ -191,7 +191,7 @@ EXTERNAL LSAME, ILAENV * .. * .. External Subroutines .. - EXTERNAL XERBLA, DCOPY, DLACGV, DLACPY, + EXTERNAL XERBLA, DCOPY, DLACPY, $ DLASET, DGBTRF, DGEMM, DGETRF, $ DSYGST, DSWAP, DTRSM * .. diff --git a/lapack-netlib/SRC/ssytrf_aa_2stage.f b/lapack-netlib/SRC/ssytrf_aa_2stage.f index be6809dfa..a92974930 100644 --- a/lapack-netlib/SRC/ssytrf_aa_2stage.f +++ b/lapack-netlib/SRC/ssytrf_aa_2stage.f @@ -191,7 +191,7 @@ EXTERNAL LSAME, ILAENV * .. * .. External Subroutines .. - EXTERNAL XERBLA, SCOPY, SLACGV, SLACPY, + EXTERNAL XERBLA, SCOPY, SLACPY, $ SLASET, SGBTRF, SGEMM, SGETRF, $ SSYGST, SSWAP, STRSM * ..