Searched refs:LASTC (Results 1 - 8 of 8) sorted by relevance

/external/eigen/lapack/
H A Dclarfb.f220 INTEGER I, J, LASTV, LASTC local in subroutine:CLARFB
260 LASTC = ILACLC( LASTV, N, C, LDC )
267 CALL CCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
268 CALL CLACGV( LASTC, WORK( 1, J ), 1 )
274 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
280 $ LASTC, K, LASTV-K, ONE, C( K+1, 1 ), LDC,
287 $ LASTC, K, ONE, T, LDT, WORK, LDWORK )
296 $ LASTV-K, LASTC, K, -ONE, V( K+1, 1 ), LDV,
303 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
308 DO 20 I = 1, LASTC
[all...]
H A Dzlarfb.f220 INTEGER I, J, LASTV, LASTC local in subroutine:ZLARFB
260 LASTC = ILAZLC( LASTV, N, C, LDC )
267 CALL ZCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
268 CALL ZLACGV( LASTC, WORK( 1, J ), 1 )
274 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
280 $ LASTC, K, LASTV-K, ONE, C( K+1, 1 ), LDC,
287 $ LASTC, K, ONE, T, LDT, WORK, LDWORK )
296 $ LASTV-K, LASTC, K,
304 $ 'Unit', LASTC, K, ONE, V, LDV, WORK, LDWORK )
309 DO 20 I = 1, LASTC
[all...]
H A Ddlarfb.f220 INTEGER I, J, LASTV, LASTC local in subroutine:DLARFB
257 LASTC = ILADLC( LASTV, N, C, LDC )
264 CALL DCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
270 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
276 $ LASTC, K, LASTV-K,
284 $ LASTC, K, ONE, T, LDT, WORK, LDWORK )
293 $ LASTV-K, LASTC, K,
301 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
306 DO 20 I = 1, LASTC
316 LASTC
[all...]
H A Dslarfb.f220 INTEGER I, J, LASTV, LASTC local in subroutine:SLARFB
257 LASTC = ILASLC( LASTV, N, C, LDC )
264 CALL SCOPY( LASTC, C( J, 1 ), LDC, WORK( 1, J ), 1 )
270 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
276 $ LASTC, K, LASTV-K,
284 $ LASTC, K, ONE, T, LDT, WORK, LDWORK )
293 $ LASTV-K, LASTC, K,
301 $ LASTC, K, ONE, V, LDV, WORK, LDWORK )
306 DO 20 I = 1, LASTC
316 LASTC
[all...]
H A Dclarf.f154 INTEGER I, LASTV, LASTC local in subroutine:CLARF
168 LASTC = 0
189 LASTC = ILACLC(LASTV, N, C, LDC)
192 LASTC = ILACLR(M, LASTV, C, LDC)
205 CALL CGEMV( 'Conjugate transpose', LASTV, LASTC, ONE,
210 CALL CGERC( LASTV, LASTC, -TAU, V, INCV, WORK, 1, C, LDC )
220 CALL CGEMV( 'No transpose', LASTC, LASTV, ONE, C, LDC,
225 CALL CGERC( LASTC, LASTV, -TAU, WORK, 1, V, INCV, C, LDC )
H A Ddlarf.f149 INTEGER I, LASTV, LASTC local in subroutine:DLARF
163 LASTC = 0
184 LASTC = ILADLC(LASTV, N, C, LDC)
187 LASTC = ILADLR(M, LASTV, C, LDC)
200 CALL DGEMV( 'Transpose', LASTV, LASTC, ONE, C, LDC, V, INCV,
205 CALL DGER( LASTV, LASTC, -TAU, V, INCV, WORK, 1, C, LDC )
215 CALL DGEMV( 'No transpose', LASTC, LASTV, ONE, C, LDC,
220 CALL DGER( LASTC, LASTV, -TAU, WORK, 1, V, INCV, C, LDC )
H A Dslarf.f149 INTEGER I, LASTV, LASTC local in subroutine:SLARF
163 LASTC = 0
184 LASTC = ILASLC(LASTV, N, C, LDC)
187 LASTC = ILASLR(M, LASTV, C, LDC)
200 CALL SGEMV( 'Transpose', LASTV, LASTC, ONE, C, LDC, V, INCV,
205 CALL SGER( LASTV, LASTC, -TAU, V, INCV, WORK, 1, C, LDC )
215 CALL SGEMV( 'No transpose', LASTC, LASTV, ONE, C, LDC,
220 CALL SGER( LASTC, LASTV, -TAU, WORK, 1, V, INCV, C, LDC )
H A Dzlarf.f154 INTEGER I, LASTV, LASTC local in subroutine:ZLARF
168 LASTC = 0
189 LASTC = ILAZLC(LASTV, N, C, LDC)
192 LASTC = ILAZLR(M, LASTV, C, LDC)
205 CALL ZGEMV( 'Conjugate transpose', LASTV, LASTC, ONE,
210 CALL ZGERC( LASTV, LASTC, -TAU, V, INCV, WORK, 1, C, LDC )
220 CALL ZGEMV( 'No transpose', LASTC, LASTV, ONE, C, LDC,
225 CALL ZGERC( LASTC, LASTV, -TAU, WORK, 1, V, INCV, C, LDC )

Completed in 85 milliseconds