\brief \b ESMF_DLASQ6 \htmlonly Download ESMF_DLASQ6 + dependencies [TGZ] [ZIP] [TXT] \endhtmlonly \par Purpose:
\verbatim
ESMF_DLASQ6 computes one dqd (shift equal to zero) transform in ping-pong form, with protection against underflow and overflow. \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 ( 4N ) Z holds the qd array. EMIN is stored in Z(4N0) to avoid an extra argument. \endverbatim
\param[in] PP \verbatim PP is INTEGER PP=0 for ping, PP=1 for pong. \endverbatim
\param[out] DMIN \verbatim DMIN is DOUBLE PRECISION Minimum value of d. \endverbatim
\param[out] DMIN1 \verbatim DMIN1 is DOUBLE PRECISION Minimum value of d, excluding D( N0 ). \endverbatim
\param[out] DMIN2 \verbatim DMIN2 is DOUBLE PRECISION Minimum value of d, excluding D( N0 ) and D( N0-1 ). \endverbatim
\param[out] DN \verbatim DN is DOUBLE PRECISION d(N0), the last value of d. \endverbatim
\param[out] DNM1 \verbatim DNM1 is DOUBLE PRECISION d(N0-1). \endverbatim
\param[out] DNM2 \verbatim DNM2 is DOUBLE PRECISION d(N0-2). \endverbatim \author Univ. of Tennessee \author Univ. of California Berkeley \author Univ. of Colorado Denver \author NAG Ltd. \date November 2011 \ingroup auxOTHERcomputational
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | I0 | ||||
| integer | :: | N0 | ||||
| double precision | :: | Z(*) | ||||
| integer | :: | PP | ||||
| double precision | :: | DMIN | ||||
| double precision | :: | DMIN1 | ||||
| double precision | :: | DMIN2 | ||||
| double precision | :: | DN | ||||
| double precision | :: | DNM1 | ||||
| double precision | :: | DNM2 |