VMS Help FORTRAN, Intrinsic Procedures, xDOTx  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  REAL*4      SDOT  (n, x, incx, y, incy)
  REAL*8      DDOT  (n, x, incx, y, incy)
  COMPLEX*8   CDOTC (n, x, incx, y, incy)
  COMPLEX*8   CDOTU (n, x, incx, y, incy)
  COMPLEX*16  ZDOTC (n, x, incx, y, incy)
  COMPLEX*16  ZDOTU (n, x, incx, y, incy)

  Functions that return the inner product of two arrays.  CDOTC and
  ZDOTC compute conjugated values while CDOTU and ZDOTU compute
  unconjugated values.

  These functions are part of the BLAS1 Basic Set, and are only
  available on VAX processors.

  Arguments

    n

    Integer number of elements in arrays "x" and "y" to be accessed.

    x

    Array containing the elements to be accessed or array reference
    to the first such element.  The data type is REAL*4 for SDOT,
    REAL*8 for DDOT, COMPLEX*8 for CDOTC and CDOTU, COMPLEX*16 for
    ZDOTC and ZDOTU.

    incx

    Integer index increment used in selecting which elements of array
    "x" are accessed.

    y

    Array containing the elements to be accessed or array reference
    to the first such element.  The data type is REAL*4 for SDOT,
    REAL*8 for DDOT, COMPLEX*8 for CDOTC and CDOTU, COMPLEX*16 for
    ZDOTC and ZDOTU.

    incy

    Integer index increment used in selecting which elements of array
    "y" are accessed.