Lines Matching refs:LDV
195 SUBROUTINE SLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, argument
205 INTEGER K, LDC, LDT, LDV, LDWORK, M, N local
208 REAL C( LDC, * ), T( LDT, * ), V( LDV, * ),
256 LASTV = MAX( K, ILASLR( M, K, V, LDV ) )
270 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
277 $ ONE, C( K+1, 1 ), LDC, V( K+1, 1 ), LDV,
294 $ -ONE, V( K+1, 1 ), LDV, WORK, LDWORK, ONE,
301 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
315 LASTV = MAX( K, ILASLR( N, K, V, LDV ) )
329 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
336 $ ONE, C( 1, K+1 ), LDC, V( K+1, 1 ), LDV,
353 $ -ONE, WORK, LDWORK, V( K+1, 1 ), LDV, ONE,
360 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
382 LASTV = MAX( K, ILASLR( M, K, V, LDV ) )
397 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
404 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV,
420 $ LASTV-K, LASTC, K, -ONE, V, LDV, WORK, LDWORK,
427 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
442 LASTV = MAX( K, ILASLR( N, K, V, LDV ) )
456 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
463 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV,
479 $ LASTC, LASTV-K, K, -ONE, WORK, LDWORK, V, LDV,
486 $ LASTC, K, ONE, V( LASTV-K+1, 1 ), LDV,
511 LASTV = MAX( K, ILASLC( K, M, V, LDV ) )
525 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
532 $ ONE, C( K+1, 1 ), LDC, V( 1, K+1 ), LDV,
549 $ -ONE, V( 1, K+1 ), LDV, WORK, LDWORK,
556 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
570 LASTV = MAX( K, ILASLC( K, N, V, LDV ) )
584 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
591 $ ONE, C( 1, K+1 ), LDC, V( 1, K+1 ), LDV,
608 $ -ONE, WORK, LDWORK, V( 1, K+1 ), LDV,
615 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
637 LASTV = MAX( K, ILASLC( K, M, V, LDV ) )
652 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
659 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV,
675 $ LASTV-K, LASTC, K, -ONE, V, LDV, WORK, LDWORK,
682 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
697 LASTV = MAX( K, ILASLC( K, N, V, LDV ) )
712 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,
719 $ LASTC, K, LASTV-K, ONE, C, LDC, V, LDV,
735 $ LASTC, LASTV-K, K, -ONE, WORK, LDWORK, V, LDV,
742 $ LASTC, K, ONE, V( 1, LASTV-K+1 ), LDV,