void sc7vfn(long[],float[],long,long,long,long,long,
	float[]);
float sd7tpr(long,float[],float[]);
void sitsum(float[],float[],long[],long,long,long,float[],
	float[]);
void sivset(long,long[],long,long,float[]);
void sl7itv(long,float[],float[],float[]);
void sl7srt(long,long,float[],float[],long*);
float sl7svn(long,float[],float[],float[]);
float sl7svx(long,float[],float[],float[]);
void sn2cvp(long[],long,long,long,float[]);
void sn2lrd(float*,long[],float[],long,long,long,long,
	long,long,float[],float[],float[]);
void sn2rdp(long[],long,long,float[]);
void sq7apl(long,long,long,float*,float[],long);
void sq7rad(long,long,long,float[],LOGICAL32,float[],float*,
	float[]);
void sq7rfh(long*,long[],long,long,long,long,float*,
	float[],long,float[]);
float sr7mdc(long);
void srn2g(float[],float*,long[],long,long,long,long,
	long*,long*,long,float[],float[],float[],float[]);
void srnsg(float*,float[],float[],float*,long[][2],long[],long,
	long,long,long,long,long,long,long,
	float[],float[]);
void ss7cpr(float[],long[],long,long);
void sv2axy(long,float[],float,float[],float[]);
void sv7cpy(long,float[],float[]);
void sv7prm(long,long[],float[]);
void sv7scl(long,float[],float,float[]);
void sv7scp(long,float[],float);