24小时热门版块排行榜    

查看: 1258  |  回复: 12
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

huangyc

木虫 (正式写手)

[交流] [求助]编译VASP出错

出错信息为:
fortcom: Error: fft3dlib.f90, line 1625: Sharing of a DO termination statement by more than one DO statement is an obsolescent feature in Fortran 95.  Use an END DO or CONTINUE statement for each DO statement.   [20]
   20       CONTINUE
---^
fortcom: Error: fft3dlib.f90, line 1702: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 2623: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 3529: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 4062: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (1010,1050,1090,1130,1170,1210,1250),IGO
------^
compilation aborted for fft3dlib.f90 (code 1)
make: *** [fft3dlib.o] Error 1
用的是ifort编译器,谢谢

[ Last edited by wuchenwf on 2009-6-22 at 21:39 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veryman

木虫 (正式写手)

$_$

★ ★ ★
wuchenwf(金币+3,VIP+0):xiexie
把BLAS=  /usr/local/soft/goto/libgoto_opteron64-r1.05.a
改成BLAS=  /usr/local/soft/goto/libgoto_opteron64-r1.05.so看看
我记得so文件才是gotoblas的库文件
9楼2009-01-05 11:56:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 13 个回答

ecitpxq

木虫 (小有名气)

★ ★
fegg7502(金币+2,VIP+0):thanks,haha,
将makefile文件中

fft3dlib.o : fft3dlib.F
        $(CPP)
        $(FC) -FR -lowercase -O1 -tpp7 -xW -unroll0 -e95 -vec_report3 -c $*$(SUFFIX)

的-e95删掉,试试。
2楼2009-01-05 09:59:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

y1ding

铁杆木虫 (著名写手)

★ ★ ★ ★ ★
fegg7502(金币+5,VIP+0):thanks,haha,
???vasp.4.6??makefile.linux_ifc_P4????о??g?r???????????????}???Q?????

???}1??
??VASP-FTP???dvasp.4.6???a?r??FTP????????з???s??δ???s2?N?汾
?????^makefile.linux_ifc_P4???l?F???汾??makefile????s?в?
???88?У?????????~
???s?汾??FFLAGS =  -FR -lowercase -assume byterecl
δ???s?汾??FFLAGS =  -FR -lowercase
?????s?汾?M?о??g??????????????}??
mpif90 -FR -lowercase -assume byterecl-FR -O0   -c main.f90
ifort: Command line error: Unrecognized keyword 'byterecl_FR' for option '-assume'
make: *** [main.o] Error 1

??Q???1??
???285?У????l?F?????????????n???????????????????error?a??
$(FC) $(FFLAGS)$(DEBUG)  $(INCS) -c main$(SUFFIX)
???
$(FC) $(FFLAGS) $(DEBUG)  $(INCS) -c main$(SUFFIX)

??Q???2??(?????h)
???????"-assume byterecl"????????FFLAGS =  -FR -lowercase?????



???}2??
????о??g?r????????FFTW??fft3dlib.F???F??????}??
fortcom: Error: fft3dlib.f90, line 1627: Sharing of a DO termination statement by more than one DO statement is an obsolescent feature in Fortran 95.  Use an END DO or CONTINUE statement for each DO statement.   [20]
   20       CONTINUE
---^
fortcom: Error: fft3dlib.f90, line 1704: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 2625: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 3531: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (10,50,90,130,170,210,250),IGO
------^
fortcom: Error: fft3dlib.f90, line 4064: The computed GOTO statement is an obsolescent feature in Fortran 95.
      GOTO (1010,1050,1090,1130,1170,1210,1250),IGO
------^
compilation aborted for fft3dlib.f90 (code 1)
make: *** [fft3dlib.o] Error 1
?????fft3dlib.F???????Z????F77????IFC????F95?Z????x??????????????F?????????
3楼2009-01-05 09:59:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

y1ding

铁杆木虫 (著名写手)

★ ★
fegg7502(金币+2,VIP+0):thanks,haha,
解決方式:
將第343行
$(FC) -FR -lowercase -O1 -tpp7 -xW -prefetch- -unroll0 -e95 -vec_report3 -c $*$(SUFFIX)
去掉"-e95"變數改成
$(FC) -FR -lowercase -O1 -tpp7 -xW -prefetch- -unroll0 -vec_report3 -c $*$(SUFFIX)
因為"-e95"變數會把F95編譯F77程式碼產生的警告(warning)改成錯誤(error)型式輸出,造成編譯?娖韧V篃o法忽略跳過!
4楼2009-01-05 10:00:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 Aj1rhIDL5ixY 2026-09-14 4/200 2026-09-16 07:48 by i0IGWqQuchto
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 23jxep3nCNZb 2026-09-14 3/150 2026-09-16 06:24 by LH5NkK5Ud4bh
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 6F5UbRU2I5hL 2026-09-14 5/250 2026-09-16 05:11 by LH5NkK5Ud4bh
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 s3fFTmArrBt6 2026-09-13 4/200 2026-09-16 03:38 by DgNGHc3h5tPl
[找工作] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 3n8v2C8RimXI 2026-09-13 3/150 2026-09-16 02:38 by DgNGHc3h5tPl
[考博] 申博发邮件 +4 Lmengk 2026-09-15 4/200 2026-09-16 00:05 by 木心想继续深造
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 Aj1rhIDL5ixY 2026-09-14 3/150 2026-09-15 20:59 by zNcEhTcH7ihq
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 0pYnUiPDfdnk 2026-09-14 3/150 2026-09-15 19:35 by CgyNCDVNhGVg
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 40ms4Wlo4umh 2026-09-14 3/150 2026-09-15 19:23 by CgyNCDVNhGVg
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-15 17:39 by CgyNCDVNhGVg
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 s3fFTmArrBt6 2026-09-14 5/250 2026-09-15 16:59 by CgyNCDVNhGVg
[博后之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 s3fFTmArrBt6 2026-09-14 5/250 2026-09-15 16:50 by CgyNCDVNhGVg
[考博] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 s3fFTmArrBt6 2026-09-14 7/350 2026-09-15 16:47 by CgyNCDVNhGVg
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-15 14:34 by VMDqgnlKimtZ
[考博] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +6 QUjhNVAcOSff 2026-09-13 6/300 2026-09-15 14:25 by VMDqgnlKimtZ
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 23jxep3nCNZb 2026-09-14 3/150 2026-09-15 09:38 by VMDqgnlKimtZ
[公派出国] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-15 08:58 by C79jjtjAKjEn
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +6 3n8v2C8RimXI 2026-09-13 6/300 2026-09-15 05:38 by 5BDX0d0WFp7t
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 LwdutQ8HoqWP 2026-09-13 4/200 2026-09-14 16:13 by Aj1rhIDL5ixY
[考博] 27秋季材料博士申请求助 10+3 Cahal1 2026-09-11 4/200 2026-09-14 08:50 by 北京莱茵编辑
信息提示
请填处理意见