HP MLIB User's Guide Vol. 1 7th Ed.

Chapter 2 Basic Vector Operations 47

Count selected vector elements ISCTxx/IDCTxx/IICTxx/ICCTxx/IZCTxx

INTEGER*4 i, ICCTxx, n, incx

COMPLEX*8 a, x(lenx)

i = ICCTxx(n, x, incx, a)

INTEGER*4 i, IZCTxx, n, incx

COMPLEX*16 a, x(lenx)

i = IZCTxx(n, x, incx, a)

VECLIB8:

INTEGER*8 i, ISCTxx, n, incx

REAL*4 a, x(lenx)

i = ISCTxx(n, x, incx, a)

INTEGER*8 i, IDCTxx, n, incx

REAL*8 a, x(lenx)

i = IDCTxx(n, x, incx, a)

INTEGER*8 i, IICTxx, n, incx, a, x(lenx)

i = IICTxx(n, x, incx, a)

INTEGER*8 i, ICCTxx, n, incx

COMPLEX*8 a, x(lenx)

i = ICCTxx(n, x, incx, a)

INTEGER*8 i, IZCTxx, n, incx

COMPLEX*16 a, x(lenx)

i = IZCTxx(n, x, incx, a)

Input n Number of elements of vector x to be compared to a. If

n ≤ 0, the subprograms do not reference x.

x Array of length lenx = (n−1)×|incx|+1 containing the

n-vector x.

incx Increment for the array x. x is stored forward in array x

with increment |incx|; that is, x

is stored in

x((i−1)×|incx|+1).

Use incx = 1 if the vector x is stored contiguously in

array x; that is, if x

is stored in x(i). Refer to “BLAS

Indexing Conventions” in the introduction to this

chapter.

a The scalar a.