error in make prep_chem_sources (version 1.5)

dbp

New member
To whom it may concern,

I get in touch in order to get some assistance for my WRF-CHEM compilation. I found this email address in a topic inside the forum WRF model coupled to Chemistry (WRF-Chem):
Running Prep-chem-src problems
and I would really appreciate your help. My final intention is to simulate methane emissions, so I would be interested in knowing the best configuration of prep_chem for that purpose.

The state I'm at is the following:
    with no errors. (see attached files)
            wget https://support.hdfgroup.org/ftp/HDF5/releases/hdf5-1.10/hdf5-1.10.4/src/hdf5-1.10.4.tar.gz
    • tar xf hdf5-1.10.4.tar.gz
      cd hdf5-1.10.4/
      ./configure —prefix=${DIR}/hdf5-1.10.4 —enable-fortran —with-zlib=${DIR}/grib2 —disable-netcdf
      make
      make install
  • then, download prep_chem_sources from: ftp://aftp.fsl.noaa.gov/divisions/taq/global_emissions
    Use of version 1.5
  • modify the proper file: include.mk.gfortran.wrf (attached, with extension .txt)
  • and: make OPT=gfortran.wrf CHEM=RADM_WRF_FIM AER=SIMPLE
  • I get the following error (complete output in file attached prepchem.log):

    """
    841 | 'AGRICULTURE',&| 1Error: 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)| 1Error: Function ‘setor’ at (1) has no IMPLICIT typeedgar_emissions.f90:916:16:916 | if(trim(setor(isetor)) .eq. 'AGRICULTURE' .and. trim(spc_name(ispc)) .ne. 'NH3') cycle| 1Error: Function ‘setor’ at (1) has no IMPLICIT typeedgar_emissions.f90:923:30:923 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MAX ",maxval(src_dummy:),:,i))| 1Error: Function ‘setor’ at (1) has no IMPLICIT typeedgar_emissions.f90:924:30:924 | print*,trim(setor(isetor))," ",trim(dsetname),i, " MIN ",minval(src_dummy:),:,i))| 1Error: Function ‘setor’ at (1) has no IMPLICIT typemake: *** [depend_prepsrc.mk:480: edgar_emissions.o] Error 1
    """

I thank you in advance for taking time in reading my questions and I hope you find time also to reply.
Best wishes,
Diego
 

Attachments

hello, i got similar errors, kindly help us as possible as soon...

..........................................................................................
errors :
..........................................................................................

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: *** [depend_prepsrc.mk:480: edgar_emissions.o] Error 1
 
Hello

I am trying to install the prep-chem_sources 1.5 with the version for gfortran 9.4.0

I have the same error mentioned by @patelviral1195 , I have tried what @dbp suggests but it keeps showing me the same error

Has anyone been able to solve it in another way?



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/luis/Build_WRF-SFIRE/Library/include -I/home/luis/Build_WRF-SFIRE/Library/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: *** [depend_prepsrc.mk:480: edgar_emissions.o] Error 1
 
Last edited:
 
Back
Top