24小时热门版块排行榜    

查看: 410  |  回复: 2

a5200259494

金虫 (初入文坛)

[求助] Fortran 语言求助

C

      CHARACTER*80 MATERL

……

         IF ((NOEL.EQ.4866).OR.(NOEL.EQ.5396)) THEN

             STATEV(1)=PROPS(3)*1.002D0

         ENDIF

……

想把if 语句后面的条件多加几个数据,比如(NOEL.EQ.4866).OR.(NOEL.EQ.5396).OR.(NOEL.EQ.1234).OR.(NOEL.EQ.5421)  ……加一个还可以(2个OR,三个数字),但是多加了2个数据以上发现数据行太长,于是我就换行。试过直接回车 换;也试过在第一行后面和第二行开头加&,都不行。哪位高手好心人给指点指点,这样的换行应该怎么样写,还是.OR.语句不能加到三个以上?请举个例子,比如说我要写(NOEL.EQ.4866).OR.(NOEL.EQ.5396).OR.(NOEL.EQ.1234).OR.(NOEL.EQ.5421).OR.(NOEL.EQ.4846).OR.(NOEL.EQ.5346).OR.(NOEL.EQ.1244).OR.(NOEL.EQ.5441)……,中间应该怎么换?还是应该换种语句?非常感谢!!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

seaharrier

铁杆木虫 (知名作家)

帝国空军中将

【答案】应助回帖

F77格式:在第六列加任意字符(*,%,&等)表示续行
F90格式:在行末加   &
Patienceisbitter,butitsfruitissweet.
2楼2011-12-07 00:10:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

a5200259494

金虫 (初入文坛)

引用回帖:
2楼: Originally posted by seaharrier at 2011-12-07 00:10:10:
F77格式:在第六列加任意字符(*,%,&等)表示续行
F90格式:在行末加   &

可不可以用“IF ((NOEL.EQ.4866).OR.(NOEL.EQ.5396).OR.(NOEL.EQ.1234).OR.(NOEL.EQ.5421).OR.(NOEL.EQ.4846).OR.(NOEL.EQ.5346).OR.(NOEL.EQ.1244).OR.(NOEL.EQ.5441)) THEN”举个例子?

试过用上一行&结尾,下一行用&开头,或是直接用( 数字 .EQ. 开头,都无效,非常感谢!!
3楼2011-12-07 10:07:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 a5200259494 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 276求调剂 +5 路lyh123 2026-02-28 6/300 2026-03-02 20:35 by hypershenger
[考研] 085600求调剂 +4 LRZZZZZZ 2026-03-02 5/250 2026-03-02 20:33 by 云旗yunqi
[考研] 0856材料与化工,270求调剂 +9 YXCT 2026-03-01 10/500 2026-03-02 20:30 by hypershenger
[考研] 环境调剂 +4 chenhanheng 2026-03-02 4/200 2026-03-02 20:23 by hypershenger
[考研] 材料270求调剂 6+4 Eiiiio 2026-03-01 7/350 2026-03-02 20:17 by hypershenger
[考研] 268求调剂 +7 简单点0 2026-03-02 9/450 2026-03-02 20:10 by 简单点0
[考研] 材料类考研调剂 +3 gemmgemm 2026-03-01 4/200 2026-03-02 20:02 by hypershenger
[考研] 材料复试调剂 +5 学材料的点 2026-03-01 6/300 2026-03-02 20:01 by hypershenger
[考研] 调剂 +3 13853210211 2026-03-02 3/150 2026-03-02 19:59 by hypershenger
[考研] 化学,材料,环境类求调剂 +7 考研版棒棒 2026-03-02 7/350 2026-03-02 19:56 by hypershenger
[考研] 302材料工程求调剂 +5 Doleres 2026-03-01 6/300 2026-03-02 19:53 by 张晓芳0105
[考研] 材料085601调剂 +5 多多子. 2026-03-02 5/250 2026-03-02 19:15 by zhukairuo
[考研] 接收调剂 +6 津萌津萌 2026-03-02 13/650 2026-03-02 18:34 by fengyuling00
[考研] 一志愿东北大学材料专硕328,求调剂 +3 shs1083 2026-03-02 3/150 2026-03-02 17:27 by houyaoxu
[考研] 材料与化工328求调剂 +3 。,。,。,。i 2026-03-02 3/150 2026-03-02 13:09 by houyaoxu
[考研] 调剂 +3 13853210211 2026-03-02 4/200 2026-03-02 10:16 by 13853210211
[考研] 材料学调剂 +10 提神豆沙包 2026-02-28 12/600 2026-03-02 09:26 by 李老师!
[考研] 298求调剂 +6 axyz3 2026-02-28 6/300 2026-03-01 19:00 by 18137688336
[考研] 313求调剂 +3 水流年lc 2026-02-28 3/150 2026-03-01 16:01 by 新能源达人
[考研] 307求调剂 +4 73372112 2026-02-28 6/300 2026-03-01 00:04 by ll247
信息提示
请填处理意见