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/dlahqr.f | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'SRC/dlahqr.f') diff --git a/SRC/dlahqr.f b/SRC/dlahqr.f index 469133e3..e782ece8 100644 --- a/SRC/dlahqr.f +++ b/SRC/dlahqr.f @@ -13,7 +13,7 @@ DOUBLE PRECISION H( LDH, * ), WI( * ), WR( * ), Z( LDZ, * ) * .. * -* Purpose +* Purpose * ======= * * DLAHQR is an auxiliary routine called by DHSEQR to update the @@ -21,8 +21,8 @@ * dealing with the Hessenberg submatrix in rows and columns ILO to * IHI. * -* Arguments -* ========= +* Arguments +* ========= * * WANTT (input) LOGICAL * = .TRUE. : the full Schur form T is required; @@ -36,6 +36,7 @@ * The order of the matrix H. N >= 0. * * ILO (input) INTEGER +* * IHI (input) INTEGER * It is assumed that H is already upper quasi-triangular in * rows and columns IHI+1:N, and that H(ILO,ILO-1) = 0 (unless @@ -57,6 +58,7 @@ * The leading dimension of the array H. LDH >= max(1,N). * * WR (output) DOUBLE PRECISION array, dimension (N) +* * WI (output) DOUBLE PRECISION array, dimension (N) * The real and imaginary parts, respectively, of the computed * eigenvalues ILO to IHI are stored in the corresponding @@ -70,6 +72,7 @@ * WI(i) = sqrt(H(i+1,i)*H(i,i+1)) and WI(i+1) = -WI(i). * * ILOZ (input) INTEGER +* * IHIZ (input) INTEGER * Specify the rows of Z to which transformations must be * applied if WANTZ is .TRUE.. @@ -110,8 +113,8 @@ * where U is the orthogonal matrix in (*) * (regardless of the value of WANTT.) * -* Further Details -* =============== +* Further Details +* =============== * * 02-96 Based on modifications by * David Day, Sandia National Laboratory, USA @@ -123,7 +126,7 @@ * (2) adopts the more conservative Ahues & Tisseur stopping * criterion (LAWN 122, 1997). * -* ========================================================= +* ========================================================= * * .. Parameters .. INTEGER ITMAX -- cgit v1.2.3