Lines Matching refs:i__
75 integer minp2, ltau2, maxp2, i__; in tbdm_() local
106 for (i__ = max(i__1,41); i__ <= i__2; ++i__) { in tbdm_()
107 while(tau[ptr] < i__) { in tbdm_()
110 if (tau[ptr] != i__) { in tbdm_()
112 tau2[ltau2 - 1] = i__; in tbdm_()
127 i__ = *mintau / 2; in tbdm_()
128 if ((i__ & 1) == 0) { in tbdm_()
130 tau2[0] = i__ - 1; in tbdm_()
131 tau2[1] = i__ + 1; in tbdm_()
134 tau2[0] = i__; in tbdm_()
153 for (i__ = *maxptr + 1; i__ <= i__2; ++i__) { in tbdm_()
154 if (amdf[i__] > amdf[*maxptr]) { in tbdm_()
155 *maxptr = i__; in tbdm_()