应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 物理 » 统计、非线性&软物质 » 【求助】用Fortran 语言编程求满足麦克斯韦分布的初速度
71/1返回列表
查看: 677  |  回复: 6
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前主题已经存档。

jianchaoyv

金虫 (小有名气)

[交流] 【求助】用Fortran 语言编程求满足麦克斯韦分布的初速度

有十个氢原子在300k温度下其初速度满足麦克斯韦速率分布,即正比与e的(-v**2/2mkT)次方，用FORTRAN语言编程求初速度？求程序!
本人没有一点思路，请高手指点一二，谢谢！！！

[ Last edited by jianchaoyv on 2009-4-10 at 21:31 ]
回复此楼

» 猜你喜欢
1楼 2009-04-03 21:06:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sprite2791

金虫 (小有名气)
★ ★
zt970831(金币+2):感谢您的交流
十个氧原子少了点.....
可以这样，产生随机数x,(均小于1)，可以产生一个均匀分布的大的随机数，除以随机范围
ex:
random(10000),然后除以10000，得到小数
随后概率取exp(-x**2/2mkT)
随便想想的，希望有用......
赞一下(1人) 回复此楼
2楼2009-04-04 06:25:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)
谢谢楼上的，初学编程进行计算，没看懂你的意思，能说的更明白点吗？
“产生随机数x,(均小于1)，可以产生一个均匀分布的大的随机数，除以随机范围
ex:
random(10000),然后除以10000，得到小数”
怎样产生随机数？
赞一下 回复此楼
3楼2009-04-04 11:29:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ddx-k

荣誉版主 (著名写手)

骑士II
★
zt970831(金币+1):感谢您的交流
random 是fortran语言里面的一个命令，它的作用就是产生随机数。
赞一下(1人) 回复此楼
4楼2009-04-04 13:50:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)
如果各位有谁方便,能否给发一个想关程序?本人实在无从下手
赞一下 回复此楼
5楼2009-04-04 15:42:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)
顶 ！！
6楼2009-04-05 09:17:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

吃木头

《Fortran常用算法程序集【徐士良】－第二版》

我有电子版pdf，不知道里面有没有你要的相关程序，我的邮箱chilixin_1985,如果需要我可以传给你！
赞一下 回复此楼
7楼2009-05-24 09:14:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jianchaoyv 的主题更新
71/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
信息提示
关闭
请填处理意见
关闭