Lines Matching defs:CC
76 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
215 CC( J ) = J*( ( J + 1 )*J )/2 - ( ( J + 1 )*J*( J - 1 ) )/3
217 * CC holds the exact result. On exit from ZMMCH CT holds
222 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
224 SAME = LZE( CC, CT, N )
231 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
233 SAME = LZE( CC, CT, N )
243 CC( N - J + 1 ) = J*( ( J + 1 )*J )/2 -
249 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
251 SAME = LZE( CC, CT, N )
258 $ AB( 1, NMAX + 1 ), NMAX, ZERO, C, NMAX, CT, G, CC,
260 SAME = LZE( CC, CT, N )
290 $ CC, CS, CT, G )
296 $ CC, CS, CT, G )
307 $ CC, CS, CT, G )
312 $ NMAX, AB, AA, AS, BB, BS, C, CC, CS, CT, G, W )
369 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G )
395 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
508 $ CC, LDC, RESET, ZERO )
531 CS( I ) = CC( I )
544 $ AA, LDA, BB, LDB, BETA, CC, LDC )
568 ISAME( 12 ) = LZE( CS, CC, LCC )
571 $ CC, LDC )
595 $ C, NMAX, CT, G, CC, LDC, EPS,
654 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G )
680 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
779 CALL ZMAKE( 'GE', ' ', ' ', M, N, C, NMAX, CC,
802 CS( I ) = CC( I )
815 $ BB, LDB, BETA, CC, LDC )
818 $ BB, LDB, BETA, CC, LDC )
842 ISAME( 11 ) = LZE( CS, CC, LCC )
845 $ CC, LDC )
870 $ CT, G, CC, LDC, EPS, ERR,
875 $ CT, G, CC, LDC, EPS, ERR,
1244 $ A, AA, AS, B, BB, BS, C, CC, CS, CT, G )
1270 $ C( NMAX, NMAX ), CC( NMAX*NMAX ),
1372 $ NMAX, CC, LDC, RESET, ZERO )
1397 CS( I ) = CC( I )
1410 $ LDA, RBETA, CC, LDC )
1418 $ LDA, BETA, CC, LDC )
1448 ISAME( 9 ) = LZE( CS, CC, LCC )
1451 $ N, CS, CC, LDC )
1492 $ CC( JC ), LDC, EPS, ERR,
1499 $ CC( JC ), LDC, EPS, ERR,
1576 $ AB, AA, AS, BB, BS, C, CC, CS, CT, G, W )
1603 $ CC( NMAX*NMAX ), CS( NMAX*NMAX ), CT( NMAX ),
1718 $ NMAX, CC, LDC, RESET, ZERO )
1743 CS( I ) = CC( I )
1756 $ LDA, BB, LDB, RBETA, CC, LDC )
1764 $ LDA, BB, LDB, BETA, CC, LDC )
1792 ISAME( 11 ) = LZE( CS, CC, LCC )
1795 $ CC, LDC )
1849 $ NMAX, CT, G, CC( JC ), LDC,
1871 $ G, CC( JC ), LDC, EPS, ERR,
3004 $ BETA, C, LDC, CT, G, CC, LDCC, EPS, ERR, FATAL,
3030 $ CC( LDCC, * ), CT( * )
3154 ERRI = ABS1( CT( I ) - CC( I, J ) )/EPS
3173 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
3175 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
