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