ran3.h

来自「快速傅立叶变换程序代码,学信号的同学,可要注意了」· C头文件 代码 · 共 6 行

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