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

时间:2012-12-04 21:56:51

标签: fortran

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

prog.f95:35.13:
1隐含无

prog.f95:53.65:
2打开(单位= 1,文件='在',状态=' 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)

1 个答案:

答案 0 :(得分:1)

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