Lines Matching defs:AB
71 COMPLEX AA( NMAX*NMAX ), AB( NMAX, 2*NMAX ),
207 AB( I, J ) = MAX( I - J + 1, 0 )
209 AB( J, NMAX + 1 ) = J
210 AB( 1, NMAX + J ) = J
220 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
221 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
229 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
230 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
238 AB( J, NMAX + 1 ) = N - J + 1
239 AB( 1, NMAX + J ) = N - J + 1
247 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
248 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
256 CALL CMMCH( TRANSA, TRANSB, N, 1, N, ONE, AB, NMAX,
257 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
288 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
294 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
299 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
300 $ AA, AS, AB( 1, NMAX + 1 ), BB, BS, CT, G, C )
305 $ NMAX, AB, AA, AS, AB( 1, NMAX + 1 ), BB, BS, C,
311 $ NMAX, AB, AA, AS, BB, BS, C, CC, CS, CT, G, W )
1574 $ AB, AA, AS, BB, BS, C, CC, CS, CT, G, W )
1597 COMPLEX AA( NMAX*NMAX ), AB( 2*NMAX*NMAX ),
1675 CALL CMAKE( 'GE', ' ', ' ', MA, NA, AB, 2*NMAX, AA,
1678 CALL CMAKE( 'GE', ' ', ' ', MA, NA, AB, NMAX, AA, LDA,
1687 CALL CMAKE( 'GE', ' ', ' ', MA, NA, AB( K + 1 ),
1690 CALL CMAKE( 'GE', ' ', ' ', MA, NA, AB( K*NMAX + 1 ),
1831 W( I ) = ALPHA*AB( ( J - 1 )*2*
1835 $ AB( ( J - 1 )*2*
1839 $ AB( ( J - 1 )*2*
1844 $ ONE, AB( JJAB ), 2*NMAX, W,
1852 W( I ) = ALPHA*CONJG( AB( ( K +
1855 $ AB( ( I - 1 )*NMAX +
1858 W( I ) = ALPHA*AB( ( K + I - 1 )*
1861 $ AB( ( I - 1 )*NMAX +
1866 $ AB( JJ ), NMAX, W, 2*NMAX,
