| 查看: 454 | 回复: 4 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】看不懂这个是什么意思【已解决】
|
|||
|
octupus里面有一句这样的： call R_FUNC(hamiltonian_eigenval) (h, sys, 1, sys%st%nst) ! eigenvalues 怎么变量还是两个括号分开呀？不明白，请高手指点，初识fortran90,多谢高手指点  [ Last edited by nono2009 on 2009-12-15 at 14:55 ] |
回复此楼» 猜你喜欢
球磨粉体时遇到了大的问题，请指教！
已经有13人回复
-
情人节自我反思：在爱情中有过遗憾吗？
已经有5人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有6人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有9人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有8人回复
-
江汉大学解明教授课题组招博士研究生/博士后
已经有3人回复
senlia
木虫 (小有名气)
- 应助: 2 (幼儿园)
- 贵宾: 3.521
- 金币: 2178.1
- 红花: 1
- 帖子: 223
- 在线: 6.7小时
- 虫号: 849005
- 注册: 2009-09-16
- 性别: GG
- 专业: 计算数学与科学工程计算
2楼2009-12-15 14:33:24
tjyl
金虫 (正式写手)
- 程序强帖: 2
- 应助: 0 (幼儿园)
- 金币: 3218.1
- 红花: 2
- 帖子: 576
- 在线: 156.6小时
- 虫号: 765184
- 注册: 2009-05-07
- 专业: 生物无机化学
- 管辖: 程序语言
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
stereochemistry(金币+10,VIP+0):多写高手指点，我仔细看看，先奉上10金 12-15 14:43
nono2009(金币+3,VIP+0):谢谢应助！学习了。 12-15 14:46
nono2009(金币+10,VIP+0):代发应助奖励！ 12-15 14:54
stereochemistry(金币+10,VIP+0):多写高手指点，我仔细看看，先奉上10金 12-15 14:43
nono2009(金币+3,VIP+0):谢谢应助！学习了。 12-15 14:46
nono2009(金币+10,VIP+0):代发应助奖励！ 12-15 14:54
|
这个应该是使用了宏吧，有的编译器支持。 R_FUNC(x) 应该是一个带参数的宏 估计定义是 #define R_FUNC(x) x 编译前预处理器做替换 实际等同用 call hamiltonian_eigenval (h, sys, 1, sys%st%nst) 个人猜测，你检查一下代码里是不是又hamiltonian_eigenval的定义。 |
3楼2009-12-15 14:40:34
4楼2009-12-15 14:47:43
5楼2009-12-15 14:52:37