Nceplibs UPP

[hnyc2020]

Hello,

I get this error when I type (./make_ncep_libs.sh -s linux -c gnu -d MY directory/nceplibs -o 0 -a upp)

------------------------------------------------------------------------------------------------------------------------------------
gfortran -c -c -O3 -fconvert=big-endian -fno-second-underscore -frecord-marker=4 -fno-range-check -fbacktrace intmath.f
intmath.f:207:14:

207 | if(iand(i,i-1)/=0) then
| 1
Error: Arguments of ‘iand’ have different kind type parameters at (1)
intmath.f:172:14:

172 | if(iand(i,i-1)/=0) then
| 1
Error: Arguments of ‘iand’ have different kind type parameters at (1)
make[1]: *** [makefile:108: ../../../../libg2_v3.1.0_4.a(intmath.o)] Error 1
---------------------------------------------------------------------------------------------------------------------------------------

I had to modify intmath.f (in the WPS folder, b=version 4.1) as below

if(iand(i,i-1)/=0) then TO if(iand(i,i-1_2)/=0) then
if(iand(i,i-1)/=0) then TO if(iand(i,i-1_1)/=0) then

(see https://github.com/wrf-model/WPS/pull/119/files/47bd40f5fee5acac5c17dd450c95c3db5fe0fd4c)

as ungrib.exe did not work initially (it worked follwing these modifications).


So, I guess these modifications had some effects when I want to compile the Ncep libraries.

I found a note on YouTube to change if(iand(i,i-1)/=0) then TO if(iand(int(i,kind(i-1)),i-1)/=0) then I tried ....It did not work.
I have attached my intmath.f file to this post.

How should I fix it?

Thank You!

 

[kavulich]

Hello,

Can you please try the fix listed here? https://github.com/NCAR/NCEPlibs/pull/16/files

If it works please let us know, otherwise we can investigate further.

Thanks,

-Mike

 

[kavulich]

Hello,

Can you please try the fix listed here? https://github.com/NCAR/NCEPlibs/pull/16/files

If it works please let us know, otherwise we can investigate further.

Thanks,

-Mike