void srot(long,float[],long,float[],long,float,float);