(while:prn:round:read)