xLAQR5; WANTT, WANTZ parameters: logical scalar -> LOGICAL

diff --git a/SRC/claqr5.f b/SRC/claqr5.f
index 194904b..5b88d7c 100644 (file)
--- 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 56435f7..a5a4961 100644 (file)
--- 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 6a00713..59692bd 100644 (file)
--- 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 08b1de5..422d7b2 100644 (file)
--- 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