double dcpval(double[],long,double);