Lines Matching defs:DIAG
1208 CHARACTER*1 DIAG, DIAGS, TRANS, TRANSS, UPLO, UPLOS
1301 DIAG = ICHD( ICD: ICD )
1302 IF (DIAG.EQ.'N')THEN
1311 CALL DMAKE( SNAME( 8: 9 ), UPLO, DIAG, N, N, A,
1335 DIAGS = DIAG
1356 CALL CDTRMV( IORDER, UPLO, TRANS, DIAG,
1364 CALL CDTBMV( IORDER, UPLO, TRANS, DIAG,
1372 CALL CDTPMV( IORDER, UPLO, TRANS, DIAG,
1382 CALL CDTRSV( IORDER, UPLO, TRANS, DIAG,
1390 CALL CDTBSV( IORDER, UPLO, TRANS, DIAG,
1398 CALL CDTPSV( IORDER, UPLO, TRANS, DIAG,
1415 ISAME( 3 ) = DIAG.EQ.DIAGS
2463 SUBROUTINE DMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL,
2488 CHARACTER*1 DIAG, UPLO
2506 UNIT = TRI.AND.DIAG.EQ.'U'