Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0026/csum.doc
There are 2 other files named csum.doc in the archive. Click here to see a list.
SUBROUTINE CSUM
PURPOSE
SUM ELEMENTS OF EACH COLUMN TO FORM ROW VECTOR
USAGE
CALL CSUM(A,R,N,M,MS)
DESCRIPTION OF PARAMETERS
A - NAME OF INPUT MATRIX
R - NAME OF VECTOR OF LENGTH M
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 DOWN EACH COLUMN INTO A CORRESPONDING
ELEMENT OF OUTPUT ROW VECTOR R