void svecp(float[],long,STRING);
void swdif(long,float[],float[],float[]);
void swexp(long,float[],float[]);
void swlog(long,float[],float[]);
void swpro1(long,float,float[],float[]);
void swset(long,float,float,float[]);
void swsqrt(long,float[],float[]);