Lines Matching refs:IBEG
2638 INTEGER I, IBEG, IEND, J local
2652 IBEG = 1
2655 IBEG = J
2658 DO 30 I = 1, IBEG - 1
2782 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, JJ, KK local
2852 IBEG = 1
2860 IBEG = J + 1
2862 IBEG = J
2866 DO 100 I = 1, IBEG - 1
2869 DO 110 I = IBEG, IEND
2884 IBEG = MAX( 1, KL + 2 - J )
2893 IBEG = 2
2895 IBEG = 1
2899 DO 140 I = 1, IBEG - 1
2902 DO 150 I = IBEG, IEND
2917 IBEG = 1
2920 IBEG = J
2923 DO 180 I = IBEG, IEND