24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 805  |  回复: 6

zhouzh2011

银虫 (初入文坛)

[求助] 谁能帮我看看这段Fortran程序,不胜感激

谁能帮我看看这段Fortran程序,与第一性原理计算有关的,不胜感激!
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : fmg.f
  • 2012-04-12 17:24:39, 7.18 K

» 猜你喜欢

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

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

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


感谢参与,应助指数 +1
zhouzh2011: 金币+1 2012-04-12 19:45:11
啥问题呢?这都不说别人怎么看?
2楼2012-04-12 18:46:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhouzh2011

银虫 (初入文坛)

引用回帖:
2楼: Originally posted by snoopyzhao at 2012-04-12 18:46:36:
啥问题呢?这都不说别人怎么看?

呵呵,有附件,我对fortran基本不懂,我想知道这个文件执行时是怎么输入,输出的?谢谢了~
3楼2012-04-12 19:46:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

xzhdty: , 欢迎常来程序语言 2012-04-12 21:42:35
用法在文件中不是有吗?当然,除了这个之外,我也看不懂,呵呵……
CODE:
c---------------------------------------------------------------------
c     Utility program which handle the data in the file used
c     by 'cpa91' such that rearrangement of the records,
c     including the chnage in the number of the component atoms
c     and reversing of the spin direction, becomes possible.
c     Input data cards have a form like the following:
c
c     file1  1  2  3  4
c     file2  1  2 -1 -2
c
c     In this case 4 data named respectively 1, 2, 3, and 4 of
c     inout file will be output in the sequence of 1, 2, 1, 2 and
c     further the spin direction for the last two data is reversed.
c     Another example:
c
c     file1  1  2
c     file1  1  2  1  2
c
c     In this case both the input and the output files is file1, and
c     for the input only 2 data, 1 and 2, are assumed to recorded but
c     to be expanded up to 4 data in the output.
c     See inside for further detail.
c     The program uses some routines provided by 'cpasub91'.
c     coded by H. Akai, 27 aug. 1991 in Juelich
c---------------------------------------------------------------------

4楼2012-04-12 20:00:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhouzh2011

银虫 (初入文坛)

引用回帖:
4楼: Originally posted by snoopyzhao at 2012-04-12 20:00:19:
用法在文件中不是有吗?当然,除了这个之外,我也看不懂,呵呵……


c---------------------------------------------------------------------
c     Utility program which handle the data in the file u ...

呵呵,就是不是很懂,能诠释一下就好了
5楼2012-04-12 21:06:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

q1036210267

木虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
看过了。帮顶下。
我现在做的是分子模拟计算。对于你的量化计算,我表示压力很大。。
生活中坚持快乐的原则不改变,学习工作中踏实上进!`~`
6楼2012-04-14 11:48:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhouzh2011

银虫 (初入文坛)

引用回帖:
6楼: Originally posted by q1036210267 at 2012-04-14 11:48:09:
看过了。帮顶下。
我现在做的是分子模拟计算。对于你的量化计算,我表示压力很大。。

呵呵,谢谢。你能看懂 我其实不知道这个程序到底是怎样实现the chnage in the number of the component atoms
and reversing of the spin direction的,输入中的1 2 3 4又是何意义?
7楼2012-04-14 12:50:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhouzh2011 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 316求调剂 +12 舟自梗 2026-04-01 14/700 2026-04-02 17:20 by 舟自梗
[考研] 08开头看过来!!! +4 wwwwffffff 2026-03-31 6/300 2026-04-02 11:42 by 均值回归
[考研] 266分,一志愿电气工程,本科材料,求材料专业调剂 +10 哇呼哼呼哼 2026-04-01 11/550 2026-04-02 11:31 by lnilvy
[考研] 一志愿安徽大学计算机科学与技术学硕,331分求调剂 +5 蒋昌鹏qtj 2026-04-01 5/250 2026-04-02 08:10 by fxue1114
[考研] 08工科275分求调剂 +13 AaAa7420 2026-03-31 13/650 2026-04-02 06:19 by 286640313
[考研] 材料调剂 +11 一样YWY 2026-03-31 11/550 2026-04-01 22:25 by zhouyuwinner
[考研] 食品学硕362求调剂 +3 xuanxianxian 2026-04-01 3/150 2026-04-01 21:05 by 啊李999
[考研] 材料专硕调剂 +17 椰椰。 2026-03-29 17/850 2026-04-01 20:44 by cq2548
[考研] 材料专业调剂 +5 啦啦啦哭 2026-03-31 6/300 2026-04-01 16:48 by JourneyLucky
[考研] 环境工程 085701,267求调剂 +15 minht 2026-03-29 16/800 2026-04-01 10:13 by li_sujuan99
[考研] 085601英二数二求调剂 总分325 +4 余航航 2026-03-31 4/200 2026-03-31 17:38 by 唐沐儿
[考研] 343求调剂 +8 爱羁绊 2026-03-28 8/400 2026-03-31 16:12 by 不吃魚的貓
[考研] 353求调剂 +3 江上枫_26 2026-03-28 3/150 2026-03-31 15:53 by jp9609
[考研] 一志愿西电085401数一英一299求调剂 六级521 +4 爱吃大鸭梨 2026-03-31 4/200 2026-03-31 11:51 by 搏击518
[考研] 322求调剂 +10 宋明欣 2026-03-27 10/500 2026-03-30 18:47 by 544594351
[考研] 071010 323 分求调剂 +3 Baekzhy 2026-03-27 3/150 2026-03-30 14:24 by andresqi
[考研] 086000生物与医药调剂 +5 Feisty。 2026-03-28 9/450 2026-03-29 12:02 by longlotian
[考研] 332求92调剂 +8 蕉蕉123 2026-03-28 8/400 2026-03-29 10:46 by 周梓丹
[考研] 279求调剂 +4 蝶舞轻绕 2026-03-29 4/200 2026-03-29 09:45 by laoshidan
[考研] 304求调剂 +6 曼殊2266 2026-03-27 6/300 2026-03-28 14:10 by 唐沐儿
信息提示
请填处理意见