Lines Matching defs:AA
134 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
356 $ NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z )
361 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
367 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
373 $ NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
432 $ BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX,
453 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
539 CALL DMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA,
597 AS( I ) = AA( I )
619 CALL DGEMV( TRANS, M, N, ALPHA, AA,
630 $ AA, LDA, XX, INCX, BETA,
649 ISAME( 5 ) = LDE( AS, AA, LAA )
666 ISAME( 7 ) = LDE( AS, AA, LAA )
773 $ BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX,
794 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
880 CALL DMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
924 AS( I ) = AA( I )
945 CALL DSYMV( UPLO, N, ALPHA, AA, LDA, XX,
954 CALL DSBMV( UPLO, N, K, ALPHA, AA, LDA,
962 CALL DSPMV( UPLO, N, ALPHA, AA, XX, INCX,
980 ISAME( 4 ) = LDE( AS, AA, LAA )
995 ISAME( 5 ) = LDE( AS, AA, LAA )
1009 ISAME( 4 ) = LDE( AS, AA, LAA )
1116 $ INCMAX, A, AA, AS, X, XX, XS, XT, G, Z )
1135 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ),
1231 $ NMAX, AA, LDA, K, K, RESET, TRANSL )
1258 AS( I ) = AA( I )
1275 CALL DTRMV( UPLO, TRANS, DIAG, N, AA, LDA,
1283 CALL DTBMV( UPLO, TRANS, DIAG, N, K, AA,
1291 CALL DTPMV( UPLO, TRANS, DIAG, N, AA, XX,
1301 CALL DTRSV( UPLO, TRANS, DIAG, N, AA, LDA,
1309 CALL DTBSV( UPLO, TRANS, DIAG, N, K, AA,
1317 CALL DTPSV( UPLO, TRANS, DIAG, N, AA, XX,
1337 ISAME( 5 ) = LDE( AS, AA, LAA )
1348 ISAME( 6 ) = LDE( AS, AA, LAA )
1358 ISAME( 5 ) = LDE( AS, AA, LAA )
1473 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1493 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1583 $ AA, LDA, M - 1, N - 1, RESET, TRANSL )
1593 AS( I ) = AA( I )
1612 CALL DGER( M, N, ALPHA, XX, INCX, YY, INCY, AA,
1633 ISAME( 8 ) = LDE( AS, AA, LAA )
1635 ISAME( 8 ) = LDERES( 'GE', ' ', M, N, AS, AA,
1674 $ AA( 1 + ( J - 1 )*LDA ), EPS,
1734 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
1754 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1839 $ AA, LDA, N - 1, N - 1, RESET, TRANSL )
1849 AS( I ) = AA( I )
1865 CALL DSYR( UPLO, N, ALPHA, XX, INCX, AA, LDA )
1872 CALL DSPR( UPLO, N, ALPHA, XX, INCX, AA )
1891 ISAME( 6 ) = LDE( AS, AA, LAA )
1894 $ AA, LDA )
1938 $ AA( JA ), EPS, ERR, FATAL, NOUT,
2012 $ INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,
2032 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2132 $ NMAX, AA, LDA, N - 1, N - 1, RESET,
2143 AS( I ) = AA( I )
2164 $ AA, LDA )
2172 $ AA )
2193 ISAME( 8 ) = LDE( AS, AA, LAA )
2196 $ AS, AA, LDA )
2250 $ YT, G, AA( JA ), EPS, ERR, FATAL,
2651 SUBROUTINE DMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL,
2656 * Stores the values in the array AA in the data structure required
2679 DOUBLE PRECISION A( NMAX, * ), AA( * )
2728 AA( I + ( J - 1 )*LDA ) = A( I, J )
2731 AA( I + ( J - 1 )*LDA ) = ROGUE
2737 AA( I1 + ( J - 1 )*LDA ) = ROGUE
2740 AA( I2 + ( J - 1 )*LDA ) = A( I2 + J - KU - 1, J )
2743 AA( I3 + ( J - 1 )*LDA ) = ROGUE
2764 AA( I + ( J - 1 )*LDA ) = ROGUE
2767 AA( I + ( J - 1 )*LDA ) = A( I, J )
2770 AA( I + ( J - 1 )*LDA ) = ROGUE
2793 AA( I + ( J - 1 )*LDA ) = ROGUE
2796 AA( I + ( J - 1 )*LDA ) = A( I + J - KK, J )
2799 AA( I + ( J - 1 )*LDA ) = ROGUE
2814 AA( IOFF ) = A( I, J )
2817 $ AA( IOFF ) = ROGUE
2974 LOGICAL FUNCTION LDERES( TYPE, UPLO, M, N, AA, AS, LDA )
2991 DOUBLE PRECISION AA( LDA, * ), AS( LDA, * )
3000 IF( AA( I, J ).NE.AS( I, J ) )
3014 IF( AA( I, J ).NE.AS( I, J ) )
3018 IF( AA( I, J ).NE.AS( I, J ) )
