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 SMAKE( SNAME( 8: 9 ), UPLO, DIAG, N, N, A,
1335 DIAGS = DIAG
1356 CALL CSTRMV( IORDER, UPLO, TRANS, DIAG,
1364 CALL CSTBMV( IORDER, UPLO, TRANS, DIAG,
1372 CALL CSTPMV( IORDER, UPLO, TRANS, DIAG,
1382 CALL CSTRSV( IORDER, UPLO, TRANS, DIAG,
1390 CALL CSTBSV( IORDER, UPLO, TRANS, DIAG,
1398 CALL CSTPSV( IORDER, UPLO, TRANS, DIAG,
1415 ISAME( 3 ) = DIAG.EQ.DIAGS
2463 SUBROUTINE SMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL,
2488 CHARACTER*1 DIAG, UPLO
2506 UNIT = TRI.AND.DIAG.EQ.'U'
