如何用fortran产生0-1之间均匀分布的随机数?
RT,徐世亮的例子我看了,但是看不懂,没看懂原理。有理解的朋友可以给个例子,比那个加一下注释吗?
谢谢! 我也看过,也不是太懂,直接调用就是了 能不能把代码贴上来呢 SUBROUTINE RD(N,A,R)
DIMENSION A(N)
S=65536
U=2053
V=13849
DO I=1,N
R=U*R+V
M=R/S
R=R-M*S
A(I)=R/S
ENDDO
RETURN
END SUBROUTINE 后期的FORTRAN都自带内部函数来产生这种随机数。检验过,效果不错的。
页:
[1]