ran3.h

快速傅立叶变换程序代码,学信号的同学,可要注意了

extern int ran3argument=1 ;
#define ran_seed(s) ran3(-(int)(s))
#define rann()      ran3(&ran3argument)
#define ranu()      ran3(&ran3argument)
#define ranf()      ran3(&ran3argument)