24小时热门版块排行榜    

查看: 604  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

cheenor

新虫 (初入文坛)

[交流] 【求助】二进制文件写入的问题 谢谢各位啊 已有2人参与

ibyte=4
open(600,file='AERO2.dat',form='UNFORMATTED',access='direct',recl=196*134*ibyte)
do kn=1,5
do j=ylat,1,-1
do i=1,xlon
write(600,rec=kn)sums(i,j,kn)
endo
endo
enddo
close(600)
说明:
sums里是有数据的,sums数据是从十进制文件(txt)中读入的,没什么问题。但写出的文件是空的,编译器PGI写出的文件大小513kb 里面没有数据,编译器compaq VF 6.6 写出的文件大小约为2MB,但也是空的,恳请帮助!!谢谢!!!
ylat=134   xlon=196ibyte=4

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

muri

木虫 (著名写手)


小木虫(金币+0.5):给个红包,谢谢回帖交流
好久没用FORTRAN了
不记得怎么用了
战胜自我,成功在握!
3楼2010-11-30 09:13:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

所里的

木虫 (著名写手)

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
xuliforever(金币+1):欢迎交流。 2010-11-28 21:54:35
感觉好像是recl出问题了,你去动力论坛看看,那里高手多
2楼2010-11-28 21:29:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 国自然评审意见 +10 wangmingqi 2026-08-28 12/600 2026-08-28 22:06 by water_still
[基金申请] 为什么资助数各大高校都创新高,自己申请怎么就这么难 +11 Kittylucky 2026-08-27 12/600 2026-08-28 16:26 by lyxiaomc
[基金申请] 有没有仍没收到信息的 +3 德尚中行 2026-08-27 3/150 2026-08-28 15:24 by rongshuxia
[基金申请] 基金不中,共勉 +11 eulota 2026-08-26 11/550 2026-08-28 14:22 by 火星超人xi
[基金申请] 麻烦专家们看看评委们的意见(F口面上) +4 gdd2018 2026-08-28 9/450 2026-08-28 14:22 by jklily
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[基金申请] 哪位高人中了,把查询到的截图贴出来让我看看,让我长长见识 +5 yuleib84 2026-08-26 6/300 2026-08-28 00:02 by yudaoqian88
[基金申请] 面上合作单位盖章 +5 ssyjh 2026-08-27 5/250 2026-08-27 20:50 by gdfollow
[基金申请] 申请删除本帖 +6 lyz123lyz 2026-08-27 7/350 2026-08-27 17:31 by 宁静致远sy
[基金申请] 怎么看青基中了没有啊 +5 叶九微 2026-08-26 5/250 2026-08-27 10:35 by l_zh2008
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 系统进不去 +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
信息提示
请填处理意见