Lines Matching defs:AA
66 DOUBLE PRECISION AA( NMAX*NMAX ), AB( NMAX, 2*NMAX ),
297 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
303 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
311 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
317 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
325 $ AA, AS, AB( 1, NMAX + 1 ), BB, BS, CT, G, C,
331 $ AA, AS, AB( 1, NMAX + 1 ), BB, BS, CT, G, C,
339 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
345 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
353 $ NMAX, AB, AA, AS, BB, BS, C, CC, CS, CT, G, W,
359 $ NMAX, AB, AA, AS, BB, BS, C, CC, CS, CT, G, W,
419 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G, IORDER)
440 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
517 CALL DMAKE( 'GE', ' ', ' ', MA, NA, A, NMAX, AA, LDA,
568 AS( I ) = AA( I )
590 $ K, ALPHA, AA, LDA, BB, LDB,
609 ISAME( 7 ) = LDE( AS, AA, LAA )
743 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G, IORDER)
764 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
853 CALL DMAKE( 'SY', UPLO, ' ', NA, NA, A, NMAX, AA, LDA,
878 AS( I ) = AA( I )
900 $ AA, LDA, BB, LDB, BETA, CC, LDC )
917 ISAME( 6 ) = LDE( AS, AA, LAA )
1052 $ FATAL, NIDIM, IDIM, NALF, ALF, NMAX, A, AA, AS,
1074 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1165 $ NMAX, AA, LDA, RESET, ZERO )
1185 AS( I ) = AA( I )
1203 $ DIAG, M, N, ALPHA, AA, LDA,
1213 $ DIAG, M, N, ALPHA, AA, LDA,
1234 ISAME( 8 ) = LDE( AS, AA, LAA )
1411 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G, IORDER)
1432 DOUBLE PRECISION A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1506 CALL DMAKE( 'GE', ' ', ' ', MA, NA, A, NMAX, AA, LDA,
1534 AS( I ) = AA( I )
1551 $ AA, LDA, BETA, CC, LDC )
1568 ISAME( 6 ) = LDE( AS, AA, LAA )
1727 $ AB, AA, AS, BB, BS, C, CC, CS, CT, G, W,
1749 DOUBLE PRECISION AA( NMAX*NMAX ), AB( 2*NMAX*NMAX ),
1824 CALL DMAKE( 'GE', ' ', ' ', MA, NA, AB, 2*NMAX, AA,
1827 CALL DMAKE( 'GE', ' ', ' ', MA, NA, AB, NMAX, AA, LDA,
1868 AS( I ) = AA( I )
1889 $ ALPHA, AA, LDA, BB, LDB, BETA,
1907 ISAME( 6 ) = LDE( AS, AA, LAA )
2082 SUBROUTINE DMAKE( TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET,
2086 * Stores the values in the array AA in the data structure required
2111 DOUBLE PRECISION A( NMAX, * ), AA( * )
2156 AA( I + ( J - 1 )*LDA ) = A( I, J )
2159 AA( I + ( J - 1 )*LDA ) = ROGUE
2180 AA( I + ( J - 1 )*LDA ) = ROGUE
2183 AA( I + ( J - 1 )*LDA ) = A( I, J )
2186 AA( I + ( J - 1 )*LDA ) = ROGUE
2349 LOGICAL FUNCTION LDERES( TYPE, UPLO, M, N, AA, AS, LDA )
2368 DOUBLE PRECISION AA( LDA, * ), AS( LDA, * )
2377 IF( AA( I, J ).NE.AS( I, J ) )
2391 IF( AA( I, J ).NE.AS( I, J ) )
2395 IF( AA( I, J ).NE.AS( I, J ) )