void ddasdb(long,long,double,double[],double[],long[],double[],
	long[],long,double[],double[]);
void dmess(long[],CHAR_INT,long[],double[]);
void mess(long[],CHAR_INT,long[]);