405 trysuff(char *ep, int lev)  in trysuff()  argument
410 	lev += DLEV;  in trysuff()
411 	deriv[lev] = deriv[lev-1] = 0;  in trysuff()
421 		if ((*t->p1)(ep-t->n1, t->d1, t->a1, lev+1))  in trysuff()
424 			deriv[lev] = deriv[lev+1] = 0;  in trysuff()
425 			return ((*t->p2)(ep-t->n2, t->d2, t->a2, lev));  in trysuff()
441 strip(char *ep, char *d, char *a, int lev)  in strip()  argument
443 	return (trypref(ep, a, lev)||trysuff(ep, lev));  in strip()
447 s(char *ep, char *d, char *a, int lev)  in s()  argument
449 	if (lev > DLEV+1)  in s()
453 	return (strip(ep, d, a, lev));  in s()
458 an(char *ep, char *d, char *a, int lev)  in an()  argument
462 	return (trypref(ep, a, lev));  in an()
467 ize(char *ep, char *d, char *a, int lev)  in ize()  argument
470 	return (strip(ep, "", d, lev));  in ize()
475 y_to_e(char *ep, char *d, char *a, int lev)  in y_to_e()  argument
478 	return (strip(ep, "", d, lev));  in y_to_e()
482 ily(char *ep, char *d, char *a, int lev)  in ily()  argument
485 		return (i_to_y(ep, d, a, lev));  in ily()
487 		return (strip(ep, d, a, lev));  in ily()
491 bility(char *ep, char *d, char *a, int lev)  in bility()  argument
494 	return (y_to_e(ep, d, a, lev));  in bility()
498 i_to_y(char *ep, char *d, char *a, int lev)  in i_to_y()  argument
504 	return (strip(ep, "", a, lev));  in i_to_y()
508 es(char *ep, char *d, char *a, int lev)  in es()  argument
510 	if (lev > DLEV)  in es()
516 		return (i_to_y(ep, d, a, lev));  in es()
521 		return (strip(ep, d, a, lev));  in es()
527 subst(char *ep, char *d, char *a, int lev)  in subst()  argument
537 	return (strip(ep, "", d, lev));  in subst()
542 tion(char *ep, char *d, char *a, int lev)  in tion()  argument
547 		return (trypref(ep, a, lev));  in tion()
549 		return (y_to_e(ep, d, a, lev));  in tion()
556 CCe(char *ep, char *d, char *a, int lev)  in CCe()  argument
561 			return (y_to_e(ep, d, a, lev));  in CCe()
572 			return (y_to_e(ep, d, a, lev));  in CCe()
582 		if (y_to_e(ep, d, a, lev))  in CCe()
593 		if (y_to_e(ep, d, a, lev))  in CCe()
602 		if (y_to_e(ep, d, a, lev))  in CCe()
608 		if (y_to_e(ep, d, a, lev))  in CCe()
614 	return (VCe(ep, d, a, lev));  in CCe()
619 VCe(char *ep, char *d, char *a, int lev)  in VCe()  argument
628 		if (trypref(ep, d, lev)||trysuff(ep, lev))  in VCe()
633 	return (strip(ep, d, a, lev));  in VCe()
662 trypref(char *ep, char *a, int lev)  in trypref()  argument
669 	deriv[lev] = a;  in trypref()
670 	if (tryword(word, ep, lev))  in trypref()
674 	deriv[lev+1] = pp;  in trypref()
679 		if (tryword(bp, ep, lev+1)) {  in trypref()
684 	deriv[lev+1] = deriv[lev+2] = 0;  in trypref()
689 tryword(char *bp, char *ep, int lev)  in tryword()  argument
702 		deriv[++lev] = duple;  in tryword()
714 	j = lev;  in tryword()