24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1009  |  回复: 2

songjunann

铜虫 (小有名气)

[求助] 请教Fortran fixed format 文件的换行问题,谢谢

在Fortran free format source file里面,如下换行语句是没问题的(在前一行末尾一个&,下一行开头一个&)
open(1,FILE='G:\Program Files\Fortranprogram\fej&
     &        \pato\0802.dat)
但是在Fortran fixed format source file里,上述换行语句有问题的,所以我请教在 fixed format 下,上述语句要怎么改,使得换行也可以。谢谢

另外请教一下,在compaq VF里面,文件后缀有.f , .f90, .for,这三个文件有什么区别吗?.for是fortran77吗?.f 是f90和for两者都可以代表?谢谢
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
songjunann(金币+5): 谢谢,不过好像换行的方法,第二种途径我试了一下不行,这种路径的换行跟表达式的不一样 2011-08-06 10:23:13
jjdg(金币+2): 感谢参与 2011-08-06 15:29:57
fixed format中,有两种途径:

1)把第一行的 & 删掉;这种修改结果用 free format 方式没有办法编译;
2)把第一行的 & 放到第 73~80 列上,这样,在 fix format 中它会被忽略,因为 fix format 的有效宽度是 1~72 列,其中 7~72 列是源代码,6 是续行,1~5 是标号,73~80 一般可以用作行的序号,但会被编译器忽略。

因此,你用第二种方法可以保证你在任何情况下都不会出错,呵呵……

.f 和 .for 一般认为是 fix format 的,而 .f90 一般认为是 free format 的……
2楼2011-08-06 08:33:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
songjunann(金币+10): Ok,用这个方法可以,厉害啊 2011-08-06 11:45:35
jjdg(金币+2): 感谢参与 2011-08-06 15:30:04
哦,我没有看清楚你的问题,抱歉……

你的那个应该这么来做:
CODE:
      open(1,FILE='G:\Program Files\Fortranprogram\fej'//
     &        '\pato\0802.dat')

当然,你的路径中能不能用 \ 我就不清楚了……
3楼2011-08-06 11:17:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 songjunann 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿0817化学工程与技术,求调剂 +3 我不是只因 2026-04-02 4/200 2026-04-02 21:50 by barlinike
[考研] 315求调剂 +10 小羊小羊_ 2026-04-02 10/500 2026-04-02 21:20 by 1104338198
[考研] 一志愿北京科技材料科学与工程288分,求调剂 +14 是辰啊 2026-04-02 14/700 2026-04-02 21:10 by dongzh2009
[考研] 一志愿郑大材料工程290求调剂 +20 Youth_ 2026-03-30 20/1000 2026-04-02 14:48 by 5896
[考研] 261求B区调剂 +5 明仔· 2026-04-01 7/350 2026-04-02 11:17 by 邹尉尉
[考研] 一志愿北交大材料工程总分358 +8 cs0106 2026-04-01 9/450 2026-04-02 10:36 by 不吃魚的貓
[考研] 调剂 +3 好好读书。 2026-04-01 3/150 2026-04-01 17:06 by zhouyuwinner
[硕博家园] 考研调剂 +5 骆驼男人 2026-04-01 5/250 2026-04-01 14:28 by syjjj0321
[考研] 085410人工智能 初试316分 求调剂 +3 残星拂曙 2026-03-31 3/150 2026-04-01 11:09 by 小熊raider
[考研] 322求调剂 +8 三水sss 2026-04-01 8/400 2026-04-01 10:19 by 唐沐儿
[考研] 352分-085602-一志愿985 +6 海纳百川Ly 2026-03-29 6/300 2026-03-31 21:06 by yuq
[考研] 375求调剂 +7 雨夏整夜 2026-03-29 7/350 2026-03-31 18:52 by xhai2011
[考研] 江苏苏北高校诚邀调剂同学 +3 zzll406 2026-03-31 3/150 2026-03-31 16:54 by 及时行乐fan
[考研] 物理学调剂 +4 小羊36 2026-03-30 4/200 2026-03-31 16:16 by lishahe
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[考研] 298求调剂 +3 种圣赐 2026-03-29 3/150 2026-03-29 12:06 by longlotian
[考研] 343求调剂 +6 爱羁绊 2026-03-29 6/300 2026-03-29 12:00 by 无际的草原
[考研] 数一英一271专硕(085401)求调剂,可跨 +7 前行必有光 2026-03-28 8/400 2026-03-28 23:22 by 小木虫tim
[考研] 331环境科学与工程求调剂 +3 熠然好运气 2026-03-27 3/150 2026-03-28 04:11 by fmesaito
[考研] 265求调剂 +8 小木虫085600 2026-03-27 8/400 2026-03-27 22:16 by 无际的草原
信息提示
请填处理意见