\brief \b ESMF_DLASCL \htmlonly Download ESMF_DLASCL + dependencies [TGZ] [ZIP] [TXT] \endhtmlonly \par Purpose:
\verbatim
ESMF_DLASCL multiplies the M by N real matrix A by the real scalar CTO/CFROM. This is done without over/underflow as long as the final result CTOA(I,J)/CFROM does not over/underflow. TYPE specifies that A may be full, upper triangular, lower triangular, upper Hessenberg, or banded. \endverbatim \param[in] TYPE \verbatim TYPE is CHARACTER1 TYPE indices the storage type of the input matrix. = ‘G’: A is a full matrix. = ‘L’: A is a lower triangular matrix. = ‘U’: A is an upper triangular matrix. = ‘H’: A is an upper Hessenberg matrix. = ‘B’: A is a symmetric band matrix with lower bandwidth KL and upper bandwidth KU and with the only the lower half stored. = ‘Q’: A is a symmetric band matrix with lower bandwidth KL and upper bandwidth KU and with the only the upper half stored. = ‘Z’: A is a band matrix with lower bandwidth KL and upper bandwidth KU. See DGBTRF for storage details. \endverbatim
\param[in] KL \verbatim KL is INTEGER The lower bandwidth of A. Referenced only if TYPE = ‘B’, ‘Q’ or ‘Z’. \endverbatim
\param[in] KU \verbatim KU is INTEGER The upper bandwidth of A. Referenced only if TYPE = ‘B’, ‘Q’ or ‘Z’. \endverbatim
\param[in] CFROM \verbatim CFROM is DOUBLE PRECISION \endverbatim
\param[in] CTO \verbatim CTO is DOUBLE PRECISION
The matrix A is multiplied by CTO/CFROM. A(I,J) is computed
without over/underflow if the final result CTO*A(I,J)/CFROM
can be represented without over/underflow. CFROM must be
nonzero.
\endverbatim
\param[in] M \verbatim M is INTEGER The number of rows of the matrix A. M >= 0. \endverbatim
\param[in] N \verbatim N is INTEGER The number of columns of the matrix A. N >= 0. \endverbatim
\param[in,out] A \verbatim A is DOUBLE PRECISION array, dimension (LDA,N) The matrix to be multiplied by CTO/CFROM. See TYPE for the storage type. \endverbatim
\param[in] LDA \verbatim LDA is INTEGER The leading dimension of the array A. LDA >= max(1,M). \endverbatim
\param[out] INFO \verbatim INFO is INTEGER 0 - successful exit <0 - if INFO = -i, the i-th argument had an illegal value. \endverbatim \author Univ. of Tennessee \author Univ. of California Berkeley \author Univ. of Colorado Denver \author NAG Ltd. \date November 2011 \ingroup auxOTHERauxiliary
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=1) | :: | TYPE | ||||
integer | :: | KL | ||||
integer | :: | KU | ||||
double precision | :: | CFROM | ||||
double precision | :: | CTO | ||||
integer | :: | M | ||||
integer | :: | N | ||||
double precision | :: | A(LDA,*) | ||||
integer | :: | LDA | ||||
integer | :: | INFO |