void scft(float[],STRING,long[],long,long*,float[]);