Lines Matching refs:IBEG
2493 INTEGER I, I1, I2, I3, IBEG, IEND, IOFF, J, KK local
2561 IBEG = 1
2569 IBEG = J + 1
2571 IBEG = J
2575 DO 100 I = 1, IBEG - 1
2578 DO 110 I = IBEG, IEND
2589 IBEG = MAX( 1, KL + 2 - J )
2598 IBEG = 2
2600 IBEG = 1
2604 DO 140 I = 1, IBEG - 1
2607 DO 150 I = IBEG, IEND
2618 IBEG = 1
2621 IBEG = J
2624 DO 180 I = IBEG, IEND
2805 INTEGER I, IBEG, IEND, J local
2819 IBEG = 1
2822 IBEG = J
2825 DO 30 I = 1, IBEG - 1