24小时热门版块排行榜    

Znn3bq.jpeg
查看: 2672  |  回复: 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的回帖

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的回帖
查看全部 16 个回答

379631818

铁杆木虫 (著名写手)

帮顶,虽然我不知道
2楼2014-10-15 08:10:57
已阅   回复此楼   关注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的回帖

浔荆

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
djh434325996: 金币+20, ★★★很有帮助 2014-10-17 20:00:28
djh434325996: 金币+10 2014-10-17 20:00:51
楼主编程习惯不太好啊,这个代码让人没有看下去的欲望
ising模型我前几个月也做过一个,当时也是新手,很多地方写的不是很规范,楼主可以参考一下,有问题一起交流。
http://pan.baidu.com/disk/home
5楼2014-10-17 18:35:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 366求调剂 +9 不知名的小卅 2026-04-11 9/450 2026-04-13 01:19 by 幸免 ..
[考研] 290调剂生物0860 +28 哇哈哈,。 2026-04-11 31/1550 2026-04-13 01:16 by 幸免 ..
[考研] 一志愿安大生物学07初试322、本科二本、调剂求助 +10 李多米lee. 2026-04-12 11/550 2026-04-12 22:58 by yuyin1233
[考研] 271求调剂 +22 2261744733 2026-04-11 22/1100 2026-04-12 22:13 by fqwang
[考研] 346分,工科0854求调剂,专硕 +6 moser233 2026-04-12 7/350 2026-04-12 22:11 by fqwang
[考研] 求调剂,一志愿材料科学与工程985,365分, +8 材化李可 2026-04-11 10/500 2026-04-12 08:42 by 852137818
[考研] 316求调剂 +5 想读研究生( ?∵ 2026-04-07 5/250 2026-04-12 00:43 by 蓝云思雨
[考研] 280求调剂 +7 兮兮夜夜 2026-04-09 10/500 2026-04-12 00:33 by 蓝云思雨
[考研] 300分求调剂 (085501机械专硕,本科扬大) +8 xu@841019 2026-04-11 8/400 2026-04-11 10:46 by qingpingzhu
[考研] 085410-273求调剂 +6 X1999 2026-04-10 6/300 2026-04-11 10:32 by Delta2012
[考研] 282,求调剂 +12 jggshjkkm 2026-04-09 14/700 2026-04-11 09:39 by 猪会飞
[考研] 调剂 化学 307 +21 73372112 2026-04-09 23/1150 2026-04-10 23:53 by wj165256
[考研] 材料化工总分334求调剂 +16 Riot2025 2026-04-08 17/850 2026-04-09 20:19 by maddjdld
[考研] 一志愿华工085600 331分 +6 天下ww 2026-04-09 6/300 2026-04-09 18:59 by l_paradox
[考研] 一志愿中科院105500专业总分315求调剂 +6 lallalh 2026-04-09 7/350 2026-04-09 17:51 by lallalh
[考研] 334求调剂 +16 Riot2025 2026-04-08 17/850 2026-04-09 09:28 by wdyheheeh
[考研] 材料调剂 +14 一样YWY 2026-04-06 14/700 2026-04-08 23:00 by 猪会飞
[考研] 307求调剂 +14 超级伊昂大王 2026-04-06 14/700 2026-04-08 07:03 by 无际的草原
[考研] 求考研材料调剂 +3 材化李可 2026-04-07 3/150 2026-04-08 00:21 by JourneyLucky
[考研] 计算机11408 287 求调剂 +3 LiLe5 2026-04-07 3/150 2026-04-07 23:15 by shanqishi
信息提示
请填处理意见