24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 748  |  回复: 13
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

zzhhmc

木虫 (正式写手)

[交流] 【求助结束】请帮忙解释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 ]
回复此楼

» 猜你喜欢

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

zzhhmc

木虫 (正式写手)

谢谢回复,我看到的源程序很长,也没有电子版,无法发上来。但我在google中搜索看到了类似的datsw()语句。http://ftp.ccp14.dl.ac.uk/ccp/cc ... RCE/CRYST/EQUIV.FOR  。看起来datsw()应该是一个标准语句啊,不知有没有谁用过?望赐教!
5楼2009-08-06 16:43:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 14 个回答

snoopyzhao

至尊木虫 (职业作家)


spc08(金币+1,VIP+0):感谢交流 8-5 20:58
datsw 是什么功能,要看 datsw 的定义,呵呵……

K 是 datsw 这个函数的返回值。
2楼2009-08-05 18:59:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zzhhmc

木虫 (正式写手)

谢谢楼上的回复,只是您还否再帮忙解释一下datsw的含义呢?
3楼2009-08-05 19:23:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

★ ★
spc08(金币+1,VIP+0):欢迎常来 8-5 20:59
gwdavid(金币+1,VIP+0):3q 8-9 01:25
datsw 又不是标准函数,你也没有给出它的源码,如何解释其含义呢?通过字面意思?

从注释上看,似乎可以说是 dataswitch,但这是啥,谁知道呢?
4楼2009-08-05 20:35:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 298求调剂 +4 种圣赐 2026-03-28 4/200 2026-03-29 08:42 by q1092522407
[考研] 调剂求院校招收 +6 鹤鲸鸽 2026-03-28 6/300 2026-03-29 08:15 by fmesaito
[考研] 291求调剂 +3 Y-cap 2026-03-29 3/150 2026-03-29 07:34 by 无际的草原
[考研] 086000生物与医药调剂 +4 Feisty。 2026-03-28 8/400 2026-03-29 07:32 by 云游重阳
[考研] 0703 化学 求调剂,一志愿山东大学 342 分 +4 Shern—- 2026-03-28 4/200 2026-03-29 00:47 by 544594351
[考研] 085600,专业课化工原理,321分求调剂 +4 大馋小子 2026-03-28 4/200 2026-03-29 00:32 by 544594351
[考研] 315求调剂 +4 akie... 2026-03-28 5/250 2026-03-28 21:05 by zhq0425
[考研] 一志愿北京工业大学,324分求调剂 +4 零八# 2026-03-28 4/200 2026-03-28 15:01 by 17865157980
[考研] 085600 286分 材料求调剂 +7 麻辣鱿鱼 2026-03-27 8/400 2026-03-28 12:17 by zllcz
[考研] 286求调剂 +12 PolarBear11 2026-03-26 12/600 2026-03-28 12:14 by zllcz
[考研] 材料求调剂一志愿哈工大324 +7 闫旭东 2026-03-28 9/450 2026-03-28 08:51 by Xu de nuo
[考研] 材料与化工085600,总分304,本科有两篇sci参与,求调剂 +10 幸运的酱酱 2026-03-22 12/600 2026-03-27 16:08 by muchong357
[考研] 安徽大学专硕生物与医药专业(086000)324分,英语已过四六级,六级521,求调剂 +4 美味可乐鸡翅 2026-03-26 4/200 2026-03-27 15:27 by 星空星月
[考研] 085600,材料与化工321分调剂 +4 大馋小子 2026-03-27 6/300 2026-03-27 14:11 by 松花缸1201
[考研] 调剂求收留 +7 果然有我 2026-03-26 7/350 2026-03-27 00:26 by wxiongid
[考研] 085601求调剂总分293英一数二 +4 钢铁大炮 2026-03-24 4/200 2026-03-26 16:28 by dick_runner
[考研] 263求调剂 +6 yqdszhdap- 2026-03-22 10/500 2026-03-26 13:11 by 公瑾逍遥
[考研] 293求调剂 +7 加一一九 2026-03-24 7/350 2026-03-25 12:02 by userper
[考研] 化工专硕求调剂 +3 question挽风 2026-03-24 3/150 2026-03-24 18:48 by jhhcooi
[考研] 344求调剂 +3 desto 2026-03-24 3/150 2026-03-24 10:09 by 搏击518
信息提示
请填处理意见