diff options
| author | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 17:34:46 +0200 |
|---|---|---|
| committer | Henning Thielemann <git@henning-thielemann.de> | 2017-06-03 17:34:46 +0200 |
| commit | 365d50cf708e3e0fa3d9096076ee64e80a67e2d3 (patch) | |
| tree | e34e212881fd76404634bfcd852aac6482fba4f2 /SRC | |
| parent | d920de192cb388beacd750fc972397e8c27c4a0d (diff) | |
| download | lapack-365d50cf708e3e0fa3d9096076ee64e80a67e2d3.tar.gz lapack-365d50cf708e3e0fa3d9096076ee64e80a67e2d3.tar.bz2 lapack-365d50cf708e3e0fa3d9096076ee64e80a67e2d3.zip | |
xLAQR5; WANTT, WANTZ parameters: logical scalar -> LOGICAL
Diffstat (limited to 'SRC')
| -rw-r--r-- | SRC/claqr5.f | 4 | ||||
| -rw-r--r-- | SRC/dlaqr5.f | 4 | ||||
| -rw-r--r-- | SRC/slaqr5.f | 4 | ||||
| -rw-r--r-- | SRC/zlaqr5.f | 4 |
4 files changed, 8 insertions, 8 deletions
diff --git a/SRC/claqr5.f b/SRC/claqr5.f index 194904b0..5b88d7c4 100644 --- a/SRC/claqr5.f +++ b/SRC/claqr5.f @@ -47,14 +47,14 @@ * *> \param[in] WANTT *> \verbatim -*> WANTT is logical scalar +*> WANTT is LOGICAL *> WANTT = .true. if the triangular Schur factor *> is being computed. WANTT is set to .false. otherwise. *> \endverbatim *> *> \param[in] WANTZ *> \verbatim -*> WANTZ is logical scalar +*> WANTZ is LOGICAL *> WANTZ = .true. if the unitary Schur factor is being *> computed. WANTZ is set to .false. otherwise. *> \endverbatim diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index 56435f7c..a5a49610 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -48,14 +48,14 @@ * *> \param[in] WANTT *> \verbatim -*> WANTT is logical scalar +*> WANTT is LOGICAL *> WANTT = .true. if the quasi-triangular Schur factor *> is being computed. WANTT is set to .false. otherwise. *> \endverbatim *> *> \param[in] WANTZ *> \verbatim -*> WANTZ is logical scalar +*> WANTZ is LOGICAL *> WANTZ = .true. if the orthogonal Schur factor is being *> computed. WANTZ is set to .false. otherwise. *> \endverbatim diff --git a/SRC/slaqr5.f b/SRC/slaqr5.f index 6a007134..59692bd0 100644 --- a/SRC/slaqr5.f +++ b/SRC/slaqr5.f @@ -48,14 +48,14 @@ * *> \param[in] WANTT *> \verbatim -*> WANTT is logical scalar +*> WANTT is LOGICAL *> WANTT = .true. if the quasi-triangular Schur factor *> is being computed. WANTT is set to .false. otherwise. *> \endverbatim *> *> \param[in] WANTZ *> \verbatim -*> WANTZ is logical scalar +*> WANTZ is LOGICAL *> WANTZ = .true. if the orthogonal Schur factor is being *> computed. WANTZ is set to .false. otherwise. *> \endverbatim diff --git a/SRC/zlaqr5.f b/SRC/zlaqr5.f index 08b1de5f..422d7b21 100644 --- a/SRC/zlaqr5.f +++ b/SRC/zlaqr5.f @@ -47,14 +47,14 @@ * *> \param[in] WANTT *> \verbatim -*> WANTT is logical scalar +*> WANTT is LOGICAL *> WANTT = .true. if the triangular Schur factor *> is being computed. WANTT is set to .false. otherwise. *> \endverbatim *> *> \param[in] WANTZ *> \verbatim -*> WANTZ is logical scalar +*> WANTZ is LOGICAL *> WANTZ = .true. if the unitary Schur factor is being *> computed. WANTZ is set to .false. otherwise. *> \endverbatim |