SZERO/DZERO/IZERO/CZERO/ZZERO

Clear vector

Name

SZERO/DZERO/IZERO/CZERO/ZZERO

 

Clear vector

 

Purpose

These subprograms set all of the elements of a real, integer, or complex n-vector

 

x to zero. The vector can be stored in a one-dimensional array or in either a row

 

or a column of a two-dimensional array.

Usage

VECLIB:

 

 

INTEGER*4

n, incx

 

REAL*4

x(lenx)

 

CALL SZERO(n, x, incx)

 

INTEGER*4

n, incx

 

REAL*8

x(lenx)

 

CALL DZERO(n, x, incx)

 

INTEGER*4

n, incx, x(lenx)

 

CALL IZERO(n, x, incx)

 

INTEGER*4

n, incx

 

COMPLEX*8

x(lenx)

 

CALL CZERO(n, x, incx)

 

INTEGER*4

n, incx

 

COMPLEX*16

x(lenx)

CALL ZZERO(n, x, incx)

VECLIB8:

INTEGER*8

n, incx

REAL*4

x(lenx)

CALL SZERO(n, x, incx)

INTEGER*8

n, incx

REAL*8

x(lenx)

CALL DZERO(n, x, incx)

INTEGER*8

n, incx, x(lenx)

CALL IZERO(n, x, incx)

INTEGER*8

n, incx

COMPLEX*8

x(lenx)

CALL CZERO(n, x, incx)

150HP MLIB User’s Guide