24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 742  |  回复: 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

木虫 (正式写手)

谢谢楼上的回复,只是您还否再帮忙解释一下datsw的含义呢?
3楼2009-08-05 19:23:00
已阅   回复此楼   关注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的回帖

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的回帖

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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿211 初试270分 求调剂 +8 谷雨上岸 2026-03-23 9/450 2026-03-29 01:00 by 我是小康
[硕博家园] 求调剂 有机化学考研356分 +3 Nadiums 2026-03-25 4/200 2026-03-29 00:50 by 544594351
[考研] 材料学硕333求调剂 +10 北道巷 2026-03-24 10/500 2026-03-28 23:06 by 无际的草原
[考研] 0856材料化工调剂 总分330 +11 zhubinhao 2026-03-27 11/550 2026-03-28 20:22 by 418490947
[考研] 材料与化工272求调剂 +9 阿斯蒂芬2004 2026-03-28 9/450 2026-03-28 15:21 by 1018329917
[考研] 调剂 +3 好好读书。 2026-03-28 3/150 2026-03-28 12:04 by 王保杰33
[考研] 291求调剂 +6 HanBeiNingZC 2026-03-24 6/300 2026-03-28 07:55 by baoball
[考研] 085701环境工程求调剂 +9 多久上课 2026-03-27 9/450 2026-03-28 03:58 by fmesaito
[考研] 330一志愿中国海洋大学 化学工程 085602 有读博意愿 求调剂 +3 wywy.. 2026-03-27 4/200 2026-03-28 03:32 by fmesaito
[考研] 265求调剂11408 +3 刘小鹿lu 2026-03-27 3/150 2026-03-27 20:53 by nihaoar
[考研] 266分求材料化工冶金矿业等专业的调剂 +4 哇呼哼呼哼 2026-03-26 4/200 2026-03-27 17:02 by zhyzzh
[考研] 085600,材料与化工321分调剂 +4 大馋小子 2026-03-27 6/300 2026-03-27 14:11 by 松花缸1201
[考研] 322求调剂 +4 我真的很想学习 2026-03-23 4/200 2026-03-27 13:51 by 杨杨杨紫
[考研] 材料求调剂 +5 .m.. 2026-03-25 5/250 2026-03-27 11:08 by 不吃魚的貓
[考研] 085601求调剂总分293英一数二 +4 钢铁大炮 2026-03-24 4/200 2026-03-26 16:28 by dick_runner
[考研] 化学调剂一志愿上海交通大学336分-本科上海211 +4 小鱼爱有机 2026-03-25 4/200 2026-03-26 10:19 by aa331100
[考研] 0854人工智能方向招收调剂 +4 章小鱼567 2026-03-24 4/200 2026-03-25 13:29 by 2177681040
[考研] 接收2026硕士调剂(学硕+专硕) +4 allen-yin 2026-03-23 6/300 2026-03-23 15:04 by 汪!?!
[考研] 328求调剂 +4 LHHL66 2026-03-23 4/200 2026-03-23 14:55 by lbsjt
[考研] 070300,一志愿北航320求调剂 +3 Jerry0216 2026-03-22 5/250 2026-03-23 09:16 by 。。堂堂
信息提示
请填处理意见