3850 WHILE IKP=2