📄 gauss.cpp
字号:
/*
以下程序是sinwn.cpp程序中调用的一个子程序。
用来产生高斯白噪声。
*/
#include "uniform.c"
double gauss(mean,sigma,s)
double mean,sigma;
long int *s;
{
int i;
double x,y;
double uniform();
for(x=0,i=0;i<12;i++)
x+=uniform(0.0,1.0,s);
x=x-6.0;
y=mean+x*sigma;
return(y);
}
double uniform(a,b,seed)
double a,b;
long int *seed;
{ double t;
*seed=2045*(*seed)+1;
*seed=*seed-(*seed/1048576)*1048576;
t=(*seed)/1048576.0;
t=a+(b-a)*t;
return(t);
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -