Lines Matching refs:i__1
161 integer i__1, i__2; in decode_() local
336 i__1 = contrl_1.order; in decode_()
337 for (i__ = 1; i__ <= i__1; ++i__) { in decode_()
415 i__1 = contrl_1.order; in decode_()
416 for (i__ = 1; i__ <= i__1; ++i__) { in decode_()
428 if ((i__1 = drms[1] - drms[0], (real) abs(i__1)) >= corth[ixcor + 3] in decode_()
434 if ((i__1 = drc[i__ * 3 - 2] - drc[i__ * 3 - 3], (real) abs(i__1)) in decode_()
445 if ((i__1 = dpit[1] - dpit[0], (real) abs(i__1)) >= corth[ixcor - 1] in decode_()
456 i__1 = contrl_1.order; in decode_()
457 for (i__ = 5; i__ <= i__1; ++i__) { in decode_()
468 i__1 = contrl_1.order; in decode_()
469 for (i__ = 1; i__ <= i__1; ++i__) { in decode_()
498 i__1 = contrl_1.order; in decode_()
499 for (i__ = 3; i__ <= i__1; ++i__) { in decode_()
510 i__1 = contrl_1.order; in decode_()
511 for (i__ = 1; i__ <= i__1; ++i__) { in decode_()