SUBROUTINE GMTRA

PURPOSE
   TRANSPOSE A GENERAL MATRIX

USAGE
   CALL GMTRA(A,R,N,M)

DESCRIPTION OF PARAMETERS
   A - NAME OF MATRIX TO BE TRANSPOSED
   R - NAME OF RESULTANT MATRIX
   N - NUMBER OF ROWS OF A AND COLUMNS OF R
   M - NUMBER OF COLUMNS OF A AND ROWS OF R

REMARKS
   MATRIX R CANNOT BE IN THE SAME LOCATION AS MATRIX A
   MATRICES A AND R MUST BE STORED AS GENERAL MATRICES

SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
   NONE

METHOD
   TRANSPOSE N BY M MATRIX A TO FORM M BY N MATRIX R