void dintf(double*,double[],long[]);

.