2335 FOR I=IA(1) TO IB(1)