Lines Matching refs:LDC
196 $ T, LDT, C, LDC, WORK, LDWORK ) argument
205 INTEGER K, LDC, LDT, LDV, LDWORK, M, N local
208 COMPLEX*16 C( LDC, * ), T( LDT, * ), V( LDV, * ),
260 LASTC = ILAZLC( LASTV, N, C, LDC )
267 CALL ZCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
280 $ LASTC, K, LASTV-K, ONE, C( K+1, 1 ), LDC,
298 $ ONE, C( K+1, 1 ), LDC )
319 LASTC = ILAZLR( M, LASTV, C, LDC )
339 $ ONE, C( 1, K+1 ), LDC, V( K+1, 1 ), LDV,
357 $ ONE, C( 1, K+1 ), LDC )
386 LASTC = ILAZLC( LASTV, N, C, LDC )
393 CALL ZCOPY( LASTC, C( LASTV-K+J, 1 ), LDC,
409 $ ONE, C, LDC, V, LDV,
427 $ ONE, C, LDC )
450 LASTC = ILAZLR( M, LASTV, C, LDC )
472 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
488 $ ONE, C, LDC )
521 LASTC = ILAZLC( LASTV, N, C, LDC )
528 CALL ZCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
542 $ ONE, C( K+1, 1 ), LDC, V( 1, K+1 ), LDV,
560 $ ONE, C( K+1, 1 ), LDC )
581 LASTC = ILAZLR( M, LASTV, C, LDC )
600 $ LASTC, K, LASTV-K, ONE, C( 1, K+1 ), LDC,
618 $ ONE, C( 1, K+1 ), LDC )
647 LASTC = ILAZLC( LASTV, N, C, LDC )
654 CALL ZCOPY( LASTC, C( LASTV-K+J, 1 ), LDC,
670 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
686 $ -ONE, V, LDV, WORK, LDWORK, ONE, C, LDC )
709 LASTC = ILAZLR( M, LASTV, C, LDC )
730 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV, ONE,
747 $ ONE, C, LDC )