void dgeco(double*,long,long,long[],double*,double[]);
void dgefsc(double*,long,long,double*,long,long,long[],
	double*,double[]);
void dgesld(double*,long,long,long[],double[]);