24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1108  |  回复: 8
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

malei123

新虫 (小有名气)

[交流] 【求助】怎样用Fortran语言编写bcc,fcc,hcp模型

怎样用Fortran语言编写bcc,fcc,hcp模型,大家给个流程图或者给个程序学一下
回复此楼
jisuan
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

malei123

新虫 (小有名气)

[quote]Originally posted by bay__gulf at 2009-7-10 14:45:
一段FCC 的代码,附上全部程序

CCCCCCCCCCCCC
        IJK = 0
        DO 10 LG=0,1
        DO 10 I=0,3
        DO 10 J=0,3
      DO 10 K=0,3
         IJK = IJK + 1
         X(IJK) = I * A + LG * A * 0.5
         Y(IJK ... [/q
请问一下你有没有关于计算氩的关联函数的小程序?你给我发的哪个附件程序是计算氩的,但是里面没有对关联函数的子程序,能不能指点一下?
jisuan
9楼2010-01-08 10:51:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

tianlangxingaa

铁杆木虫 (著名写手)

★ ★ ★
sunxiao(金币+2,VIP+0):欢迎参与,金币奖励 7-10 03:32
malei123(金币+1,VIP+0):好 7-10 09:31
首先你知道bcc fcc的参数就可以,然后在fortran 的node里生成粒子就ok

cheers
2楼2009-07-09 22:33:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

malei123

新虫 (小有名气)

我是FORTRAN的初学者,能不能具体的教一下,或者给个bcc的例子学一下
jisuan
3楼2009-07-10 09:36:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tianlangxingaa

铁杆木虫 (著名写手)

★ ★ ★
wangen994(金币+3,VIP+0):感谢你参与讨论 7-10 10:42
simulation cell设置成10*10*10

这里以NaCl为例子,在xyz3个向量上循环,在坐标=整数的地方生成粒子

z=0,y=0,x=0-9的对应的粒子分别是na,cl,na,cl-----交叉生成

z=0,y=0,x=10-19的对应的粒子分别是cl,na,cl,na -----交叉生成

然后一直这样下去,自己换算下关系,就ok了

得到的就是bcc
4楼2009-07-10 09:59:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 329求调剂 +6 星野? 2026-03-26 6/300 2026-03-28 14:14 by 唐沐儿
[考研] 0856求调剂 +11 zhn03 2026-03-25 12/600 2026-03-28 13:32 by 唐沐儿
[考研] 085600 286分 材料求调剂 +7 麻辣鱿鱼 2026-03-27 8/400 2026-03-28 12:17 by zllcz
[考研] 材料277求调剂 +7 min3 2026-03-24 7/350 2026-03-28 11:39 by xuxiang
[考研] 339求调剂 +6 烤麦芽 2026-03-27 8/400 2026-03-28 10:40 by 烤麦芽
[考研] 277跪求调剂 +5 1915668 2026-03-27 9/450 2026-03-28 09:58 by zhshch
[考研] 材料与化工考研调剂 +17 孅華 2026-03-22 17/850 2026-03-28 08:35 by WYUMater
[考研] 求调剂 +8 张zz111 2026-03-27 9/450 2026-03-28 03:41 by fmesaito
[考研] 085600,材料与化工321分,求调剂 +9 大馋小子 2026-03-27 9/450 2026-03-27 14:30 by mmm just
[考研] 一志愿北京化工大学材料与化工 264分各科过A区国家线 +10 哈哈157349 2026-03-21 10/500 2026-03-27 13:06 by zzll406
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 286求调剂 +4 lim0922 2026-03-26 4/200 2026-03-27 10:28 by guoweigw
[考研] 材料调剂 +8 匹克i 2026-03-23 8/400 2026-03-27 08:11 by hypershenger
[考研] 349求调剂 +4 李木子啊哈哈 2026-03-25 4/200 2026-03-26 22:49 by fmesaito
[考研] 寻找调剂 +5 倔强芒? 2026-03-21 8/400 2026-03-26 13:25 by 0906ljy
[考研] 0854电子信息求调剂 +7 α____ 2026-03-22 9/450 2026-03-25 13:37 by α____
[考研] 化工专硕求调剂 +3 question挽风 2026-03-24 3/150 2026-03-24 18:48 by jhhcooi
[考研] 求老师收我 +3 zzh16938784 2026-03-23 3/150 2026-03-23 12:56 by ztnimte
[考研] 306求调剂 +5 来好运来来来 2026-03-22 5/250 2026-03-22 16:17 by BruceLiu320
[考研] 285求调剂 +6 ytter 2026-03-22 6/300 2026-03-22 12:09 by 星空星月
信息提示
请填处理意见