Lines Matching refs:jcol
192 int i,irow,j,jcol,LDA; in F77_sgbmv() local
202 jcol=(*ku)-i; in F77_sgbmv()
203 for( j=jcol; j<*n; j++ ) in F77_sgbmv()
204 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_sgbmv()
212 jcol=i-(*ku); in F77_sgbmv()
213 for( j=jcol; j<(*n+*kl); j++ ) in F77_sgbmv()
214 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_sgbmv()
228 int irow, jcol, i, j, LDA; in F77_stbmv() local
243 jcol=(*k)-i; in F77_stbmv()
244 for( j=jcol; j<*n; j++ ) in F77_stbmv()
245 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_stbmv()
259 jcol=i; in F77_stbmv()
260 for( j=jcol; j<(*n+*k); j++ ) in F77_stbmv()
261 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_stbmv()
274 int irow, jcol, i, j, LDA; in F77_stbsv() local
289 jcol=(*k)-i; in F77_stbsv()
290 for( j=jcol; j<*n; j++ ) in F77_stbsv()
291 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_stbsv()
305 jcol=i; in F77_stbsv()
306 for( j=jcol; j<(*n+*k); j++ ) in F77_stbsv()
307 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_stbsv()
321 int i,j,irow,jcol,LDA; in F77_ssbmv() local
332 jcol=(*k)-i; in F77_ssbmv()
333 for( j=jcol; j<*n; j++ ) in F77_ssbmv()
334 A[ LDA*(j-jcol)+irow ]=a[ (*lda)*j+i ]; in F77_ssbmv()
348 jcol=i; in F77_ssbmv()
349 for( j=jcol; j<(*n+*k); j++ ) in F77_ssbmv()
350 A[ LDA*j+irow ]=a[ (*lda)*(j-jcol)+i ]; in F77_ssbmv()