Lines Matching defs:LDC
22 * T, LDT, C, LDC, WORK, LDWORK )
26 * INTEGER K, LDC, LDT, LDV, LDWORK, M, N
29 * COMPLEX C( LDC, * ), T( LDT, * ), V( LDV, * ),
130 *> C is COMPLEX array, dimension (LDC,N)
135 *> \param[in] LDC
137 *> LDC is INTEGER
138 *> The leading dimension of the array C. LDC >= max(1,M).
196 $ T, LDT, C, LDC, WORK, LDWORK )
205 INTEGER K, LDC, LDT, LDV, LDWORK, M, N
208 COMPLEX C( LDC, * ), T( LDT, * ), V( LDV, * ),
260 LASTC = ILACLC( LASTV, N, C, LDC )
267 CALL CCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
280 $ LASTC, K, LASTV-K, ONE, C( K+1, 1 ), LDC,
297 $ WORK, LDWORK, ONE, C( K+1, 1 ), LDC )
318 LASTC = ILACLR( M, LASTV, C, LDC )
338 $ ONE, C( 1, K+1 ), LDC, V( K+1, 1 ), LDV,
356 $ ONE, C( 1, K+1 ), LDC )
385 LASTC = ILACLC( LASTV, N, C, LDC )
392 CALL CCOPY( LASTC, C( LASTV-K+J, 1 ), LDC,
407 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV,
424 $ ONE, C, LDC )
447 LASTC = ILACLR( M, LASTV, C, LDC )
469 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
485 $ ONE, C, LDC )
518 LASTC = ILACLC( LASTV, N, C, LDC )
525 CALL CCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
539 $ ONE, C( K+1, 1 ), LDC, V( 1, K+1 ), LDV,
557 $ ONE, C( K+1, 1 ), LDC )
578 LASTC = ILACLR( M, LASTV, C, LDC )
597 $ LASTC, K, LASTV-K, ONE, C( 1, K+1 ), LDC,
615 $ ONE, C( 1, K+1 ), LDC )
644 LASTC = ILACLC( LASTV, N, C, LDC )
651 CALL CCOPY( LASTC, C( LASTV-K+J, 1 ), LDC,
667 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
683 $ -ONE, V, LDV, WORK, LDWORK, ONE, C, LDC )
706 LASTC = ILACLR( M, LASTV, C, LDC )
727 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV, ONE,
744 $ ONE, C, LDC )