NO_POS
if (pos->pmode == logical || un->un_read_pos_type != NO_POS) {
while (un->un_read_pos_type != NO_POS) {
un->un_read_pos_type = NO_POS;
} else if (un->un_read_pos_type == NO_POS) {
type = NO_POS;
} while (type != NO_POS);
if (un->un_read_pos_type != NO_POS) {