strans - transpose and scale source matrix
SUBROUTINE STRANS(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER*1 PLACE INTEGER M, N REAL SCALE REAL SOURCE(*), DEST(*) SUBROUTINE STRANS_64(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER*1 PLACE INTEGER*8 M, N REAL SCALE REAL SOURCE(*), DEST(*) F95 INTERFACE SUBROUTINE TRANS(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER(LEN=1) :: PLACE INTEGER :: M, N REAL :: SCALE REAL, DIMENSION(:) :: SOURCE, DEST SUBROUTINE TRANS_64(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER(LEN=1) :: PLACE INTEGER(8) :: M, N REAL :: SCALE REAL, DIMENSION(:) :: SOURCE, DEST C INTERFACE #include <sunperf.h> void strans(char place, float scale, float *source, int m, int n, float *dest); void strans_64(char place, float scale, float *source, long m, long n, float *dest);
Oracle Solaris Studio Performance Library strans(3P) NAME strans - transpose and scale source matrix SYNOPSIS SUBROUTINE STRANS(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER*1 PLACE INTEGER M, N REAL SCALE REAL SOURCE(*), DEST(*) SUBROUTINE STRANS_64(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER*1 PLACE INTEGER*8 M, N REAL SCALE REAL SOURCE(*), DEST(*) F95 INTERFACE SUBROUTINE TRANS(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER(LEN=1) :: PLACE INTEGER :: M, N REAL :: SCALE REAL, DIMENSION(:) :: SOURCE, DEST SUBROUTINE TRANS_64(PLACE, SCALE, SOURCE, M, N, DEST) CHARACTER(LEN=1) :: PLACE INTEGER(8) :: M, N REAL :: SCALE REAL, DIMENSION(:) :: SOURCE, DEST C INTERFACE #include <sunperf.h> void strans(char place, float scale, float *source, int m, int n, float *dest); void strans_64(char place, float scale, float *source, long m, long n, float *dest); PURPOSE strans scales and transposes the source matrix of (M, N). The result matrix of (N, M) is written into SOURCE when PLACE = 'I' or 'i', and DEST when PLACE = 'O' or 'o'. PLACE = 'I' or 'i': SOURCE = SCALE * SOURCE' PLACE = 'O' or 'o': DEST = SCALE * SOURCE' ARGUMENTS PLACE (input) Type of transpose. 'I' or 'i' for in-place, 'O' or 'o' for out-of-place. SCALE (input) Scale factor on the SOURCE matrix. SOURCE (input/output) On entry, array of (M, N). On exit, array of (N, M) if in- place transpose; unchanged if out-of-place transpose. M (input) Number of rows in the SOURCE matrix on input. N (input) Number of columns in the SOURCE matrix on input. DEST (output) Scaled and transposed SOURCE matrix if out-of-place trans- pose. Not referenced if in-place transpose. 7 Nov 2015 strans(3P)