24小时热门版块排行榜    

查看: 2486  |  回复: 15
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

djh434325996

木虫 (小有名气)

[求助] 自己用Fortran编了个MC程序,模拟材料磁性随温度的变化!

用Fortran编了个Monte Carlo程序,模拟铁磁材料的Tc温度!如附件!可是我的Cv曲线一直不对!希望牛人指点!
有人写过类似的程序能否分享!
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : MC_FM-DJH-2.f90
  • 2014-10-14 22:05:06, 10.62 K

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

浔荆

木虫 (正式写手)

http://pan.baidu.com/s/1dDvPUMl
我的代码是参考这篇中文文献写的,你可以看看
9楼2014-10-18 08:07:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 16 个回答

379631818

铁杆木虫 (著名写手)

帮顶,虽然我不知道
2楼2014-10-15 08:10:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

djh434325996

木虫 (小有名气)

引用回帖:
2楼: Originally posted by 379631818 at 2014-10-15 08:10:57
帮顶,虽然我不知道

thanks!坐等大牛。

[ 发自小木虫客户端 ]
3楼2014-10-15 13:16:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

djh434325996

木虫 (小有名气)

没有大牛来帮忙!只能自己顶下了!
我的Monte Carlo代码用的是Metropolis算法,
1.选择一个初自旋态
2.改变一个格点i 的自旋,计算出能量的变化值△E
3.产生一个0-1的随机数r,如果r<exp(-△E/KBT),则改变格点i 的自旋,否则回到第二步。
4楼2014-10-15 20:19:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见