void smess(long[],CHAR_INT,long[],float[]);
void sxrk8(float[],float[],float[],long[],float[],float[]);
void sxrk8a(float[],float[],float[],long[],float[],float[]);
void sxrk8f(float*,float[],float[],long[]);
void sxrk8i(float,float[],long[],float[]);
void sxrk8n(long[],float[],float[],float[],float[],float[],float[]);
void sxrk8o(float[],float[],long[],float[]);
float sxrk8x(float,float,float,float);