PURPOSE
Premultiply a full incore matrix [F] by a group of vectors {X} and place the results in vectors {Y}, according to the FMS Parameter IACCUM{Y} = {Z} - {X}[F], IACCUM = -1, {Y} = {X}[F], IACCUM = 0, (default) {Y} = {Z} + {X}[F], IACCUM = +1,
SYNOPSIS
CALL RNDVMM (LUX, F, LUY, NUMX, NUMY, LUZ)
CALL CNDVMM (LUX, F, LUY, NUMX, NUMY, LUZ)
INPUT PARAMETERS
- LUX(25) = Integer array.
File attributes for the {X} vectors. - F(NUMX, NUMY) = Real array (RNDVMM).
F(NUMX, NUMY) = Complex array (CNDVMM).
Full incore matrix in standard FORTRAN format. - LUY(25) = Integer array.
File attributes for the file where the {Y} vectors are to be written. This parameter may be the same as LUX to overlay the {Y} vectors on the {X} vectors. - NUMX = Integer.
Number of {X} vectors. - NUMY = Integer.
Number of {Y} vectors. - LUZ(25) = Integer array.
File attributes for the {Z} vectors. This parameter is only used if the FMS Parameter IACCUM is set to a nonzero value. This parameter may be the same as LUY to accumulate the results in {Y}.
OUTPUT PARAMETERS:
None.FMS PARAMETERS:
The following FMS Parameters are especially important to this routine:| Parameter | Description |
|---|---|
| IACCUM | Product accumulation flag
= -1, {Y} = {Z} - {X}[F], = 0, {Y} = {X}[F], (default) = +1, {Y} = {Z} - {X}[F], |
| IPRMV | Vectors-matrix multiply print code |
DESCRIPTION:
This subroutine multiplies a full matrix [F] stored in memory by a group of vectors {X} stored on file LUX. The resulting vectors {Y} are written to file LUY, which may be the same as file LUX.The array [F] must be aligned on a natural address boundary.