diff options
Diffstat (limited to 'SRC/ssyrfsx.f')
| -rw-r--r-- | SRC/ssyrfsx.f | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/SRC/ssyrfsx.f b/SRC/ssyrfsx.f index 1ac7f6b7..4ef498f4 100644 --- a/SRC/ssyrfsx.f +++ b/SRC/ssyrfsx.f @@ -462,12 +462,11 @@ INTRINSIC MAX, SQRT * .. * .. External Functions .. - EXTERNAL LSAME, BLAS_FPINFO_X, ILATRANS, ILAPREC + EXTERNAL LSAME, ILAPREC EXTERNAL SLAMCH, SLANSY, SLA_SYRCOND REAL SLAMCH, SLANSY, SLA_SYRCOND LOGICAL LSAME - INTEGER BLAS_FPINFO_X - INTEGER ILATRANS, ILAPREC + INTEGER ILAPREC * .. * .. Executable Statements .. * |