Scheduled Downtime
On Friday 21 April 2023 @ 5pm MT, this website will be down for maintenance and expected to return online the morning of 24 April 2023 at the latest

Nceplibs UPP

This post was from a previous version of the WRF&MPAS-A Support Forum. New replies have been disabled and if you have follow up questions related to this post, then please start a new thread from the forum home page.

hnyc2020

New member
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!
 

Attachments

  • intmath.f
    7.3 KB · Views: 56
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
 
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
 
Top