Lines Matching refs:jcol
47 int i,j,irow,jcol,LDA; in F77_cgbmv() local
56 jcol=(*ku)-i; in F77_cgbmv()
57 for( j=jcol; j<*n; j++ ){ in F77_cgbmv()
58 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_cgbmv()
59 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_cgbmv()
70 jcol=i-(*ku); in F77_cgbmv()
71 for( j=jcol; j<(*n+*kl); j++ ){ in F77_cgbmv()
72 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_cgbmv()
73 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_cgbmv()
181 int i,irow,j,jcol,LDA; in F77_chbmv() local
197 jcol=(*k)-i; in F77_chbmv()
198 for( j=jcol; j<*n; j++ ) { in F77_chbmv()
199 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_chbmv()
200 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_chbmv()
219 jcol=i; in F77_chbmv()
220 for( j=jcol; j<(*n+*k); j++ ) { in F77_chbmv()
221 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_chbmv()
222 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_chbmv()
299 int irow, jcol, i, j, LDA; in F77_ctbmv() local
318 jcol=(*k)-i; in F77_ctbmv()
319 for( j=jcol; j<*n; j++ ) { in F77_ctbmv()
320 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_ctbmv()
321 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_ctbmv()
340 jcol=i; in F77_ctbmv()
341 for( j=jcol; j<(*n+*k); j++ ) { in F77_ctbmv()
342 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_ctbmv()
343 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_ctbmv()
363 int irow, jcol, i, j, LDA; in F77_ctbsv() local
382 jcol=(*k)-i; in F77_ctbsv()
383 for( j=jcol; j<*n; j++ ) { in F77_ctbsv()
384 A[ LDA*(j-jcol)+irow ].real=a[ (*lda)*j+i ].real; in F77_ctbsv()
385 A[ LDA*(j-jcol)+irow ].imag=a[ (*lda)*j+i ].imag; in F77_ctbsv()
404 jcol=i; in F77_ctbsv()
405 for( j=jcol; j<(*n+*k); j++ ) { in F77_ctbsv()
406 A[ LDA*j+irow ].real=a[ (*lda)*(j-jcol)+i ].real; in F77_ctbsv()
407 A[ LDA*j+irow ].imag=a[ (*lda)*(j-jcol)+i ].imag; in F77_ctbsv()