Google
 

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

PURPOSE
   INTERCHANGE TWO COLUMNS OF A MATRIX

USAGE
   CALL CINT(A,N,LA,LB)

DESCRIPTION OF PARAMETERS
   A  - NAME OF MATRIX
   N  - NUMBER OF ROWS IN A
   LA - COLUMN TO BE INTERCHANGED WITH COLUMN LB
   LB - COLUMN TO BE INTERCHANGED WITH COLUMN LA

REMARKS
   MATRIX A MUST BE A GENERAL MATRIX

SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
   NONE

METHOD
   EACH ELEMENT OF COLUMN LA IS INTERCHANGED WITH CORRESPONDING
   ELEMENT OF COLUMN LB