| 查看: 882 | 回复: 13 | |||
| 当前主题已经存档。 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
【求助结束】请帮忙解释call datsw（）语句的含义
|
|||
|
我对照Fortran 77 书籍阅读一段老程序，其中有一段： c output dataswitch 0 up for table, 1 up for punch call datsw (0,k) go to (951,950),k 其中，datsw是什么功能？另外变量K是从哪里冒出来的？前面的程序也没有提到，是不是有什么特殊含义？请各位高手帮忙解释一下这段程序。谢谢！ [ Last edited by zzhhmc on 2009-8-24 at 10:32 ] |
回复此楼» 猜你喜欢
哈尔滨工业大学韩晓军教授课题组招收2027年硕士推免生及博士研究生
已经有3人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有8人回复
-
售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急
已经有8人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有9人回复
-
找导师
已经有8人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有5人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有9人回复
-
面上没中，邀请各位路过的虫友分析一下分数
已经有3人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有8人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有11人回复
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
4楼2009-08-05 20:35:47
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
2楼2009-08-05 18:59:57
3楼2009-08-05 19:23:00
| 谢谢回复，我看到的源程序很长，也没有电子版，无法发上来。但我在google中搜索看到了类似的datsw()语句。http://ftp.ccp14.dl.ac.uk/ccp/cc ... RCE/CRYST/EQUIV.FOR 。看起来datsw()应该是一个标准语句啊，不知有没有谁用过？望赐教！ |
5楼2009-08-06 16:43:33
5