void dintdl(double[]);
void dinto(long,double[]);