Lines Matching refs:iq2
217 integer k2, n2, ct, nj, pj, js, iq1, iq2, n1p1; in slaed2_() local
349 iq2 = 1; in slaed2_()
356 scopy_(n, &q[i__ * q_dim1 + 1], &c__1, &q2[iq2], &c__1); in slaed2_()
358 iq2 += *n; in slaed2_()
544 iq2 = (ctot[0] + ctot[1]) * *n1 + 1; in slaed2_()
564 scopy_(&n2, &q[*n1 + 1 + js * q_dim1], &c__1, &q2[iq2], &c__1); in slaed2_()
568 iq2 += n2; in slaed2_()
577 scopy_(&n2, &q[*n1 + 1 + js * q_dim1], &c__1, &q2[iq2], &c__1); in slaed2_()
580 iq2 += n2; in slaed2_()
583 iq1 = iq2; in slaed2_()
590 scopy_(n, &q[js * q_dim1 + 1], &c__1, &q2[iq2], &c__1); in slaed2_()
591 iq2 += *n; in slaed2_()