Lars,

Many thanks.

This is not a priority thing for me as I am running SEISAN on a virtual Linux 
machine on my Mac.

I copied your file to LIB  and I also updated my X11 Quartz installation. 

I got lots of warnings and one error - the tail of the output is:

Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:729:34:

  729 |       write(text2(25:28),'(f4.1)'),sd
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:731:34:

  731 |       write(text1(30:36),'(f7.3)'),av
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:732:34:

  732 |       write(text2(30:36),'(f7.3)'),sd
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:734:34:

  734 |       write(text1(38:45),'(f8.3)'),av
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:735:34:

  735 |       write(text2(38:45),'(f8.3)'),sd
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:738:34:

  738 |       write(text1(47:51),'(f5.1)'),av
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
compare_hyp.for:739:34:

  739 |       write(text2(47:51),'(f5.1)'),sd
      |                                  1
Warning: Legacy Extension: Comma before i/o item list at (1)
----- condet -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o condet condet.for 
../LIB/./seisan.a 
----- congap -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o congap congap.for 
../LIB/./seisan.a 
----- connoi -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o connoi connoi.for 
../LIB/./seisan.a 
----- citsei -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o citsei citsei.for 
../LIB/./seisan.a 
----- corr -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o corr corr.for 
../LIB/./seisan.a   -lX11 -L/usr/X11R6/lib
corr.for:1610:0:

 1610 |         indexfile=line(41:seiclen(line))
      | 
Warning: '__builtin_memcpy' reading 80 bytes from a region of size 40 
[-Wstringop-overflow=]
----- database2mseed -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o database2mseed 
database2mseed.for ../LIB/./seisan.a 
----- dimassei -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o dimassei dimassei.for 
../LIB/./seisan.a 
----- delf -----
gfortran -m64 -I../INC -fdollar-ok  -fno-automatic -g -o delf delf.for 
../LIB/./seisan.a 
----- dirf -----
gcc -m64 -I../INC -g -o dirf dirf.c
dirf.c:24:1: warning: type specifier missing, defaults to 'int' [-Wimplicit-int]
main (int argc,char *argv[]) {
^
dirf.c:31:6: error: non-void function 'main' should return a value 
[-Wreturn-type]
     return;
     ^
1 warning and 1 error generated.
make: *** [dirf] Error 1

--
Roderick Stewart
Research Fellow (Volcano-Seismology), Montserrat Volcano Observatory
www.mvo.ms <http://www.mvo.ms/>
email: [email protected] <mailto:[email protected]>, [email protected] 
<mailto:[email protected]>, [email protected] 
<mailto:[email protected]>

phone: (+1-664) 491-5647
fax: (+1-664) 491-2423
direct line: (+1-664) 491-5726
mobile: (+1-664) 495-0743
home: (+1-664) 491-3139
roaming: +44 7452 023889
trinidad: +1 (868) 780-4296‬






> On 29 Aug 2019, at 10:05, Lars Ottemøller <[email protected]> wrote:
> 
> Hi Rod,
> 
> we fixed some of the problems which show up when compiling on mac last year, 
> can you copy the attached file to your LIB folder and try again? I think you 
> will get some other errors, please let me know what these are and I may have 
> to send another few files. This should fix the first problem.
> 
> The second should be resolved when LIB all compiles and you get the seisan.a.
> 
> Cheers,
> 
> Lars
> 
> 
> 
> On 26/08/2019 17.16, Roderick Stewart wrote:
>> Haa anyone had success compiling seisan on Macos Mojave?
>> 
>> I get lots of warnings about Fortran 2018 deleted features and then errors 
>> about too few arguments. 
>> 
>> The end of the output is below.
>> 
>> Rod
>> 
>> Error: Actual argument contains too few elements for dummy argument 'v' 
>> (150/200) at (1)
>> hyposub6.for:174:26:
>> 
>>   174 |        call 
>> ttcal(n_layer,v,z,d,vr,grad,z_hypo,p,phi,dist,tmin,n_hypo,
>>       |                          1
>> Error: Actual argument contains too few elements for dummy argument 'v' 
>> (150/200) at (1)
>> make[1]: *** [hyposub6.o] Error 1
>> --------------------------------------------------
>> ---- COMPILING SEISAN PROGRAMS -------------------
>> --------------------------------------------------
>> make: *** No rule to make target `../LIB/./seisan.a', needed by `afadsei'.  
>> Stop.
>> bash-3.2$ gfortran -h
>> gfortran: error: missing argument to '-h'
>> gfortran: fatal error: no input files
>> compilation terminated.
>> 
>> 
>> 
>> --
>> Roderick Stewart
>> Research Fellow (Volcano-Seismology), Montserrat Volcano Observatory
>> www.mvo.ms <http://www.mvo.ms/>
>> email: [email protected] <mailto:[email protected]>, [email protected] 
>> <mailto:[email protected]>, [email protected] 
>> <mailto:[email protected]>
>> 
>> phone: (+1-664) 491-5647
>> fax: (+1-664) 491-2423
>> direct line: (+1-664) 491-5726
>> mobile: (+1-664) 495-0743
>> home: (+1-664) 491-3139
>> roaming: +44 7452 023889
>> trinidad: +1 (868) 780-4296‬
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> _______________________________________________
>> seisan mailing list
>> [email protected] <mailto:[email protected]>
>> https://mailman.uib.no/listinfo/seisan 
>> <https://mailman.uib.no/listinfo/seisan>
> -- 
> 
> -------------------------------------------------------------------------
> Lars Ottemöller
> Department of Earth Science, University of Bergen, Norway
> web http://folk.uib.no/lot081 <http://folk.uib.no/lot081> 
> email [email protected] <mailto:[email protected]>
> phone +47-5558 2616
> -------------------------------------------------------------------------
> 
> <hyposub6.for>_______________________________________________
> seisan mailing list
> [email protected]
> https://mailman.uib.no/listinfo/seisan

_______________________________________________
seisan mailing list
[email protected]
https://mailman.uib.no/listinfo/seisan

Reply via email to