void sprpl1(float[],float[],long,char*,char*,char*,long,long,byte[],long*);
void sprpl3(float,float,float,float,float*,float*,float*,float*,long*,long*,long*,long*,char*,char*,char*,long,long,byte[],long*);