Lines Matching refs:DIAG
1089 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO, local
1161 DIAG = ICHD( ICD: ICD )
1168 CALL SMAKE( 'TR', UPLO, DIAG, NA, NA, A,
1184 DIAGS = DIAG
1202 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1207 $ DIAG, M, N, ALPHA, AA, LDA,
1212 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1217 $ DIAG, M, N, ALPHA, AA, LDA,
1234 ISAME( 4 ) = DIAGS.EQ.DIAG
1342 CALL SPRCN3( NTRA, NC, SNAME, IORDER, SIDE, UPLO, TRANSA, DIAG,
1371 $ DIAG, M, N, ALPHA, LDA, LDB) argument
1374 CHARACTER*1 SIDE, UPLO, TRANSA, DIAG local
1395 IF (DIAG.EQ.'N')THEN
2086 SUBROUTINE SMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET, argument
2112 CHARACTER*1 DIAG, UPLO local
2128 UNIT = TRI.AND.DIAG.EQ.'U'