diff options
author | julie <julielangou@users.noreply.github.com> | 2015-11-08 23:42:08 +0000 |
---|---|---|
committer | julie <julielangou@users.noreply.github.com> | 2015-11-08 23:42:08 +0000 |
commit | 5768f537085f3a27a3157df778af85b41c201491 (patch) | |
tree | 0aafaf90d6794e1d9e6e0a89cf42e9bb11ae5085 /SRC/cgsvj0.f | |
parent | b412768c7a59860ac54dcdfb1aa0f29daecc0fe2 (diff) |
First commit for Zlatko Drmac Contribution - Fixing z precisions issues + modif sent by Zlatko
Diffstat (limited to 'SRC/cgsvj0.f')
-rw-r--r-- | SRC/cgsvj0.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/cgsvj0.f b/SRC/cgsvj0.f index 690bed01..79ffde62 100644 --- a/SRC/cgsvj0.f +++ b/SRC/cgsvj0.f @@ -255,7 +255,7 @@ * .. * .. * .. Intrinsic Functions .. - INTRINSIC ABS, AMAX1, CONJG, FLOAT, MIN0, MAX0, SIGN, SQRT + INTRINSIC ABS, AMAX1, CONJG, FLOAT, MIN0, SIGN, SQRT * .. * .. External Functions .. REAL SCNRM2 @@ -268,7 +268,7 @@ * .. External Subroutines .. * .. * from BLAS - EXTERNAL CCOPY, CSROT, CSSCAL, CSWAP + EXTERNAL CCOPY, CROT, CSSCAL, CSWAP * from LAPACK EXTERNAL CLASCL, CLASSQ, XERBLA * .. |