Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0026/rsum.doc
There are 2 other files named rsum.doc in the archive. Click here to see a list.
SUBROUTINE RSUM
PURPOSE
SUM ELEMENTS OF EACH ROW TO FORM COLUMN VECTOR
USAGE
CALL RSUM (A,R,N,M,MS)
DESCRIPTION OF PARAMETERS
A - NAME OF INPUT MATRIX
R - NAME OF VECTOR OF LENGTH N
N - NUMBER OF ROWS IN A
M - NUMBER OF COLUMNS IN A
MS - ONE DIGIT NUMBER FOR STORAGE MODE OF MATRIX A
0 - GENERAL
1 - SYMMETRIC
2 - DIAGONAL
REMARKS
VECTOR R CANNOT BE IN THE SAME LOCATION AS MATRIX A
UNLESS A IS GENERAL
SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
LOC
METHOD
ELEMENTS ARE SUMMED ACROSS EACH ROW INTO A CORRESPONDING
ELEMENT OF OUTPUT COLUMN VECTOR R