egetn
i = egetn(p1);
i = egetn(p1) > egetn(p2);
i = egetn(p1) >= egetn(p2);
i = egetn(p1) < egetn(p2);
i = egetn(p1) <= egetn(p2);
i = egetn(p1) << egetn(p2);
i = egetn(p1) >> egetn(p2);
i = egetn(p1) + egetn(p2);
i = egetn(p1) - egetn(p2);
i = egetn(p1) * egetn(p2);
i = egetn(p2);
l = egetn(p1);
i = egetn(p2);
l = egetn(p1);
i = egetn(cp);
i = egetn(cp);
return (putn(egetn(value(STRstatus)) == 0));
static int egetn(Char *);