From 13acf3d65eb8df4cb8df221509bf0178396dcff1 Mon Sep 17 00:00:00 2001 From: julie Date: Fri, 30 Sep 2011 18:34:50 +0000 Subject: Comments fix to be able to generate the new layout and the corresponding Doxygen documentation --- SRC/dlaqr5.f | 18 ++++++++++++++---- 1 file changed, 14 insertions(+), 4 deletions(-) (limited to 'SRC/dlaqr5.f') diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index 0615eaf8..1560d8bf 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -18,9 +18,15 @@ $ Z( LDZ, * ) * .. * -* This auxiliary subroutine called by DLAQR0 performs a +* Purpose +* ======= +* +* DLAQR5, called by DLAQR0, performs a * single small-bulge multi-shift QR sweep. * +* Arguments +* ========= +* * WANTT (input) logical scalar * WANTT = .true. if the quasi-triangular Schur factor * is being computed. WANTT is set to .false. otherwise. @@ -47,6 +53,7 @@ * subroutine operates. * * KTOP (input) integer scalar +* * KBOT (input) integer scalar * These are the first and last rows and columns of an * isolated diagonal block upon which the QR sweep is to be @@ -60,6 +67,7 @@ * must be positive and even. * * SR (input/output) DOUBLE PRECISION array of size (NSHFTS) +* * SI (input/output) DOUBLE PRECISION array of size (NSHFTS) * SR contains the real parts and SI contains the imaginary * parts of the NSHFTS shifts of origin that define the @@ -77,6 +85,7 @@ * calling procedure. LDH.GE.MAX(1,N). * * ILOZ (input) INTEGER +* * IHIZ (input) INTEGER * Specify the rows of Z to which transformations must be * applied if WANTZ is .TRUE.. 1 .LE. ILOZ .LE. IHIZ .LE. N @@ -125,12 +134,13 @@ * LDWV is the leading dimension of WV as declared in the * in the calling subroutine. LDWV.GE.NV. * -* ================================================================ +* Further Details +* =============== +* * Based on contributions by * Karen Braman and Ralph Byers, Department of Mathematics, * University of Kansas, USA * -* ================================================================ * Reference: * * K. Braman, R. Byers and R. Mathias, The Multi-Shift QR @@ -138,7 +148,7 @@ * Level 3 Performance, SIAM Journal of Matrix Analysis, * volume 23, pages 929--947, 2002. * -* ================================================================ +* ================================================================ * .. Parameters .. DOUBLE PRECISION ZERO, ONE PARAMETER ( ZERO = 0.0d0, ONE = 1.0d0 ) -- cgit v1.2.3