版块导航
正在加载中...
客户端APP下载
登录
注册
帖子
帖子
用户
本版
应《网络安全法》要求,自2017年10月1日起,未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用,请尽快对帐号进行手机号验证,感谢您的理解与支持!
24小时热门版块排行榜
>
论坛更新日志
(2663)
>
导师招生
(581)
>
虫友互识
(411)
>
考博
(98)
>
硕博家园
(44)
>
博后之家
(41)
>
学术会议
(33)
>
基金申请
(22)
>
论文投稿
(21)
>
公派出国
(19)
>
考研
(19)
>
论文道贺祈福
(11)
>
找工作
(10)
>
教师之家
(7)
>
休闲灌水
(4)
>
留学DIY
(2)
小木虫论坛-学术科研互动平台
»
计算模拟区
»
程序语言
»
Fortran
»
谁能帮我看看这段Fortran程序,不胜感激
7
1/1
返回列表
查看: 926 | 回复: 6
只看楼主
@他人
存档
新回复提醒
(忽略)
收藏
在APP中查看
zhouzh2011
银虫
(初入文坛)
应助: 4
(幼儿园)
金币: 469.1
帖子: 45
在线: 137.1小时
虫号: 1484198
注册: 2011-11-09
性别:
MM
专业: 凝聚态物性 II :电子结构
[
求助
]
谁能帮我看看这段Fortran程序,不胜感激
谁能帮我看看这段Fortran程序,与第一性原理计算有关的,不胜感激!
回复此楼
» 本帖附件资源列表
欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
附件 1 :
fmg.f
2012-04-12 17:24:39, 7.18 K
» 猜你喜欢
售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急
已经有5人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有6人回复
售一区SCI文章T0P,我:8O.551.O54,科目全,可十急
已经有7人回复
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
已经有6人回复
售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急
已经有10人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有8人回复
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
已经有9人回复
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
已经有5人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有8人回复
售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急
已经有13人回复
» 本主题相关价值贴推荐,对您同样有帮助:
大家帮看看这段话什么意思
已经有3人回复
求高人帮忙看一下我这个Fortran程序的错误出在哪里?
已经有12人回复
烟台万润的在线测评具体是什么题,知道的高手进来帮帮忙,不胜感激
已经有32人回复
有会看fortran程序的,能帮忙看看这个程序吗?
已经有10人回复
我编的Simpson积分法fortran程序给不出结果,大侠们看看哪里出了问题?
已经有4人回复
帮忙翻译一下 这是论文摘要 急。。。。。 不胜感激。。。。
已经有2人回复
向高手求助,希望有机牛人能帮帮忙,小女不胜感激!!!!!
已经有8人回复
无机纳米化学专业,请教高手翻译一段话,不胜感激!
已经有1人回复
有关fortran的一次而问题,希望大家能帮帮忙,谢谢
已经有4人回复
写了一个fortran90的小程序,编译通不过,请大侠帮忙
已经有59人回复
【求助】如何写FORTRAN程序实现求平均最近邻距离
已经有34人回复
【求助】用fortran怎么描述下面这样的情况,我是新手,请大家帮忙
已经有8人回复
1楼
2012-04-12 17:25:23
已阅
回复此楼
关注TA
给TA发消息
送TA红花
TA的回帖
snoopyzhao
至尊木虫
(职业作家)
程序强帖: 16
应助: 157
(高中生)
贵宾: 0.02
金币: 18844.7
红花: 29
帖子: 3803
在线: 1422.4小时
虫号: 183750
注册: 2006-02-13
专业: 污染生态化学
【答案】应助回帖
★
感谢参与,应助指数 +1
zhouzh2011: 金币+1
2012-04-12 19:45:11
啥问题呢?这都不说别人怎么看?
赞
一下
回复此楼
高级回复
2楼
2012-04-12 18:46:36
已阅
回复此楼
关注TA
给TA发消息
送TA红花
TA的回帖
zhouzh2011
银虫
(初入文坛)
应助: 4
(幼儿园)
金币: 469.1
帖子: 45
在线: 137.1小时
虫号: 1484198
注册: 2011-11-09
性别:
MM
专业: 凝聚态物性 II :电子结构
引用回帖:
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
至尊木虫
(职业作家)
程序强帖: 16
应助: 157
(高中生)
贵宾: 0.02
金币: 18844.7
红花: 29
帖子: 3803
在线: 1422.4小时
虫号: 183750
注册: 2006-02-13
专业: 污染生态化学
【答案】应助回帖
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
(幼儿园)
金币: 469.1
帖子: 45
在线: 137.1小时
虫号: 1484198
注册: 2011-11-09
性别:
MM
专业: 凝聚态物性 II :电子结构
引用回帖:
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
木虫
(正式写手)
应助: 26
(小学生)
金币: 2182.2
散金: 806
红花: 4
帖子: 893
在线: 262.1小时
虫号: 1346635
注册: 2011-07-15
性别: GG
专业: 药物化学
【答案】应助回帖
感谢参与,应助指数 +1
看过了。帮顶下。
我现在做的是分子模拟计算。对于你的量化计算,我表示压力很大。。
赞
一下
回复此楼
生活中坚持快乐的原则不改变,学习工作中踏实上进!`~`
6楼
2012-04-14 11:48:09
已阅
回复此楼
关注TA
给TA发消息
送TA红花
TA的回帖
zhouzh2011
银虫
(初入文坛)
应助: 4
(幼儿园)
金币: 469.1
帖子: 45
在线: 137.1小时
虫号: 1484198
注册: 2011-11-09
性别:
MM
专业: 凝聚态物性 II :电子结构
引用回帖:
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
的主题更新
7
1/1
返回列表
如果回帖内容含有宣传信息,请如实选中。否则帐号将被全论坛禁言
普通表情
龙
兔
虎
猫
百度网盘
|
360云盘
|
千易网盘
|
华为网盘
在新窗口页面中打开自己喜欢的网盘网站,将文件上传后,然后将下载链接复制到帖子内容中就可以了。
最具人气热帖推荐
[查看全部]
作者
回/看
最后发表
[
基金申请
]
售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急
+4
hKe7U1kad5Sg
2026-10-31
10/500
2026-11-02 06:16
by
xzcv0Tehd8lQ
[
考研
]
售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急
+5
xvJS1BYDxvBS
2026-10-31
13/650
2026-11-02 06:03
by
xzcv0Tehd8lQ
[
论文投稿
]
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
+4
xvJS1BYDxvBS
2026-10-31
10/500
2026-11-02 06:00
by
xzcv0Tehd8lQ
[
硕博家园
]
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
+5
xvJS1BYDxvBS
2026-10-31
11/550
2026-11-02 06:00
by
xzcv0Tehd8lQ
[
基金申请
]
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
+4
1uaZt2kAZj2S
2026-10-30
17/850
2026-11-02 05:50
by
xzcv0Tehd8lQ
[
考研
]
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
+5
1uaZt2kAZj2S
2026-10-30
16/800
2026-11-02 05:47
by
xzcv0Tehd8lQ
[
论文投稿
]
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
+4
1uaZt2kAZj2S
2026-10-30
14/700
2026-11-02 05:41
by
xzcv0Tehd8lQ
[
考研
]
售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急
+4
1uaZt2kAZj2S
2026-10-30
21/1050
2026-11-02 05:41
by
xzcv0Tehd8lQ
[
考博
]
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
+5
1uaZt2kAZj2S
2026-10-30
18/900
2026-11-02 05:34
by
xzcv0Tehd8lQ
[
论文投稿
]
售SCI文章,我:8O.5.5.1O.54,科目全,可十急
+6
X5bHxOULxFqb
2026-10-30
27/1350
2026-11-02 05:28
by
xzcv0Tehd8lQ
[
基金申请
]
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
+7
X5bHxOULxFqb
2026-10-30
24/1200
2026-11-02 02:39
by
xzcv0Tehd8lQ
[
博后之家
]
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
+3
hKe7U1kad5Sg
2026-10-31
5/250
2026-11-01 22:24
by
xzcv0Tehd8lQ
[
考博
]
售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急
+3
hKe7U1kad5Sg
2026-10-31
6/300
2026-11-01 22:11
by
xzcv0Tehd8lQ
[
考博
]
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
+5
1uaZt2kAZj2S
2026-10-31
7/350
2026-11-01 21:45
by
xzcv0Tehd8lQ
[
公派出国
]
售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急
+4
1uaZt2kAZj2S
2026-10-30
15/750
2026-11-01 16:52
by
BCdvBAEpt3zm
[
找工作
]
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
+4
1uaZt2kAZj2S
2026-10-31
8/400
2026-11-01 14:48
by
BCdvBAEpt3zm
[
基金申请
]
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
+3
xvJS1BYDxvBS
2026-10-31
3/150
2026-11-01 12:53
by
BCdvBAEpt3zm
[
考研
]
售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急
+3
xvJS1BYDxvBS
2026-10-31
5/250
2026-11-01 12:51
by
BCdvBAEpt3zm
[
考研
]
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
+4
1uaZt2kAZj2S
2026-10-31
8/400
2026-11-01 12:38
by
BCdvBAEpt3zm
[
考研
]
售SCI文章,我:8O.5.5.1O.54,科目全,可十急
+3
1uaZt2kAZj2S
2026-10-30
16/800
2026-11-01 12:14
by
BCdvBAEpt3zm
信息提示
关闭
请填处理意见
关闭
确定