getrq
control(getrq(), 1);
while (!skip() && (j = getrq()) != 0)
if ((i = getrq()) == 0)
if (skip() || !(j = getrq()))
return(getrq());
if (skip() || (i = getrq()) == 0) {
dip->dimac = getrq();
if ((i = getrq()) == 0 || (oldmn = findmn(i)) < 0)
clrmn(findmn(j = getrq()));
while (!skip() && (i = getrq()) ) {
if ((i = findr(getrq())) == -1)
if (skip() || !(i = getrq()) || skip())
if (skip() || !(i = getrq()) || i == 'S' || (j = findft(i)) == -1)
if (!nonumb && (itmac = getrq()))
if ((i = getrq()) == 0)
j = getrq();
if (!(j = getrq()))
em = getrq();
i = getrq();
if (skip() || !(j = getrq()))
if (skip() || !(i = getrq()) || (j = findft(i)) == -1) {
i = getrq();
else if (skip() || !(j = getrq()))
if (!(i = getrq()) || (i = findft(i)) < 0)
if (skip() || !(i = getrq()) || (j = findft(i)) == -1) {