Lines Matching defs:CC
70 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
223 CC( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
225 * CC holds the exact result. On exit from DMMCH CT holds
230 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
232 SAME = LDE( CC, CT, N )
239 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
241 SAME = LDE( CC, CT, N )
251 CC( N - J + 1 ) = J*( ( J + 1 )*J )/2 -
257 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
259 SAME = LDE( CC, CT, N )
266 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
268 SAME = LDE( CC, CT, N )
298 $ CC, CS, CT, G, 0 )
304 $ CC, CS, CT, G, 1 )
312 $ CC, CS, CT, G, 0 )
318 $ CC, CS, CT, G, 1 )
340 $ CC, CS, CT, G, 0 )
346 $ CC, CS, CT, G, 1 )
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)
443 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
554 $ CC, LDC, RESET, ZERO )
577 CS( I ) = CC( I )
591 $ BETA, CC, LDC )
615 ISAME( 12 ) = LDE( CS, CC, LCC )
618 $ CC, LDC )
642 $ C, NMAX, CT, G, CC, LDC, EPS,
743 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G, IORDER)
767 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
864 CALL DMAKE( 'GE', ' ', ' ', M, N, C, NMAX, CC,
887 CS( I ) = CC( I )
900 $ AA, LDA, BB, LDB, BETA, CC, LDC )
923 ISAME( 11 ) = LDE( CS, CC, LCC )
926 $ CC, LDC )
951 $ CT, G, CC, LDC, EPS, ERR,
956 $ CT, G, CC, LDC, EPS, ERR,
1411 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G, IORDER)
1435 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
1521 CALL DMAKE( 'SY', UPLO, ' ', N, N, C, NMAX, CC,
1539 CS( I ) = CC( I )
1551 $ AA, LDA, BETA, CC, LDC )
1572 ISAME( 9 ) = LDE( CS, CC, LCC )
1575 $ CC, LDC )
1611 $ CC( JC ), LDC, EPS, ERR,
1618 $ CC( JC ), LDC, EPS, ERR,
1727 $ AB, AA, AS, BB, BS, C, CC, CS, CT, G, W,
1752 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
1855 CALL DMAKE( 'SY', UPLO, ' ', N, N, C, NMAX, CC,
1877 CS( I ) = CC( I )
1890 $ CC, LDC )
1913 ISAME( 11 ) = LDE( CS, CC, LCC )
1916 $ CC, LDC )
1959 $ CC( JC ), LDC, EPS, ERR,
1971 $ NMAX, CT, G, CC( JC ), LDC,
2196 $ BETA, C, LDC, CT, G, CC, LDCC, EPS, ERR, FATAL,
2219 $ CC( LDCC, * ), CT( * ), G( * )
2278 ERRI = ABS( CT( I ) - CC( I, J ) )/EPS
2297 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
2299 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
