Interface
Subroutine neqstack (neq, neq_1, ifil)
Use m_bern
Use p_addneq, Only: t_neq, t_timint, Operator (+)
Implicit None
Type (t_neq) :: neq
Type (t_neq) :: Intent (In) :: neq_1
Integer (i4b) :: ifil
End Subroutine neqstack
End Interface
#ifdef DIM_SMALL
INTEGER(i4b),PARAMETER :: maxamb = 300
#endif
#ifdef DIM_LARGE
INTEGER(i4b),PARAMETER :: maxamb = 600
#endif
pasuka 发表于 2017-3-10 14:34
gfortran不开启-cpp选项,文件后缀又不是大写的.F, .FOR, .FTN, .fpp, .FPP, .F90, .F95, .F03 .F08,当然 ...
hkwzx90 发表于 2017-3-10 15:18
感谢大佬,已经在simply fortran里找到了c编译器的打开方式。
关于intel visual fortran的那条错误信息 ...
fcode 发表于 2017-3-10 19:02
ivf的错误,给多一点代码吧
hkwzx90 发表于 2017-3-13 14:27
感谢大佬回复。其实我要编译的代码是一个叫bernese的软件的源代码,涉及到的文件很多。如果我只把报错部 ...
pasuka 发表于 2017-3-13 15:56
Bernese GNSS Software?
源代码需要申请才能下载
lz为啥不能写邮件咨询开发者呢?对口语信心不足,难道 ...
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |