summaryrefslogtreecommitdiff
path: root/SRC/stgsja.f
diff options
context:
space:
mode:
authorjulie <julielangou@users.noreply.github.com>2011-11-01 22:02:31 +0000
committerjulie <julielangou@users.noreply.github.com>2011-11-01 22:02:31 +0000
commitd5c30c90bdecf38da1064e2ed52583634573e741 (patch)
tree480fc5ff31ee14b83116b6428aad79ea6e89362d /SRC/stgsja.f
parent04670a68760fa27333f8bcef8172f71adc6880ef (diff)
downloadlapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.gz
lapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.bz2
lapack-d5c30c90bdecf38da1064e2ed52583634573e741.zip
Never say never...
Diffstat (limited to 'SRC/stgsja.f')
-rw-r--r--SRC/stgsja.f9
1 files changed, 3 insertions, 6 deletions
diff --git a/SRC/stgsja.f b/SRC/stgsja.f
index 3dbd1b87..a53e4a82 100644
--- a/SRC/stgsja.f
+++ b/SRC/stgsja.f
@@ -185,8 +185,7 @@
*> \param[in] L
*> \verbatim
*> L is INTEGER
-*> \endverbatim
-*> \verbatim
+*>
*> K and L specify the subblocks in the input matrices A and B:
*> A23 = A(K+1:MIN(K+L,M),N-L+1:N) and B13 = B(1:L,N-L+1:N)
*> of A and B, whose GSVD is going to be computed by STGSJA.
@@ -229,8 +228,7 @@
*> \param[in] TOLB
*> \verbatim
*> TOLB is REAL
-*> \endverbatim
-*> \verbatim
+*>
*> TOLA and TOLB are the convergence criteria for the Jacobi-
*> Kogbetliantz iteration procedure. Generally, they are the
*> same as used in the preprocessing step, say
@@ -246,8 +244,7 @@
*> \param[out] BETA
*> \verbatim
*> BETA is REAL array, dimension (N)
-*> \endverbatim
-*> \verbatim
+*>
*> On exit, ALPHA and BETA contain the generalized singular
*> value pairs of A and B;
*> ALPHA(1:K) = 1,