diff options
author | Julie <julie@cs.utk.edu> | 2016-11-02 17:58:33 -0700 |
---|---|---|
committer | Julie <julie@cs.utk.edu> | 2016-11-02 17:58:33 -0700 |
commit | 1b84e31ac722588f8f801973d0c539bda0733bab (patch) | |
tree | edaa6d689689355d2c8a63d3ce938feb8697e93f /SRC/zsyrfsx.f | |
parent | 3a7806f04c023d44036874e1fc678dffe0d340d7 (diff) |
Fix #80 from @reeuwijk-altium
Remove a bunch of unused symbols
Diffstat (limited to 'SRC/zsyrfsx.f')
-rw-r--r-- | SRC/zsyrfsx.f | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/SRC/zsyrfsx.f b/SRC/zsyrfsx.f index a61792f9..09f6638d 100644 --- a/SRC/zsyrfsx.f +++ b/SRC/zsyrfsx.f @@ -463,12 +463,11 @@ INTRINSIC MAX, SQRT, TRANSFER * .. * .. External Functions .. - EXTERNAL LSAME, BLAS_FPINFO_X, ILATRANS, ILAPREC + EXTERNAL LSAME, ILAPREC EXTERNAL DLAMCH, ZLANSY, ZLA_SYRCOND_X, ZLA_SYRCOND_C DOUBLE PRECISION DLAMCH, ZLANSY, ZLA_SYRCOND_X, ZLA_SYRCOND_C LOGICAL LSAME - INTEGER BLAS_FPINFO_X - INTEGER ILATRANS, ILAPREC + INTEGER ILAPREC * .. * .. Executable Statements .. * |