5315 FOR L=1 TO KM