Fortran Coder

标题: 遇到的老代码中随机数的问题 [打印本页]

作者: mchy 时间: 2016-3-31 17:36
标题: 遇到的老代码中随机数的问题
想问一下这两个子程序的功能是什么？新手求帮助

QQ截图20160331173447.png (12.82 KB, 下载次数: 391)

QQ截图20160331173502.png (14.46 KB, 下载次数: 375)

作者: fcode 时间: 2016-3-31 18:44
gsecnds 用来获取当前的秒数
init 用来根据秒数获得一个伪随机数的种子

这都是老代码才用的方法。现在可以用标准的方法得到随机数
详见
http://fcode.cn/guide-96-1.html

作者: mchy 时间: 2016-4-5 08:52
我在linux下运行了产生随机数的代码，出现很多错误，求帮助

QQ截图20160405085034.png (58.96 KB, 下载次数: 386)

QQ截图20160405085109.png (23.93 KB, 下载次数: 390)

作者: fcode 时间: 2016-4-5 09:01
请告诉我你用的什么编译器？编译命令是什么？
你是否重排了代码以便其适合于固定格式？为什么不使用自由格式？

作者: mchy 时间: 2016-4-5 09:06
linux下的gfortran ，编译命令ifort

作者: mchy 时间: 2016-4-5 09:09
Error in opening the compiled module file. Check INCLUDE paths. 这个是什么意思，

作者: fcode 时间: 2016-4-5 12:31
如果你用的编译命令是 ifort 的话。应该是 intel fortran，而不是 gfortran
如果是这样，请直接
call random_seed()

作者: mchy 时间: 2016-4-9 09:22

fcode 发表于 2016-4-5 12:31
如果你用的编译命令是 ifort 的话。应该是 intel fortran，而不是 gfortran
如果是这样，请直接
call rando ...

调用random_seed（）获取伪随机数钟子，怎么样把这个种子赋值给一个变量，有什么具体格式吗？

作者: fcode 时间: 2016-4-9 09:47
看2楼

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)