double dmxdif(long,double[],long,double[],long);
void prgm_(void);