fortlen
int fortlen(void);
} while ((Short_only && fortlen() > SLEN) ||
(Long_only && fortlen() <= SLEN));
(void) fortlen();
