Lines Matching refs:LDV
195 SUBROUTINE ZLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, argument
205 INTEGER K, LDC, LDT, LDV, LDWORK, M, N local
208 COMPLEX*16 C( LDC, * ), T( LDT, * ), V( LDV, * ),
259 LASTV = MAX( K, ILAZLR( M, K, V, LDV ) )
274 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
281 $ V( K+1, 1 ), LDV, ONE, WORK, LDWORK )
297 $ -ONE, V( K+1, 1 ), LDV, WORK, LDWORK,
304 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
318 LASTV = MAX( K, ILAZLR( N, K, V, LDV ) )
332 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
339 $ ONE, C( 1, K+1 ), LDC, V( K+1, 1 ), LDV,
356 $ -ONE, WORK, LDWORK, V( K+1, 1 ), LDV,
363 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
385 LASTV = MAX( K, ILAZLR( M, K, V, LDV ) )
401 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
409 $ ONE, C, LDC, V, LDV,
426 $ -ONE, V, LDV, WORK, LDWORK,
433 $ 'Unit', LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
449 LASTV = MAX( K, ILAZLR( N, K, V, LDV ) )
464 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
472 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
487 $ LASTC, LASTV-K, K, -ONE, WORK, LDWORK, V, LDV,
494 $ 'Unit', LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
520 LASTV = MAX( K, ILAZLC( K, M, V, LDV ) )
535 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
542 $ ONE, C( K+1, 1 ), LDC, V( 1, K+1 ), LDV,
559 $ -ONE, V( 1, K+1 ), LDV, WORK, LDWORK,
566 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
580 LASTV = MAX( K, ILAZLC( K, N, V, LDV ) )
594 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
601 $ V( 1, K+1 ), LDV, ONE, WORK, LDWORK )
617 $ -ONE, WORK, LDWORK, V( 1, K+1 ), LDV,
624 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
646 LASTV = MAX( K, ILAZLC( K, M, V, LDV ) )
662 $ 'Unit', LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
670 $ ONE, C, LDC, V, LDV, ONE, WORK, LDWORK )
686 $ -ONE, V, LDV, WORK, LDWORK, ONE, C, LDC )
692 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
708 LASTV = MAX( K, ILAZLC( K, N, V, LDV ) )
723 $ 'Unit', LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
730 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV, ONE,
746 $ LASTC, LASTV-K, K, -ONE, WORK, LDWORK, V, LDV,
753 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,