void dconcm(long,double[]);
void dconmc(long,double[]);