Lines Matching refs:IBEG
2720 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, JJ, KK local
2790 IBEG = 1
2798 IBEG = J + 1
2800 IBEG = J
2804 DO 100 I = 1, IBEG - 1
2807 DO 110 I = IBEG, IEND
2822 IBEG = MAX( 1, KL + 2 - J )
2831 IBEG = 2
2833 IBEG = 1
2837 DO 140 I = 1, IBEG - 1
2840 DO 150 I = IBEG, IEND
2855 IBEG = 1
2858 IBEG = J
2861 DO 180 I = IBEG, IEND
3059 INTEGER I, IBEG, IEND, J local
3073 IBEG = 1
3076 IBEG = J
3079 DO 30 I = 1, IBEG - 1