0

我正在使用 Simply Fortran 编译器,当我尝试编译时出现错误:

prog.f95:35.13:
1 隐式无

prog.f95:53.65:
2 打开 (unit=1,file='in',status='OLD') !打开带有参数的文件

错误:(1) 和 (2) 处的两个主程序

我只包含了发生错误的代码部分,因为整个事情很长。这从程序的最开始就开始了。让我知道我是否应该包括更多。

Implicit None
Integer :: i,j,iter
real(8) :: Elow,Ehigh,chi,B_NS,Vbrprof,Neprof,taues
real(8) :: Xcyclave,a

character(8) systemdate
character(10) systemtime
character(5) timezone
integer dateandtime(8)

character(8) systemdate2
character(10) systemtime2
character(5) timezone2
integer dateandtime2(8)

character(len=40) ::  infname,outfname,comm
include 'common.f95'

open (unit=1,file='in',status='OLD')    ! opens file with parameters

read (1,1)                              ! comment line
read (1,1) outfname
read (1,*) Elow,Ehigh                   ! lower and higher energy
read (1,*) Eminf,Emind,Emaxf            ! min and max energy for fedd
read (1,*) Rin, Rout                    ! inner and outer radii
read (1,*) profpar(1)                   ! for Ne
read (1,*) profpar(2)                   ! Te in keV
read (1,*) profpar(3)                   ! for absorption+emission
read (1,*) profpar(4)                   ! T_bb for neutron star in keV
read (1,*) profpar(5)                   ! for bulk velocity
read (1,*) profpar(6)                   ! other parameter for model
read (1,*) profpar(10)                  ! magnetic moment in 10^27 CGS
1 format (A10)
close (1)
4

1 回答 1

1

编译器可能会在文件 common.f95 中看到一条 END xxx 语句。文件 common.f95 可能不打算用作 INCLUDE 文件 - 它本身可能是一个程序单元。

于 2012-12-04T22:59:19.490 回答