61 	int	i, j;  in setn()  local
179 		if ((j = findr(i)) == -1)  in setn()
182 			i = numtab[j].val = (numtab[j].val+numtab[j].inc*f);  in setn()
183 			nform = numtab[j].fmt;  in setn()
314 	int	j;  variable
316 	j = 0;
318 		j = (*f)('-' | nrbits);
325 		return decml(i, f) + j;
329 		return roman(i, f) + j;
333 		return abc(i, f) + j;
345 	int	j, k;  variable
349 	if ((j = i / 10) || (nform > 0))
350 		k = decml(j, f);
413 	int	j, k;  variable
416 	if (j = i / 26)
417 		k = abc0(j - 1, f);
552 	long	j;  in ckph()  local
557 		j = atoi0();  in ckph()
559 		j = atoi1(i);  in ckph()
561 	return(j);  in ckph()
568 	int	i, j, digits;  local
615 		i = j = 1;	/* should this be related to HOR?? */
618 		j = lss;
622 		j = EM;
626 		j = EM;
635 		j = INCH;
639 		j = INCH;
644 		j = INCH * 50;
648 		j = INCH;
652 		j = dfact;
659 		acc = (acc * j) / i;
666 			j = dip->dnl;
668 			j = numtab[NL].val;
670 			j = numtab[HP].val;
673 			j = -j;
674 		acc -= j;
685 	int	i, j;  in caserr()  local
690 		j = usedr(i);  in caserr()
691 		if (j < 0)  in caserr()
693 		p = &numtab[j];  in caserr()
706 	int	i, j;  in casenr()  local
713 	j = inumb(&numtab[i].val);  in casenr()
716 	numtab[i].val = j;  in casenr()
718 	j = atoi();  in casenr()
721 	numtab[i].inc = j;  in casenr()
731 	tchar j, jj;  in caseaf()  local
737 	j = getch();  in caseaf()
738 	if (!ischar(jj = cbits(j)) || !isalpha(jj)) {  in caseaf()
739 		ch = j;  in caseaf()
740 		while ((j = cbits(getch())) >= '0' &&  j <= '9')  in caseaf()
744 		k = j;  in caseaf()
753 	int i, j;  in setaf()  local
761 		for (j = (numtab[i].fmt ? numtab[i].fmt : 1); j; j--)  in setaf()
793 	int	i, j, f;  local
798 		if ((j = cbits(ii = getch())) == '+')
800 		else if (j == '-')