dscal Subroutine

public subroutine dscal(N, Da, Dx, Incx)

NAME

dscal(3f) - [M_odepack::matrix] Multiply a vector by a constant.

SYNOPSIS

subroutine dscal(N,Da,Dx,Incx)
integer , intent(in) :: N
real(kind=dp) , intent(in) :: Da
real(kind=dp) , intent(inout) , dimension(*) :: Dx
integer , intent(in) :: Incx

DESCRIPTION

Replace double precision DX by double precision DADX. For I = 0 to N-1, replace DX(IX+IINCX) with DA * DX(IX+IINCX), where IX = 1 if INCX .GE. 0, else IX = 1+(1-N)INCX.

OPTIONS

N
number of elements in input vector(s)
DA
double precision scale factor
DX
double precision vector with N elements
INCX
storage spacing between elements of DX

RETURNS

DX
double precision result (unchanged if N.LE.0)

REFERENCES

B L A S Subprogram

C. L. Lawson, R. J. Hanson, D. R. Kincaid and F. T. Krogh, Basic linear algebra subprograms for Fortran usage, Algorithm No. 539, Transactions on Mathematical Software 5, 3 (September 1979), pp. 308-323.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: N
real(kind=dp), intent(in) :: Da
real(kind=dp), intent(inout) :: Dx(*)
integer, intent(in) :: Incx

Called by

proc~~dscal~~CalledByGraph proc~dscal M_odepack::dscal proc~dainvg~2 M_odepack::dainvg proc~dainvg~2->proc~dscal proc~dgefa~2 M_odepack::dgefa proc~dainvg~2->proc~dgefa~2 proc~dgefa~2->proc~dscal proc~dprepji~2 M_odepack::dprepji proc~dprepji~2->proc~dscal proc~dprepji~2->proc~dgefa~2 proc~dprepj~2 M_odepack::dprepj proc~dprepj~2->proc~dscal proc~dprepj~2->proc~dgefa~2 proc~dprja~2 M_odepack::dprja proc~dprja~2->proc~dscal proc~dprja~2->proc~dgefa~2 proc~dstodpk M_odepack::dstodpk proc~dstodpk->proc~dscal proc~dstoka~2 M_odepack::dstoka proc~dstoka~2->proc~dscal proc~daigbt~2 M_odepack::daigbt proc~daigbt~2->proc~dgefa~2 proc~dlsodi~2 M_odepack::dlsodi proc~dlsodi~2->proc~dainvg~2 proc~dlsodkr~2 M_odepack::dlsodkr proc~dlsodkr~2->proc~dstoka~2 proc~dlsodpk~2 M_odepack::dlsodpk proc~dlsodpk~2->proc~dstodpk proc~dpjibt~2 M_odepack::dpjibt proc~dpjibt~2->proc~dgefa~2 proc~dlsoibt~2 M_odepack::dlsoibt proc~dlsoibt~2->proc~daigbt~2