APPLYING INTEL PATCHES sent to Julie on Feb 19th 2016 by Dima from INTEL (dmitry...

[PATCH 21/42] Fix ?GEESX documentation - typo in description of SELECT

diff --git a/SRC/cgeesx.f b/SRC/cgeesx.f
index 81157717a046b3e1ec0e30a58dec6235204b23dc..e7c135e78997e5a50d6df8e2ea621e8bb1c35d44 100644 (file)
--- a/SRC/cgeesx.f
+++ b/SRC/cgeesx.f
@@ -83,7 +83,7 @@
 *>
 *> \param[in] SELECT
 *> \verbatim
-*>          SELECT is procedure) LOGICAL FUNCTION of one COMPLEX argument
+*>          SELECT is a LOGICAL FUNCTION of one COMPLEX argument
 *>          SELECT must be declared EXTERNAL in the calling subroutine.
 *>          If SORT = 'S', SELECT is used to select eigenvalues to order
 *>          to the top left of the Schur form.

diff --git a/SRC/dgeesx.f b/SRC/dgeesx.f
index 2a3e963fdc807ebc8e9d57448d4d1023924795be..f87d05845dac6b30465fb19ad88483c823d9a6a8 100644 (file)
--- a/SRC/dgeesx.f
+++ b/SRC/dgeesx.f
@@ -90,7 +90,7 @@
 *>
 *> \param[in] SELECT
 *> \verbatim
-*>          SELECT is procedure) LOGICAL FUNCTION of two DOUBLE PRECISION arguments
+*>          SELECT is a LOGICAL FUNCTION of two DOUBLE PRECISION arguments
 *>          SELECT must be declared EXTERNAL in the calling subroutine.
 *>          If SORT = 'S', SELECT is used to select eigenvalues to sort
 *>          to the top left of the Schur form.

diff --git a/SRC/sgeesx.f b/SRC/sgeesx.f
index fe98b450e16f75ee594e20ea63937d0fee60f08c..b1f280255495571dbd1c62813d0bc89122ee5933 100644 (file)
--- a/SRC/sgeesx.f
+++ b/SRC/sgeesx.f
@@ -90,7 +90,7 @@
 *>
 *> \param[in] SELECT
 *> \verbatim
-*>          SELECT is procedure) LOGICAL FUNCTION of two REAL arguments
+*>          SELECT is a LOGICAL FUNCTION of two REAL arguments
 *>          SELECT must be declared EXTERNAL in the calling subroutine.
 *>          If SORT = 'S', SELECT is used to select eigenvalues to sort
 *>          to the top left of the Schur form.

diff --git a/SRC/zgeesx.f b/SRC/zgeesx.f
index 4cf4ef319412752f43156fe175659cd3f2e61b13..4d8ad83a85b9459b002198da80286c7c7ec2bbd9 100644 (file)
--- a/SRC/zgeesx.f
+++ b/SRC/zgeesx.f
@@ -83,7 +83,7 @@
 *>
 *> \param[in] SELECT
 *> \verbatim
-*>          SELECT is procedure) LOGICAL FUNCTION of one COMPLEX*16 argument
+*>          SELECT is a LOGICAL FUNCTION of one COMPLEX*16 argument
 *>          SELECT must be declared EXTERNAL in the calling subroutine.
 *>          If SORT = 'S', SELECT is used to select eigenvalues to order
 *>          to the top left of the Schur form.