Lines Matching refs:lastc
154 INTEGER I, LASTV, LASTC
168 LASTC = 0
189 LASTC = ILACLC(LASTV, N, C, LDC)
192 LASTC = ILACLR(M, LASTV, C, LDC)
195 ! Note that lastc.eq.0 renders the BLAS operations null; no special
203 * w(1:lastc,1) := C(1:lastv,1:lastc)**H * v(1:lastv,1)
205 CALL CGEMV( 'Conjugate transpose', LASTV, LASTC, ONE,
208 * C(1:lastv,1:lastc) := C(...) - v(1:lastv,1) * w(1:lastc,1)**H
210 CALL CGERC( LASTV, LASTC, -TAU, V, INCV, WORK, 1, C, LDC )
218 * w(1:lastc,1) := C(1:lastc,1:lastv) * v(1:lastv,1)
220 CALL CGEMV( 'No transpose', LASTC, LASTV, ONE, C, LDC,
223 * C(1:lastc,1:lastv) := C(...) - w(1:lastc,1) * v(1:lastv,1)**H
225 CALL CGERC( LASTC, LASTV, -TAU, WORK, 1, V, INCV, C, LDC )
