137 rel(int oper, char *r1, char *r2)  in rel()  argument
141 	if(ematch(r1, "-\\{0,1\\}[0-9]*$") && ematch(r2, "-\\{0,1\\}[0-9]*$"))  in rel()
142 		i = atol(r1) - atol(r2);  in rel()
144 		i = strcmp(r1, r2);  in rel()
168 char *arith(int oper, char *r1, char *r2)  in arith()  argument
173 	if(!(ematch(r1, "-\\{0,1\\}[0-9]*$") && ematch(r2, "-\\{0,1\\}[0-9]*$")))  in arith()
176 	i2 = atol(r2);  in arith()
203 char *conj(int oper, char *r1, char *r2)  in conj()  argument
212 			if(EQL(r2, "0")  in conj()
213 			    || EQL(r2, ""))  in conj()
216 				rv = r2;  in conj()
224 		else if(EQL(r2, "0")  in conj()
225 		    || EQL(r2, ""))  in conj()