Error compilling prep_chem_1.5 with gcc 9

[Edicle]

Hello people,
Im having hard time to compile PREPchem1.5 since my gcc version is 9 (to be specific: gcc (GCC) 9.1.1 20190605).
First i tryed to compile wethout -fallow-argument-mismatch. It didn't work.
So I added -fallow-argument-mismatch, it didtn't work. I also tried Wno-argument-mismatch.
It didn't work.
So I tried three option bellow:
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4 -fallow-argument-mismatch
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4 -Wno-argument-mismatch

I keep having the same error:

cp -f ../../src/edgar_emissions.f90 edgar_emissions.f90
gfortran -c -Xpreprocessor -DRADM_WRF_FIM -O2 -fconvert=big-endian -frecord-marker=4 -I../../aux_src/utils/include -I/home/eduarte/WRFCHEM_02/Libs/NETCDF/include -I/home/eduarte/WRFCHEM_02/Libs/grib2/include edgar_emissions.f90
edgar_emissions.f90:841:15:

841 | 'AGRICULTURE',&
| 1
Error: Different CHARACTER lengths (11/6) in array constructor at (1)
edgar_emissions.f90:894:61:

894 | filename=trim(edgar_data_dir)//"/"//trim(PREFIX)//trim(setor(isetor))//trim(suffix)
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:916:16:

916 | if(trim(setor(isetor)) .eq. 'AGRICULTURE' .and. trim(spc_name(ispc)) .ne. 'NH3') cycle
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:923:30:

923 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MAX ",maxval(src_dummy,:,i))
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:924:30:

924 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MIN ",minval(src_dummy,:,i))
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
make: *** [edgar_emissions.o] Error 1


Does anyone know how to overcome this problem in my case?
Thank you in advance!

 

[Deleted member 3607]

Hello people,
Im having hard time to compile PREPchem1.5 since my gcc version is 9 (to be specific: gcc (GCC) 9.1.1 20190605).
First i tryed to compile wethout -fallow-argument-mismatch. It didn't work.
So I added -fallow-argument-mismatch, it didtn't work. I also tried Wno-argument-mismatch.
It didn't work.
So I tried three option bellow:
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4 -fallow-argument-mismatch
F_OPTS= -Xpreprocessor -D$(CHEM) -O2 -fconvert=big-endian -frecord-marker=4 -Wno-argument-mismatch

I keep having the same error:

cp -f ../../src/edgar_emissions.f90 edgar_emissions.f90
gfortran -c -Xpreprocessor -DRADM_WRF_FIM -O2 -fconvert=big-endian -frecord-marker=4 -I../../aux_src/utils/include -I/home/eduarte/WRFCHEM_02/Libs/NETCDF/include -I/home/eduarte/WRFCHEM_02/Libs/grib2/include edgar_emissions.f90
edgar_emissions.f90:841:15:

841 | 'AGRICULTURE',&
| 1
Error: Different CHARACTER lengths (11/6) in array constructor at (1)
edgar_emissions.f90:894:61:

894 | filename=trim(edgar_data_dir)//"/"//trim(PREFIX)//trim(setor(isetor))//trim(suffix)
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:916:16:

916 | if(trim(setor(isetor)) .eq. 'AGRICULTURE' .and. trim(spc_name(ispc)) .ne. 'NH3') cycle
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:923:30:

923 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MAX ",maxval(src_dummy,:,i))
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
edgar_emissions.f90:924:30:

924 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MIN ",minval(src_dummy,:,i))
| 1
Error: Function ‘setor’ at (1) has no IMPLICIT type
make: *** [edgar_emissions.o] Error 1


Does anyone know how to overcome this problem in my case?
Thank you in advance!

Can you use a newer version of GCC or are you forced to use gcc 9?

 

[Deleted member 3607]

Can you use a newer version of GCC or are you forced to use gcc 9?

@Edicle did you solve your issue?