aer-rc / monortm Goto Github PK
View Code? Open in Web Editor NEWRadiative transfer model designed to process a small number of monochromatic frequencies (e.g. microwave region, laser)
Radiative transfer model designed to process a small number of monochromatic frequencies (e.g. microwave region, laser)
The file "netcdf_helper_mod.f90" is (almost) a copy of "netcdf_helper_mod.F90", but confuses the make system because it has a preprocessor directive, but the lower-case f90 file ignores it, and still tries to look for netcdf even if you're trying to make without it. Simply removing the file allowed make to find the correct upper-case F90 file, and the build completed without an issue.
**********************************
* M O N O R T M *
* Release 5.6 *
**********************************
NUMBER OF PROFILES: 1
INPUTS FROM MONORTM.IN
Program received signal SIGSEGV: Segmentation fault - invalid memory reference.
Backtrace for this error:
#0 0x150383656E08
#1 0x150383655F90
#2 0x150382D874BF
#3 0x4221E9 in __lnfl_mod_MOD_prlnhd at lnfl_mod.f90:?
#4 0x42328E in __lnfl_mod_MOD_get_lnfl
#5 0x41DF9B in modmmod_MOD_modm
#6 0x427CB3 in MAIN at monortm.f90:?
I have run several versions(e.g v5.6 v5.5 v5.4) and all have produced this error,how can I solve this problem.Thank you
I I run:
git clone --recursive [email protected]:AER-RC/monoRTM.git
I have the following messages
Cloning into 'monoRTM'...
Permission denied (publickey).
fatal: Could not read from remote repository.
Please make sure you have the correct access rights
and the repository exists.
if I run:
git clone --recursive https://github.com/AER-RC/monoRTM.git
Cloning into 'monoRTM'...
remote: Enumerating objects: 1545, done.
remote: Counting objects: 100% (1545/1545), done.
remote: Compressing objects: 100% (624/624), done.
remote: Total 1545 (delta 908), reused 1494 (delta 867), pack-reused 0
Receiving objects: 100% (1545/1545), 1.63 MiB | 0 bytes/s, done.
Resolving deltas: 100% (908/908), done.
Submodule 'cross-sections' ([email protected]:AER-RC/cross-sections.git) registered for path 'cross-sections'
Cloning into 'cross-sections'...
Warning: Permanently added the RSA host key for IP address '140.82.114.3' to the list of known hosts.
Permission denied (publickey).
fatal: Could not read from remote repository.
Please make sure you have the correct access rights
and the repository exists.
Clone of '[email protected]:AER-RC/cross-sections.git' into submodule path 'cross-sections' failed
Compiling still requires netCDF:
make -f make_monortm linuxGNUsgl
results in error
make -f make_monortm all P_TYPE=sgl FC_TYPE=gnu PLTFRM=linux
FC=gfortran
FCFLAG="-Wall -frecord-marker=4"
make[1]: Entering directory `/run/media/ipolonsk/data/AER/temp/monoRTM/build'
This Makefile was designed for the linux platform.
It uses the gfortran compiler, with the following options:
-Wall -frecord-marker=4
The source files used are as follows:
CntnmFactors.f90 lblparams.f90 PhysConstants.f90 struct_types.f90 PlanetEarth.f90 contnm.f90 monortm_sub.F90 modm.f90 RTMmono.f90 CloudOptProp.f90 lnfl_mod.f90 monortm.f90 tips_2003.f90 lblatm.f90 lblrtm_sub.f90 bufin_sgl.f90 netcdf_helper_mod.F90
monortm_v5.5_linux_gnu_sgl make in progress ...
test -d monortm_v5.5_linux_gnu_sgl.obj || mkdir monortm_v5.5_linux_gnu_sgl.obj
test -d monortm_v5.5_linux_gnu_sgl.mods || mkdir monortm_v5.5_linux_gnu_sgl.mods
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/CntnmFactors.f90 -o monortm_v5.5_linux_gnu_sgl.obj/CntnmFactors.o
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/lblparams.f90 -o monortm_v5.5_linux_gnu_sgl.obj/lblparams.o
../src/lblparams.f90:32.45:
integer, parameter :: NFPTS=2001, NFMX=1.3*NFPTS
1
Warning: Possible change of value in conversion from REAL(4) to INTEGER(4) at (1)
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/PhysConstants.f90 -o monortm_v5.5_linux_gnu_sgl.obj/PhysConstants.o
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/struct_types.f90 -o monortm_v5.5_linux_gnu_sgl.obj/struct_types.o
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/PlanetEarth.f90 -o monortm_v5.5_linux_gnu_sgl.obj/PlanetEarth.o
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/contnm.f90 -o monortm_v5.5_linux_gnu_sgl.obj/contnm.o
../src/contnm.f90:1390.10:
& ' CO2: modification from 2000-3200 cm-1 (AERI(ARM), ', &
1
Warning: Initialization string starting at (1) was truncated to fit the variable (51/52)
../src/contnm.f90:1137.3:
900 FORMAT (/,'0 *********************************************',/, &
1
Warning: Label 900 at (1) defined but not used
../src/contnm.f90:1133.3:
100 continue
1
Warning: Label 100 at (1) defined but not used
../src/contnm.f90:10418.10:
NPTC = ((V2C - V1C)/DVC) + 1
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:10442.19:
C(j) = cloudodlayer(layer,i-1)+ (v_cntnm(j)-v_cloud_freq(i-1))*&
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:1450.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:1454.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:1959.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:1963.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:1156.15:
nbnd_v1c = 2 + (v1ss-v1abs)/dvabs + 1.e-5
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:1160.14:
nbnd_v2c = 1 + (v2ss-v1abs)/dvabs + 1.e-5
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:2466.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:2470.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:420.19:
JFAC = (VJ +10.)/10. + 0.00001
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:430.20:
FSCAL = 1. + &
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:2992.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:2996.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:510.19:
JFAC = (VJ - 1998.)/2. + 0.00001
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4704.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4708.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4724.15:
C0(J)=X(I)/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:4725.15:
C1(J)=Y(I)/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:4726.15:
C2(J)=Z(I)/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:6868.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:6872.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:6882.13:
C(J) = S(I)/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:7554.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:7558.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8198.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8202.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:580.17:
I_FIX = (40800.-V1ABS)/DVABS+1.001
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8844.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8848.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8858.13:
C(J) = S(I)/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:621.17:
I_FIX = (40800.-V1ABS)/DVABS+1.001
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8978.3:
920 format (f10.2,1p,e12.2,0p,f10.2,1p2e12.2)
1
Warning: Label 920 at (1) defined but not used
../src/contnm.f90:8958.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8962.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:8974.13:
c(j) = factor * xo2(i)* exp(xo2t(i)*xktfac) / vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9081.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9085.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9095.13:
C(J) = xo2inf1(I)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9252.10:
NPTC = (v2c-v1c)/dvc + 3.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9259.15:
DV1 = Vj - V1_osc
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9260.15:
DV2 = Vj - V2_osc
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9273.16:
C(J) = O2INF/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9311.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9315.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9325.13:
C(J) = xo2inf3(I)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9436.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9440.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9451.13:
C(J) = factor*S(I)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9829.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9833.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9886.27:
IF (V.LE.40000.) CORR = ((40000.-V)/4000.)*7.917E-07
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9896.12:
YRATIO = V/48811.0
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9847.13:
C(J) = HERZ/VJ
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:9973.11:
I1 = (V1C-V1S)/DVS + 1.e-5
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9977.8:
I2 = (V2C-V1S)/DVS + 1.e-5
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:9989.13:
C(J) = S(I)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:4201.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4205.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4378.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4382.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4407.13:
c(j) = c(j)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:4606.11:
I1 = (V1C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4610.8:
I2 = (V2C-V1S)/DVS + 0.01
1
Warning: Possible change of value in conversion from REAL(8) to INTEGER(4) at (1)
../src/contnm.f90:4625.13:
c(j) = c(j)/vj
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:1115.22:
xvrayleigh = vrayleigh/1.e4
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/contnm.f90:10373.13:
logical EX
1
Warning: Unused variable 'ex' declared at (1)
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/RTMmono.f90 -o monortm_v5.5_linux_gnu_sgl.obj/RTMmono.o
../src/RTMmono.f90:319.14:
x=radcn1*(wn(ifr)**3)/radtmr+1.
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/RTMmono.f90:320.23:
tmr(ifr) = radcn2*wn(ifr) / log(x)
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/RTMmono.f90:235.18:
bb_fn = radcn1*(v**3)/(exp(v*fbeta)-1.)
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/RTMmono.f90:102.31:
HVRSUB = '$Revision: 19812 $'
1
Warning: CHARACTER expression will be truncated in assignment (15/18) at (1)
../src/RTMmono.f90:150.10:
X=RADCN1*(WN(I)**3)/RAD(I)+1.
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
../src/RTMmono.f90:151.14:
TB(I)=RADCN2*WN(I)/log(X)
1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1)
gfortran -c -Wall -frecord-marker=4 -I. -Imonortm_v5.5_linux_gnu_sgl.mods ../src/netcdf_helper_mod.f90 -o monortm_v5.5_linux_gnu_sgl.obj/netcdf_helper_mod.o
Warning: ../src/netcdf_helper_mod.f90:1: Illegal preprocessor directive
Warning: ../src/netcdf_helper_mod.f90:27: Illegal preprocessor directive
../src/netcdf_helper_mod.f90:12.8:
USE netcdf
1
Fatal Error: Can't open module file 'netcdf.mod' for reading at (1): No such file or directory
make[1]: *** [netcdf_helper_mod.o] Error 1
make[1]: Leaving directory `/run/media/ipolonsk/data/AER/temp/monoRTM/build'
make: *** [linuxGNUsgl] Error 2
to resolve two files have to be modified:
File make_monortm
File monortm_sub.f90
A declarative, efficient, and flexible JavaScript library for building user interfaces.
๐ Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
An Open Source Machine Learning Framework for Everyone
The Web framework for perfectionists with deadlines.
A PHP framework for web artisans
Bring data to life with SVG, Canvas and HTML. ๐๐๐
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
Some thing interesting about web. New door for the world.
A server is a program made to process requests and deliver data to clients.
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
Some thing interesting about visualization, use data art
Some thing interesting about game, make everyone happy.
We are working to build community through open source technology. NB: members must have two-factor auth.
Open source projects and samples from Microsoft.
Google โค๏ธ Open Source for everyone.
Alibaba Open Source for everyone
Data-Driven Documents codes.
China tencent open source team.