应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 格式问题
北京石油化工学院2026年研究生招生接收调剂公告
292/3返回列表上一页123下一页
查看: 857  |  回复: 28
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
本帖产生 1 个 程序强帖 ，点击这里进行查看

snoopyzhao

至尊木虫 (职业作家)
引用回帖:
Originally posted by 贺仪 at 2011-04-26 19:28:42:
这个另外有定义，但是你编译时，前面没有错误吗？

你不给这个定义，自然进行不下去，仅就前面而言，没有错误……
赞一下 回复此楼
11楼2011-04-26 21:49:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
引用回帖:
Originally posted by snoopyzhao at 2011-04-26 21:49:55:
你不给这个定义，自然进行不下去，仅就前面而言，没有错误……

我在编译的时候，前面就有错误呀……
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
12楼2011-04-26 22:12:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
★ ★ ★
余泽成(金币+3): 辛苦了！ 2011-04-26 23:22:33
引用回帖:
Originally posted by 贺仪 at 2011-04-26 22:12:33:
我在编译的时候，前面就有错误呀……

这就是你那段代码的编译错误信息……
CODE:
ztt.f90:28.23:

          ALLOCATE(coef(npw))
                      1
Error: Syntax error in ALLOCATE statement at (1)
ztt.f90:29.21:

          ALLOCATE(ac(npw,200))
                    1
Error: Syntax error in ALLOCATE statement at (1)
ztt.f90:32.40:

               read(12,*) eval, fweight, (coef(i),i=1,npw)
                                       1
Error: Expected variable in READ statement at (1)
ztt.f90:40.41:

                       ac(i,ic) = coef(i)
                                        1
Error: Unexpected STATEMENT FUNCTION statement at (1)
ztt.f90:35.57:

        write(19,'(5X,I3,5X,f8.4,5x,f8.4)') iband, dreal(eval), fweight
                                                        1
Error: Type of argument 'a' in call to 'dreal' at (1) should be COMPLEX(8), not REAL(4)
ztt.f90:46.26:

           DEALLOCATE(coef)
                         1
Error: Expression in DEALLOCATE statement at (1) must be ALLOCATABLE or a POINTER
赞一下(1人) 回复此楼
13楼2011-04-26 22:49:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
引用回帖:
Originally posted by snoopyzhao at 2011-04-26 22:49:03:
这就是你那段代码的编译错误信息……

[code]
ztt.f90:28.23:

          ALLOCATE(coef(npw))
                      1
Error: Syntax error in ALLOCATE statement at (1)
ztt.f90:29.21:

       ...

这是我编译时的错误，gfortran 和 ifort都在   100  FORMAT('k-point #',I3,':  ',(3f7.4),'    npw=',I6)这一步提示错误。以下是gfortran的编译错误提示，系统

In file wavercar.f:23

          100  FORMAT('k-point #',I3,':  ',(3f7.4),'    npw=',I6)      
         1
Error: Unclassifiable statement at (1)
In file wavercar.f:28

          ALLOCATE(coef(npw))                                          
                      1
Error: Syntax error in ALLOCATE statement at (1)
In file wavercar.f:29

          ALLOCATE(ac(npw,200))                                         
                    1
Error: Syntax error in ALLOCATE statement at (1)
In file wavercar.f:32

               read(12,*) eval, fweight, (coef(i),i=1,npw)              
                                       1
Error: Expected variable in READ statement at (1)
In file wavercar.f:40

                       ac(i,ic) = coef(i)                              
                                                                       1
Error: Unexpected STATEMENT FUNCTION statement at (1)
In file wavercar.f:22

          write(19,100) ikpt,(kpt(i),i=1,3),npw                        
                     1
Error: FORMAT label 100 at (1) not defined
In file wavercar.f:35

               write(19,'(5X,I3,5X,f8.4,5x,f8.4)') iband, dreal(eval), f
                                                               1
Error: Type of argument 'a' in call to 'dreal' at (1) should be COMPLEX(8), not REAL(4)
In file wavercar.f:46

           DEALLOCATE(coef)                                             
                         1
Error: Expression in DEALLOCATE statement at (1) must be ALLOCATABLE or a POINTER
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
14楼2011-04-27 09:22:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
引用回帖:
Originally posted by 贺仪 at 2011-04-27 09:22:57:
这是我编译时的错误，gfortran 和 ifort都在   100  FORMAT('k-point #',I3,':  ',(3f7.4),'    npw=',I6)这一步提示错误。以下是gfortran的编译错误提示，系统

In file wavercar.f:23

          100   ...

把代码以附件形式贴出来吧……
赞一下 回复此楼
15楼2011-04-27 09:24:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
引用回帖:
Originally posted by snoopyzhao at 2011-04-27 09:24:07:
把代码以附件形式贴出来吧……

上传了 谢谢你
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
16楼2011-04-27 09:32:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

贺仪(金币+5): 太感谢你了！还有一个问题麻烦你帮忙解决以下 2011-04-27 10:21:00
引用回帖:
Originally posted by 贺仪 at 2011-04-27 09:32:58:
上传了 谢谢你

你这个源码是按固定格式写的，那么，你的 100 应该放在一行的1-5列的位置。另外，每行不要超过72列

你把后缀改成 f90 就不会有那样的问题了……，当然，注释就要改成 ! 了……
赞一下 回复此楼
17楼2011-04-27 09:36:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
我输入
gfortran wavercar.f90 >>wave
输出的wave怎么是空的呀？
gfortran wavercar.f90 > wave 也是一样
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
18楼2011-04-27 10:22:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

贺仪

铁杆木虫 (著名写手)
引用回帖:
Originally posted by snoopyzhao at 2011-04-27 09:36:58:
你这个源码是按固定格式写的，那么，你的 100 应该放在一行的1-5列的位置。另外，每行不要超过72列

你把后缀改成 f90 就不会有那样的问题了……，当然，注释就要改成 ! 了……

谢谢 那我现在怎么编译的？
小木虫怎么现在不能改了？上面还没说完呢……
赞一下 回复此楼
嘟啦啦嘟啦啦嘟
19楼2011-04-27 10:29:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
★ ★
余泽成(金币+2): 谢谢参与应助！ 2011-04-27 22:27:56
引用回帖:
Originally posted by 贺仪 at 2011-04-27 10:29:23:
谢谢 那我现在怎么编译的？
小木虫怎么现在不能改了？上面还没说完呢……

我一般都是这样的：

gfortran -Wall wavercar.f90 -o wavercar.exe
赞一下(1人) 回复此楼
20楼2011-04-27 10:41:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 贺仪 的主题更新
292/3返回列表上一页123下一页
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 299求调剂 +3 雾与海 2026-04-02 4/200 2026-04-02 17:42 by 梨子～
[考研] 315求调剂 +7 小羊小羊_ 2026-04-02 7/350 2026-04-02 17:35 by wxiongid
[考研] 265求调剂 +11 林深温澜 2026-04-01 13/650 2026-04-02 15:42 by 小醋坛子666
[考研] 298求调剂 +3 zzz，，r 2026-04-02 6/300 2026-04-02 14:34 by zzz，，r
[考研] 283求调剂 +3 jiouuu 2026-04-02 4/200 2026-04-02 14:08 by 哒哒哒呱呱呱
[考研] 求调剂推荐 +3 南山南@ 2026-04-01 3/150 2026-04-02 12:09 by xiaoranmu
[考研] 266分，一志愿电气工程，本科材料，求材料专业调剂 +10 哇呼哼呼哼 2026-04-01 11/550 2026-04-02 11:31 by lnilvy
[考研] 324求调剂 +5 想上学求调 2026-04-01 6/300 2026-04-02 10:16 by sanrepian
[考研] 085410 一志愿211 22408分数359求调剂 +3 123456789qw 2026-03-31 4/200 2026-04-02 00:06 by 义文wang
[考研] 085600，320分求调剂 +5 大馋小子 2026-04-01 6/300 2026-04-01 19:40 by 唐沐儿
[考研] 材料科学与工程339求调剂 +11 hyz0119 2026-03-31 12/600 2026-04-01 18:40 by 伟大河北
[考研] 一志愿北交材料工程总分358 +5 cs0106 2026-04-01 7/350 2026-04-01 11:45 by wangjy2002
[考研] 322求调剂 +8 三水sss 2026-04-01 8/400 2026-04-01 10:19 by 唐沐儿
[考研] 288资源与环境专硕求调剂，不限专业，有学上就行 +25 lllllos 2026-03-30 26/1300 2026-04-01 09:52 by 一只好果子?
[考研] 301求调剂 +8 axibli 2026-04-01 8/400 2026-04-01 09:51 by 我的船我的海
[考研] 263求调剂 +3 DDDDuu 2026-03-27 3/150 2026-03-31 16:21 by 土木硕士招生
[考研] 353求调剂 +3 江上枫_26 2026-03-28 3/150 2026-03-31 15:53 by jp9609
[考研] 085602化工求调剂（331分） +8 111@127 2026-03-30 8/400 2026-03-30 21:23 by 研究僧导导
[考研] 求调剂 +10 张zz111 2026-03-27 11/550 2026-03-30 09:17 by 无际的草原
[考研] 285求调剂 +4 AZMK 2026-03-27 7/350 2026-03-27 20:59 by AZMK
信息提示
关闭
请填处理意见
关闭