Lines Matching refs:IBEG
2681 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, KK local
2749 IBEG = 1
2757 IBEG = J + 1
2759 IBEG = J
2763 DO 100 I = 1, IBEG - 1
2766 DO 110 I = IBEG, IEND
2777 IBEG = MAX( 1, KL + 2 - J )
2786 IBEG = 2
2788 IBEG = 1
2792 DO 140 I = 1, IBEG - 1
2795 DO 150 I = IBEG, IEND
2806 IBEG = 1
2809 IBEG = J
2812 DO 180 I = IBEG, IEND
2993 INTEGER I, IBEG, IEND, J local
3007 IBEG = 1
3010 IBEG = J
3013 DO 30 I = 1, IBEG - 1