9660 WHILE Y<R