add_setfval
one = add_setfval(ep, expr->ctype, expr->op_value);
zero = add_setfval(ep, type, 0.0);
return add_setfval(ep, expr->ctype, expr->fvalue);