Lines Matching refs:TRANSA
113 CHARACTER*1 TRANSA, TRANSB variable
257 TRANSA = 'N'
259 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
264 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
268 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
273 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
284 TRANSA = 'C'
286 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
291 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
295 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
300 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
444 CHARACTER*1 TRANAS, TRANBS, TRANSA, TRANSB local
488 TRANSA = ICH( ICA: ICA )
489 TRANA = TRANSA.EQ.'T'.OR.TRANSA.EQ.'C'
553 TRANAS = TRANSA
577 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA, LDB,
581 CALL CGEMM( TRANSA, TRANSB, M, N, K, ALPHA,
594 ISAME( 1 ) = TRANSA.EQ.TRANAS
631 CALL CMMCH( TRANSA, TRANSB, M, N, K,
667 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
1007 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO, local
1076 TRANSA = ICHT( ICT: ICT )
1101 TRANAS = TRANSA
1120 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1124 CALL CTRMM( SIDE, UPLO, TRANSA, DIAG, M,
1129 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1133 CALL CTRSM( SIDE, UPLO, TRANSA, DIAG, M,
1149 ISAME( 3 ) = TRANAS.EQ.TRANSA
1184 CALL CMMCH( TRANSA, 'N', M, N, M,
1190 CALL CMMCH( 'N', TRANSA, M, N, N,
1211 CALL CMMCH( TRANSA, 'N', M, N, M,
1217 CALL CMMCH( 'N', TRANSA, M, N, N,
1256 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
3053 SUBROUTINE CMMCH( TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, argument
3077 CHARACTER*1 TRANSA, TRANSB local
3094 TRANA = TRANSA.EQ.'T'.OR.TRANSA.EQ.'C'
3096 CTRANA = TRANSA.EQ.'C'