From 24f7712630dede155253011cbba1b96938d5f3c8 Mon Sep 17 00:00:00 2001 From: Henning Thielemann Date: Tue, 6 Jun 2017 19:57:36 +0200 Subject: xSYTRI2X, parameter comment: WORK dimensions use NB instead of NNB --- SRC/csytri2x.f | 2 +- SRC/dsytri2x.f | 2 +- SRC/ssytri2x.f | 2 +- SRC/zsytri2x.f | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/SRC/csytri2x.f b/SRC/csytri2x.f index 046d6134..4201a4f7 100644 --- a/SRC/csytri2x.f +++ b/SRC/csytri2x.f @@ -87,7 +87,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is COMPLEX array, dimension (N+NNB+1,NNB+3) +*> WORK is COMPLEX array, dimension (N+NB+1,NB+3) *> \endverbatim *> *> \param[in] NB diff --git a/SRC/dsytri2x.f b/SRC/dsytri2x.f index bcd5c942..77fda2de 100644 --- a/SRC/dsytri2x.f +++ b/SRC/dsytri2x.f @@ -87,7 +87,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is DOUBLE PRECISION array, dimension (N+NNB+1,NNB+3) +*> WORK is DOUBLE PRECISION array, dimension (N+NB+1,NB+3) *> \endverbatim *> *> \param[in] NB diff --git a/SRC/ssytri2x.f b/SRC/ssytri2x.f index c218383a..6d15fad1 100644 --- a/SRC/ssytri2x.f +++ b/SRC/ssytri2x.f @@ -87,7 +87,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is REAL array, dimension (N+NNB+1,NNB+3) +*> WORK is REAL array, dimension (N+NB+1,NB+3) *> \endverbatim *> *> \param[in] NB diff --git a/SRC/zsytri2x.f b/SRC/zsytri2x.f index a8e068db..38e3cb32 100644 --- a/SRC/zsytri2x.f +++ b/SRC/zsytri2x.f @@ -87,7 +87,7 @@ *> *> \param[out] WORK *> \verbatim -*> WORK is COMPLEX*16 array, dimension (N+NNB+1,NNB+3) +*> WORK is COMPLEX*16 array, dimension (N+NB+1,NB+3) *> \endverbatim *> *> \param[in] NB -- cgit v1.2.3