wt1


in nr2.h


extern void wt1(float a[], unsigned long n, int isign, void (*wtstep)(float[], unsigned long, int));