Lines Matching refs:IBEG
2632 INTEGER I, IBEG, IEND, J local
2646 IBEG = 1
2649 IBEG = J
2652 DO 30 I = 1, IBEG - 1
2775 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, JJ, KK local
2845 IBEG = 1
2853 IBEG = J + 1
2855 IBEG = J
2859 DO 100 I = 1, IBEG - 1
2862 DO 110 I = IBEG, IEND
2877 IBEG = MAX( 1, KL + 2 - J )
2886 IBEG = 2
2888 IBEG = 1
2892 DO 140 I = 1, IBEG - 1
2895 DO 150 I = IBEG, IEND
2910 IBEG = 1
2913 IBEG = J
2916 DO 180 I = IBEG, IEND