pb while loop OK