subroutine slasq5 (I0, N0, Z, PP, TAU, SIGMA, DMIN, DMIN1, DMIN2, DN, DNM1, DNM2, IEEE, EPS)
SLASQ5 computes one dqds transform in ping-pong form. Used by sbdsqr and sstegr.
SLASQ5 computes one dqds transform in ping-pong form. Used by sbdsqr and sstegr.
Purpose:
SLASQ5 computes one dqds transform in ping-pong form, one version for IEEE machines another for non IEEE machines.
Parameters:
I0 is INTEGER First index.
N0
N0 is INTEGER Last index.
Z
Z is REAL array, dimension ( 4*N ) Z holds the qd array. EMIN is stored in Z(4*N0) to avoid an extra argument.
PP
PP is INTEGER PP=0 for ping, PP=1 for pong.
TAU
TAU is REAL This is the shift.
SIGMA
SIGMA is REAL This is the accumulated shift up to this step.
DMIN
DMIN is REAL Minimum value of d.
DMIN1
DMIN1 is REAL Minimum value of d, excluding D( N0 ).
DMIN2
DMIN2 is REAL Minimum value of d, excluding D( N0 ) and D( N0-1 ).
DN
DN is REAL d(N0), the last value of d.
DNM1
DNM1 is REAL d(N0-1).
DNM2
DNM2 is REAL d(N0-2).
IEEE
IEEE is LOGICAL Flag for IEEE or non IEEE arithmetic.
EPS
EPS is REAL This is the value of epsilon used.
Author:
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
Definition at line 146 of file slasq5.f.
Generated automatically by Doxygen for LAPACK from the source code.