diff options
Diffstat (limited to 'SRC/dbbcsd.f')
| -rw-r--r-- | SRC/dbbcsd.f | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/SRC/dbbcsd.f b/SRC/dbbcsd.f index 91049d1e..4f931e75 100644 --- a/SRC/dbbcsd.f +++ b/SRC/dbbcsd.f @@ -236,6 +236,40 @@ *> partially reduced top-right block. *> \endverbatim *> +*> \param[out] B21D +*> \verbatim +*> B21D is DOUBLE PRECISION array, dimension (Q) +*> When CBBCSD converges, B21D contains the negative sines of +*> THETA(1), ..., THETA(Q). If CBBCSD fails to converge, then +*> B21D contains the diagonal of the partially reduced bottom-left +*> block. +*> \endverbatim +*> +*> \param[out] B21E +*> \verbatim +*> B21E is DOUBLE PRECISION array, dimension (Q-1) +*> When CBBCSD converges, B21E contains zeros. If CBBCSD fails +*> to converge, then B21E contains the subdiagonal of the +*> partially reduced bottom-left block. +*> \endverbatim +*> +*> \param[out] B22D +*> \verbatim +*> B22D is DOUBLE PRECISION array, dimension (Q) +*> When CBBCSD converges, B22D contains the negative sines of +*> THETA(1), ..., THETA(Q). If CBBCSD fails to converge, then +*> B22D contains the diagonal of the partially reduced bottom-right +*> block. +*> \endverbatim +*> +*> \param[out] B22E +*> \verbatim +*> B22E is DOUBLE PRECISION array, dimension (Q-1) +*> When CBBCSD converges, B22E contains zeros. If CBBCSD fails +*> to converge, then B22E contains the subdiagonal of the +*> partially reduced bottom-right block. +*> \endverbatim +*> *> \param[out] WORK *> \verbatim *> WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK)) |