void ddassf3(double*,double[],double[],double[],double[],long*,double*,long*,double[],long[]);
void drddasl3(void);