summaryrefslogtreecommitdiff
path: root/SRC/dgeevx.f
diff options
context:
space:
mode:
Diffstat (limited to 'SRC/dgeevx.f')
-rw-r--r--SRC/dgeevx.f4
1 files changed, 3 insertions, 1 deletions
diff --git a/SRC/dgeevx.f b/SRC/dgeevx.f
index d2ba08f0..e8610de0 100644
--- a/SRC/dgeevx.f
+++ b/SRC/dgeevx.f
@@ -296,6 +296,8 @@
*
*> \date September 2012
*
+* @precisions fortran d -> s
+*
*> \ingroup doubleGEeigen
*
* =====================================================================
@@ -331,7 +333,7 @@
LOGICAL LQUERY, SCALEA, WANTVL, WANTVR, WNTSNB, WNTSNE,
$ WNTSNN, WNTSNV
CHARACTER JOB, SIDE
- INTEGER HSWORK, I, ICOND, IERR, ITAU, IWRK, K,
+ INTEGER HSWORK, I, ICOND, IERR, ITAU, IWRK, K,
$ LWORK_TREVC, MAXWRK, MINWRK, NOUT
DOUBLE PRECISION ANRM, BIGNUM, CS, CSCALE, EPS, R, SCL, SMLNUM,
$ SN