| 查看: 924 | 回复: 5 | |||
[求助]
陌生的fortran语言，哪位可以指点一二？悬赏100金币
|
最近在看程序的时候，发现一种陌生的fortran写法，参详许久，知道其用意，但是还无法参透，哪位高人指点一二，不甚感激！ |
回复此楼» 猜你喜欢
294求调剂材料与化工专硕
已经有10人回复
-
288求调剂
已经有6人回复
-
287求调剂
已经有4人回复
-
招收调剂硕士
已经有7人回复
-
085601材料工程专硕求调剂
已经有8人回复
-
一志愿武汉理工材料工程专硕调剂
已经有3人回复
-
【考研调剂】化学专业 281分，一志愿四川大学，诚心求调剂
已经有3人回复
-
281求调剂（0805）
已经有19人回复
-
材料考研调剂
已经有3人回复
-
346求调剂[0856]
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 配置一台1万左右的计算机跑Fortran程序以及高斯的计算
已经有8人回复
- Intel Visual Fortran应用程序开发
已经有259人回复
- 求高人指点用matlab求解非线性方程组，解决了追加100金币；
已经有11人回复
- 如何改变fortran的浮点精度
已经有28人回复
- 【求助】如何写FORTRAN程序实现求平均最近邻距离
已经有34人回复
- 【求助】求指点，在Fortran里面，怎样实现“数组维度可调”的数组?
已经有5人回复
- 【求助】有关fortran进行数值模拟
已经有10人回复
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
2楼2011-11-02 13:26:06
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
【答案】应助回帖
wenwuxu(金币+100): 10 2011-11-02 16:48:29
|
我猜测，你的程序中定义了 $SPEC，以及 $TYPE 两个特殊的变量，这可能是编译器的扩展，也可能用到了其它的技巧，但不是标准的可移植的特性。我猜你上面的代码等同于下面这段代码： 也就是说，这个 module 提供了一个子程序，叫 read_input(vv, d_vv)。在程序中，可以直接 call read_input(vv, d_vv)，如果 vv 和 d_vv 是整型变量，那么调用 read_input_i4，如果是双精度数，那么调用 read_input_r8，如果是单精度，那么调用 read_input_r4，呵呵…… |
3楼2011-11-02 13:47:22
4楼2011-11-02 16:48:06
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
5楼2011-11-02 17:05:34
★
jjdg(金币+1): 感谢参与 2011-12-09 00:53:49
jjdg(金币+1): 感谢参与 2011-12-09 00:53:49
|
本帖内容被屏蔽 |
6楼2011-12-08 18:33:52
