11015 FOR JP=KI TO N