Lines Matching refs:TRANSB
62 CHARACTER*1 TRANSA, TRANSB variable
227 TRANSB = 'N'
228 CALL SMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
233 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
236 TRANSB = 'T'
237 CALL SMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
242 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
254 TRANSB = 'N'
255 CALL SMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
260 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
263 TRANSB = 'T'
264 CALL SMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
269 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
452 CHARACTER*1 TRANAS, TRANBS, TRANSA, TRANSB local
521 TRANSB = ICH( ICB: ICB )
522 TRANB = TRANSB.EQ.'T'.OR.TRANSB.EQ.'C'
562 TRANBS = TRANSB
585 $ TRANSA, TRANSB, M, N, K, ALPHA, LDA,
589 CALL CSGEMM( IORDER, TRANSA, TRANSB, M, N,
604 ISAME( 2 ) = TRANSB.EQ.TRANBS
640 CALL SMMCH( TRANSA, TRANSB, M, N, K,
678 CALL SPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB,
709 SUBROUTINE SPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, M, N, argument
713 CHARACTER*1 TRANSA, TRANSB local
724 IF (TRANSB.EQ.'N')THEN
726 ELSE IF (TRANSB.EQ.'T')THEN
2199 SUBROUTINE SMMCH( TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, argument
2220 CHARACTER*1 TRANSA, TRANSB local
2232 TRANB = TRANSB.EQ.'T'.OR.TRANSB.EQ.'C'