void dpolz2(double[],double[]); void ermsg(STRING,long,long,STRING,byte); .