funceval(const func, const vP)
{
    decl dfunc, ir;

    ir = func(vP, &dfunc, 0, 0);        // evaluate
    if (ir == 0)
        print("function evaluation failed\n");
    else
        print("function value is ", dfunc, 
            "\n at parameter value:", vP');
}
