Lines Matching refs:JJ
1764 INTEGER I, IA, IC, IN, INCX, INCXS, IX, J, JA, JJ, LAA, local
1933 JJ = 1
1936 JJ = J
1939 CALL CMVCH( 'N', LJ, 1, ALPHA, Z( JJ ), LJ, W,
1940 $ 1, ONE, A( JJ, J ), 1, YT, G,
2049 $ IY, J, JA, JJ, LAA, LDA, LDAS, LJ, LX, LY, N, local
2250 JJ = 1
2253 JJ = J
2256 CALL CMVCH( 'N', LJ, 2, ONE, Z( JJ, 1 ),
2257 $ NMAX, W, 1, ONE, A( JJ, J ), 1,
2712 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, JJ, KK local
2806 JJ = J + ( J - 1 )*LDA
2807 AA( JJ ) = CMPLX( REAL( AA( JJ ) ), RROGUE )
2839 JJ = KK + ( J - 1 )*LDA
2840 AA( JJ ) = CMPLX( REAL( AA( JJ ) ), RROGUE )