void dintm(long,double*,double[],long,long[]);
void dintma(double*,double[],long[]);
void dintop(long[],double[]);