Lines Matching refs:kplus1
30 integer kplus1; in ctbmv_() local
241 kplus1 = *k + 1; in ctbmv_()
249 l = kplus1 - j; in ctbmv_()
268 i__3 = kplus1 + j * a_dim1; in ctbmv_()
286 l = kplus1 - j; in ctbmv_()
306 i__2 = kplus1 + j * a_dim1; in ctbmv_()
404 kplus1 = *k + 1; in ctbmv_()
409 l = kplus1 - j; in ctbmv_()
412 i__3 = kplus1 + j * a_dim1; in ctbmv_()
434 r_cnjg(&q__2, &a[kplus1 + j * a_dim1]); in ctbmv_()
467 l = kplus1 - j; in ctbmv_()
470 i__3 = kplus1 + j * a_dim1; in ctbmv_()
493 r_cnjg(&q__2, &a[kplus1 + j * a_dim1]); in ctbmv_()