search

scyvipera / hypoellipse

HYPOELLIPSE Earthquake Location Program
4 stars 0 forks source link

Fortran runtime error: FILE parameter must not be present in OPEN statement #1

Open vlauciani opened 5 years ago

vlauciani commented 5 years ago

Hi I was compiling the project on Ubuntu 18.10. All seems to work but when I run the binary I receive this message:

At line 94 of file openfl.f (unit = 2)
Fortran runtime error: FILE parameter must not be present in OPEN statement

Have you any idea?

Below, the whole process:

myserver:/wardhani/hypoellipse/source# make
gfortran -C -O   -c -o hymain.o hymain.f
gfortran -C -O   -c -o init.o init.f
gfortran -C -O   -c -o adddly.o adddly.f
gfortran -C -O   -c -o adderr.o adderr.f
gfortran -C -O   -c -o azwtos.o azwtos.f
gfortran -C -O   -c -o back.o back.f
gfortran -C -O   -c -o block.o block.f
gfortran -C -O   -c -o boxau.o boxau.f
gfortran -C -O   -c -o cosh.o cosh.f
gfortran -C -O   -c -o coshi.o coshi.f
gfortran -C -O   -c -o critic.o critic.f
gfortran -C -O   -c -o cvrtop.o cvrtop.f
gfortran -C -O   -c -o cyldly.o cyldly.f
gfortran -C -O   -c -o cylget.o cylget.f
gfortran -C -O   -c -o cylred.o cylred.f
gfortran -C -O   -c -o delaz.o delaz.f
gfortran -C -O   -c -o diftim.o diftim.f
gfortran -C -O   -c -o dnstrg.o dnstrg.f
gfortran -C -O   -c -o dubl.o dubl.f
gfortran -C -O   -c -o dwnwrd.o dwnwrd.f
gfortran -C -O   -c -o eigen1.o eigen1.f
gfortran -C -O   -c -o erset.o erset.f
gfortran -C -O   -c -o fmplot.o fmplot.f
gfortran -C -O   -c -o fmplt.o fmplt.f
gfortran -C -O   -c -o fold2.o fold2.f
gfortran -C -O   -c -o formal.o formal.f
gfortran -C -O   -c -o formf.o formf.f
gfortran -C -O   -c -o formit.o formit.f
gfortran -C -O   -c -o getbin.o getbin.f
gfortran -C -O   -c -o geterr.o geterr.f
gfortran -C -O   -c -o getsta.o getsta.f
gfortran -C -O   -c -o global.o global.f
gfortran -C -O   -c -o glob_new.o glob_new.f
gfortran -C -O   -c -o halfsp.o halfsp.f
gfortran -C -O   -c -o hycrt.o hycrt.f
gfortran -C -O   -c -o hypot.o hypot.f
gfortran -C -O   -c -o hyset.o hyset.f
gfortran -C -O   -c -o hytab.o hytab.f
gfortran -C -O   -c -o input1.o input1.f
gfortran -C -O   -c -o inside.o inside.f
gfortran -C -O   -c -o iprst.o iprst.f
gfortran -C -O   -c -o jdate.o jdate.f
gfortran -C -O   -c -o ksicr.o ksicr.f
gfortran -C -O   -c -o lentru.o lentru.f
gfortran -C -O   -c -o line3.o line3.f
gfortran -C -O   -c -o linv.o linv.f
gfortran -C -O   -c -o linvol.o linvol.f
gfortran -C -O   -c -o lisinc.o lisinc.f
gfortran -C -O   -c -o lissum.o lissum.f
gfortran -C -O   -c -o locate.o locate.f
gfortran -C -O   -c -o median.o median.f
gfortran -C -O   -c -o mising.o mising.f
gfortran -C -O   -c -o openfl.o openfl.f
gfortran -C -O   -c -o phagt.o phagt.f
gfortran -C -O   -c -o phaind.o phaind.f
gfortran -C -O   -c -o prplot.o prplot.f
gfortran -C -O   -c -o qdist.o qdist.f
gfortran -C -O   -c -o quakes.o quakes.f
gfortran -C -O   -c -o ran3.o ran3.f
gfortran -C -O   -c -o rdtmdp.o rdtmdp.f
gfortran -C -O   -c -o redgap.o redgap.f
gfortran -C -O   -c -o regres.o regres.f
gfortran -C -O   -c -o riorbk.o riorbk.f
gfortran -C -O   -c -o rnd.o rnd.f
gfortran -C -O   -c -o rplain.o rplain.f
gfortran -C -O   -c -o rshft.o rshft.f
gfortran -C -O   -c -o sinh.o sinh.f
gfortran -C -O   -c -o sort.o sort.f
gfortran -C -O   -c -o strtep.o strtep.f
gfortran -C -O   -c -o sumgap.o sumgap.f
gfortran -C -O   -c -o tatime.o tatime.f
gfortran -C -O   -c -o tbtime.o tbtime.f
gfortran -C -O   -c -o tdtime.o tdtime.f
gfortran -C -O   -c -o timit.o timit.f
gfortran -C -O   -c -o trvcon.o trvcon.f
gfortran -C -O   -c -o trvdrv.o trvdrv.f
gfortran -C -O   -c -o tshift.o tshift.f
gfortran -C -O   -c -o uamag.o uamag.f
gfortran -C -O   -c -o unfold2.o unfold2.f
gfortran -C -O   -c -o update.o update.f
gfortran -C -O   -c -o upstrg.o upstrg.f
gfortran -C -O   -c -o upward.o upward.f
gfortran -C -O   -c -o usedly.o usedly.f
gfortran -C -O   -c -o velazm.o velazm.f
gfortran -C -O   -c -o wadati.o wadati.f
gfortran -C -O   -c -o weight.o weight.f
gfortran -C -O   -c -o xfmags.o xfmags.f
gfortran -C -O   -c -o zstats.o zstats.f
gfortran -C -O   -c -o npunch.o npunch.f
gfortran -C -O   -c -o opfls.o opfls.f
gfortran -C -O   -c -o output.o output.f
gfortran -C -O   -c -o phasin.o phasin.f
gfortran -C -O -static hymain.o init.o adddly.o adderr.o azwtos.o back.o block.o boxau.o cosh.o coshi.o critic.o cvrtop.o cyldly.o cylget.o cylred.o delaz.o diftim.o dnstrg.o dubl.o dwnwrd.o eigen1.o erset.o fmplot.o fmplt.o fold2.o formal.o formf.o formit.o getbin.o geterr.o getsta.o global.o glob_new.o halfsp.o hycrt.o hypot.o hyset.o hytab.o input1.o inside.o iprst.o jdate.o ksicr.o lentru.o line3.o linv.o linvol.o lisinc.o lissum.o locate.o median.o mising.o openfl.o phagt.o phaind.o prplot.o qdist.o quakes.o ran3.o rdtmdp.o redgap.o regres.o riorbk.o rnd.o rplain.o rshft.o sinh.o sort.o strtep.o sumgap.o tatime.o tbtime.o tdtime.o timit.o trvcon.o trvdrv.o tshift.o uamag.o unfold2.o update.o upstrg.o upward.o usedly.o velazm.o wadati.o weight.o xfmags.o zstats.o npunch.o opfls.o output.o phasin.o -o Hypoellipse
myserver:/wardhani/hypoellipse/source#
myserver:/wardhani/hypoellipse/source#
myserver:/wardhani/hypoellipse/source# cd ../quickrun/
myserver:/wardhani/hypoellipse/quickrun#
myserver:/wardhani/hypoellipse/quickrun# ../source/Hypoellipse < hypo.in
 begin hypoellipse

 hypoellipse input filename (stdin)?  hypo.ctl
 allow overwriting of existing output files (no)?  y
 root for output filenames (hypoe)?  hypoel
 log filename or "stdout" (hypoel.log)?  hypoel.log
 filename for printer output or "screen" (hypoel.out)?  hypoel.out
 will this job generate a summary file (no)?  y
 summary output filename (hypoel.sum)?  hypoel.sum
 will this job generate an archive file (no)?  y
 archive output filename (hypoel.ar hypoel.arc
 use travel time tables (no)?  n
 does this job relocate events with revised station delays (no)?  n

At line 94 of file openfl.f (unit = 2)
Fortran runtime error: FILE parameter must not be present in OPEN statement

Error termination. Backtrace:
#0  0x4411da
#1  0x4413d5
#2  0x441bbd
#3  0x443d33
#4  0x4440d4
#5  0x41aa94
#6  0x434959
#7  0x401ffa
#8  0x401f80
#9  0x48fba0
#10  0x401e69
myserver:/wardhani/hypoellipse/quickrun#
HongyangDing commented 9 months ago

Hi, I came across the same problem, have you solved it?