Lines Matching defs:TRANS
87 CHARACTER*1 TRANS
268 TRANS = 'N'
269 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, 1, ZERO, Y, 1, YT, G,
273 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
276 TRANS = 'T'
277 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X, -1, ZERO, Y, -1, YT, G,
281 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
385 $ 'ATED WRONGLY.', /' CMVCH WAS CALLED WITH TRANS = ', A1,
438 CHARACTER*1 TRANS, TRANSS
514 TRANS = ICH( IC: IC )
515 TRAN = TRANS.EQ.'T'.OR.TRANS.EQ.'C'
561 TRANSS = TRANS
586 $ TRANS, M, N, ALPHA, LDA, INCX, BETA,
590 CALL CGEMV( TRANS, M, N, ALPHA, AA,
596 $ TRANS, M, N, KL, KU, ALPHA, LDA,
600 CALL CGBMV( TRANS, M, N, KL, KU, ALPHA,
615 ISAME( 1 ) = TRANS.EQ.TRANSS
670 CALL CMVCH( TRANS, M, N, ALPHA, A,
713 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
716 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
1126 CHARACTER*1 DIAG, DIAGS, TRANS, TRANSS, UPLO, UPLOS
1203 TRANS = ICHT( ICT: ICT )
1234 TRANSS = TRANS
1253 $ UPLO, TRANS, DIAG, N, LDA, INCX
1256 CALL CTRMV( UPLO, TRANS, DIAG, N, AA, LDA,
1261 $ UPLO, TRANS, DIAG, N, K, LDA, INCX
1264 CALL CTBMV( UPLO, TRANS, DIAG, N, K, AA,
1269 $ UPLO, TRANS, DIAG, N, INCX
1272 CALL CTPMV( UPLO, TRANS, DIAG, N, AA, XX,
1279 $ UPLO, TRANS, DIAG, N, LDA, INCX
1282 CALL CTRSV( UPLO, TRANS, DIAG, N, AA, LDA,
1287 $ UPLO, TRANS, DIAG, N, K, LDA, INCX
1290 CALL CTBSV( UPLO, TRANS, DIAG, N, K, AA,
1295 $ UPLO, TRANS, DIAG, N, INCX
1298 CALL CTPSV( UPLO, TRANS, DIAG, N, AA, XX,
1314 ISAME( 2 ) = TRANS.EQ.TRANSS
1368 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, X,
1382 CALL CMVCH( TRANS, N, N, ONE, A, NMAX, Z,
1420 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1423 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1426 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
2870 SUBROUTINE CMVCH( TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y,
2891 CHARACTER*1 TRANS
2907 TRAN = TRANS.EQ.'T'
2908 CTRAN = TRANS.EQ.'C'
