Lines Matching defs:LDC
21 * SUBROUTINE SLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK )
25 * INTEGER INCV, LDC, M, N
29 * REAL C( LDC, * ), V( * ), WORK( * )
93 *> C is REAL array, dimension (LDC,N)
99 *> \param[in] LDC
101 *> LDC is INTEGER
102 *> The leading dimension of the array C. LDC >= max(1,M).
125 SUBROUTINE SLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK )
134 INTEGER INCV, LDC, M, N
138 REAL C( LDC, * ), V( * ), WORK( * )
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 )
