Lines Matching defs:DIAG
1085 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO,
1157 DIAG = ICHD( ICD: ICD )
1164 CALL DMAKE( 'TR', UPLO, DIAG, NA, NA, A,
1180 DIAGS = DIAG
1198 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1203 $ DIAG, M, N, ALPHA, AA, LDA,
1208 $ SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA,
1213 $ DIAG, M, N, ALPHA, AA, LDA,
1230 ISAME( 4 ) = DIAGS.EQ.DIAG
1338 DIAG,
1367 $ DIAG, M, N, ALPHA, LDA, LDB)
1370 CHARACTER*1 SIDE, UPLO, TRANSA, DIAG
1391 IF (DIAG.EQ.'N')THEN
2082 SUBROUTINE DMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET,
2108 CHARACTER*1 DIAG, UPLO
2124 UNIT = TRI.AND.DIAG.EQ.'U'