DSCALRun Method

***PURPOSE Multiply a vector by a constant. ***CATEGORY D1A6 ***TYPE DOUBLE PRECISION (SSCAL-S, DSCAL-D, CSCAL-C) ***KEYWORDS BLAS, LINEAR ALGEBRA, SCALE, VECTOR ***AUTHOR Lawson, C. L., (JPL) Hanson, R. J., (SNLA) Kincaid, D. R., (U. of Texas) Krogh, F. T., (JPL) ***DESCRIPTION B L A S Subprogram Description of Parameters --Input-- 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 --Output-- DX double precision result (unchanged if N.LE.0) Replace double precision DX by double precision DA*DX. For I = 0 to N-1, replace DX(IX+I*INCX) with DA * DX(IX+I*INCX), where IX = 1 if INCX .GE. 0, else IX = 1+(1-N)*INCX. ***REFERENCES 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. ***ROUTINES CALLED (NONE) ***REVISION HISTORY (YYMMDD) 791001 DATE WRITTEN 890831 Modified array declarations. (WRB) 890831 REVISION DATE from Version 3.2 891214 Prologue converted to Version 4.0 format. (BAB) 900821 Modified to correct problem with a negative increment. (WRB) 920501 Reformatted the REFERENCES section. (WRB) ***END PROLOGUE DSCAL ***FIRST EXECUTABLE STATEMENT DSCAL

public void Run(
	int N,
	double DA,
	ref double[] DX,
	int offset_dx,
	int INCX
)

Public Sub Run ( 
	N As Integer,
	DA As Double,
	ByRef DX As Double(),
	offset_dx As Integer,
	INCX As Integer
)