10665 WHILE XN>=-.5 AND XN<=4 AND INT(2*XN)=2*XN