void sxrk8f(float*,float[],float[],long[]);
void sxrk8o(float[],float[],long[],float[]);
void sxrk8(float[],float[],float[],long[],float[],float[]);