\brief \b ESMF_DLASQ4 \htmlonly Download ESMF_DLASQ4 + dependencies [TGZ] [ZIP] [TXT] \endhtmlonly \par Purpose:
\verbatim
ESMF_DLASQ4 computes an approximation TAU to the smallest eigenvalue using values of d from the previous transform. \endverbatim \param[in] I0 \verbatim I0 is INTEGER First index. \endverbatim
\param[in] N0 \verbatim N0 is INTEGER Last index. \endverbatim
\param[in] Z \verbatim Z is DOUBLE PRECISION array, dimension ( 4*N ) Z holds the qd array. \endverbatim
\param[in] PP \verbatim PP is INTEGER PP=0 for ping, PP=1 for pong. \endverbatim
\param[in] N0IN \verbatim N0IN is INTEGER The value of N0 at start of EIGTEST. \endverbatim
\param[in] DMIN \verbatim DMIN is DOUBLE PRECISION Minimum value of d. \endverbatim
\param[in] DMIN1 \verbatim DMIN1 is DOUBLE PRECISION Minimum value of d, excluding D( N0 ). \endverbatim
\param[in] DMIN2 \verbatim DMIN2 is DOUBLE PRECISION Minimum value of d, excluding D( N0 ) and D( N0-1 ). \endverbatim
\param[in] DN \verbatim DN is DOUBLE PRECISION d(N) \endverbatim
\param[in] DN1 \verbatim DN1 is DOUBLE PRECISION d(N-1) \endverbatim
\param[in] DN2 \verbatim DN2 is DOUBLE PRECISION d(N-2) \endverbatim
\param[out] TAU \verbatim TAU is DOUBLE PRECISION This is the shift. \endverbatim
\param[out] TTYPE \verbatim TTYPE is INTEGER Shift type. \endverbatim
\param[in,out] G \verbatim G is REAL G is passed as an argument in order to save its value between calls to ESMF_DLASQ4. \endverbatim \author Univ. of Tennessee \author Univ. of California Berkeley \author Univ. of Colorado Denver \author NAG Ltd. \date November 2011 \ingroup auxOTHERcomputational \par Further Details:
\verbatim
CNST1 = 9/16 \endverbatim
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | I0 | ||||
integer | :: | N0 | ||||
double precision | :: | Z(*) | ||||
integer | :: | PP | ||||
integer | :: | N0IN | ||||
double precision | :: | DMIN | ||||
double precision | :: | DMIN1 | ||||
double precision | :: | DMIN2 | ||||
double precision | :: | DN | ||||
double precision | :: | DN1 | ||||
double precision | :: | DN2 | ||||
double precision | :: | TAU | ||||
integer | :: | TTYPE | ||||
double precision | :: | G |