1555 FOR L=0 TO LC