Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap2_198111 - decus/20-0026/mstr.doc
There are 2 other files named mstr.doc in the archive. Click here to see a list.
SUBROUTINE MSTR

PURPOSE
   CHANGE STORAGE MODE OF A MATRIX

USAGE
   CALL MSTR(A,R,N,MSA,MSR)

DESCRIPTION OF PARAMETERS
   A - NAME OF INPUT MATRIX
   R - NAME OF OUTPUT MATRIX
   N - NUMBER OF ROWS AND COLUMNS IN A AND R
   MSA - ONE DIGIT NUMBER FOR STORAGE MODE OF MATRIX A
	  0 - GENERAL
	  1 - SYMMETRIC
	  2 - DIAGONAL
   MSR - SAME AS MSA EXCEPT FOR MATRIX R

REMARKS
   MATRIX R CANNOT BE IN THE SAME LOCATION AS MATRIX A
   MATRIX A MUST BE A SQUARE MATRIX

SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
   LOC

METHOD
   MATRIX A IS RESTRUCTURED TO FORM MATRIX R.
    MSA MSR
     0	 0  MATRIX A IS MOVED TO MATRIX R
     0	 1  THE UPPER TRIANGLE ELEMENTS OF A GENERAL MATRIX
	    ARE USED TO FORM A SYMMETRIC MATRIX
     0	 2  THE DIAGONAL ELEMENTS OF A GENERAL MATRIX ARE USED
	    TO FORM A DIAGONAL MATRIX
     1	 0  A SYMMETRIC MATRIX IS EXPANDED TO FORM A GENERAL
	    MATRIX
     1	 1  MATRIX A IS MOVED TO MATRIX R
     1	 2  THE DIAGONAL ELEMENTS OF A SYMMETRIC MATRIX ARE
	    USED TO FORM A DIAGONAL MATRIX
     2	 0  A DIAGONAL MATRIX IS EXPANDED BY INSERTING MISSING
	    ZERO ELEMENTS TO FORM A GENERAL MATRIX
     2	 1  A DIAGONAL MATRIX IS EXPANDED BY INSERTING MISSING
	    ZERO ELEMENTS TO FORM A SYMMETRIC MATRIX
     2	 2  MATRIX A IS MOVED TO MATRIX R