From c46d58082b93df274c0de01601a5a48bc75dd65e Mon Sep 17 00:00:00 2001 From: "weslley.spereira" Date: Mon, 24 May 2021 10:06:40 -0300 Subject: [PATCH] Add a comment to the documentation of INFO in xGESDD --- SRC/cgesdd.f | 7 ++++--- SRC/dgesdd.f | 7 ++++--- SRC/sgesdd.f | 7 ++++--- SRC/zgesdd.f | 7 ++++--- 4 files changed, 16 insertions(+), 12 deletions(-) diff --git a/SRC/cgesdd.f b/SRC/cgesdd.f index 4354349fbe..2a56a277ae 100644 --- a/SRC/cgesdd.f +++ b/SRC/cgesdd.f @@ -199,9 +199,10 @@ *> \param[out] INFO *> \verbatim *> INFO is INTEGER -*> = 0: successful exit. -*> < 0: if INFO = -i, the i-th argument had an illegal value. -*> > 0: The updating process of SBDSDC did not converge. +*> < 0: if INFO = -i, the i-th argument had an illegal value. +*> = -4: if A had a NAN entry. +*> > 0: The updating process of SBDSDC did not converge. +*> = 0: successful exit. *> \endverbatim * * Authors: diff --git a/SRC/dgesdd.f b/SRC/dgesdd.f index a6770999c0..9b4f1c009a 100644 --- a/SRC/dgesdd.f +++ b/SRC/dgesdd.f @@ -191,9 +191,10 @@ *> \param[out] INFO *> \verbatim *> INFO is INTEGER -*> = 0: successful exit. -*> < 0: if INFO = -i, the i-th argument had an illegal value. -*> > 0: DBDSDC did not converge, updating process failed. +*> < 0: if INFO = -i, the i-th argument had an illegal value. +*> = -4: if A had a NAN entry. +*> > 0: DBDSDC did not converge, updating process failed. +*> = 0: successful exit. *> \endverbatim * * Authors: diff --git a/SRC/sgesdd.f b/SRC/sgesdd.f index a2a03ee58f..4e0afaa015 100644 --- a/SRC/sgesdd.f +++ b/SRC/sgesdd.f @@ -191,9 +191,10 @@ *> \param[out] INFO *> \verbatim *> INFO is INTEGER -*> = 0: successful exit. -*> < 0: if INFO = -i, the i-th argument had an illegal value. -*> > 0: SBDSDC did not converge, updating process failed. +*> < 0: if INFO = -i, the i-th argument had an illegal value. +*> = -4: if A had a NAN entry. +*> > 0: SBDSDC did not converge, updating process failed. +*> = 0: successful exit. *> \endverbatim * * Authors: diff --git a/SRC/zgesdd.f b/SRC/zgesdd.f index f7f04836cf..3ab8b72a9c 100644 --- a/SRC/zgesdd.f +++ b/SRC/zgesdd.f @@ -199,9 +199,10 @@ *> \param[out] INFO *> \verbatim *> INFO is INTEGER -*> = 0: successful exit. -*> < 0: if INFO = -i, the i-th argument had an illegal value. -*> > 0: The updating process of DBDSDC did not converge. +*> < 0: if INFO = -i, the i-th argument had an illegal value. +*> = -4: if A had a NAN entry. +*> > 0: The updating process of DBDSDC did not converge. +*> = 0: successful exit. *> \endverbatim * * Authors: