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

WRFv381 with GNU8.x

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.

tks2004

New member
While trying to compile WRFv3.8.1 with GNU and OpenMPI, there were compilation errors:

call random_seed (PUT=seed)
1
Error: Size of ‘put’ argument of ‘random_seed’ intrinsic at (1) too small (12/33)
module_cu_g3.f90:3195:41:

To resolve this, I have modified module_cu_g3.F:
$ diff -urN module_cu_g3.F.org module_cu_g3.F
--- module_cu_g3.F.org 2018-09-23 22:09:29.157203661 -0500
+++ module_cu_g3.F 2018-09-23 22:09:45.043998813 -0500
@@ -3122,7 +3122,7 @@
pcrit,acrit,acritt

integer :: nall2,ixxx,irandom
- integer, dimension (12) :: seed
+ integer, dimension (33) :: seed

Should the fix mentioned above be applied to the 3.8.1 git repo.
 
I am sorry that we don't support GNU version of WRF. Hope someone in the community may have an answer to this question.

Ming Chen
 
This code has been corrected beginning with V4.0. I'm attaching the modified file so that you can see how we changed it.
Unfortunately we didn't have a git repo when we released V3.8.1, but we can add the problems to our known problems page (http://www2.mmm.ucar.edu/wrf/users/wrfv3.8/known-prob-3.8.1.html).
 

Attachments

  • module_cu_g3.F
    182.6 KB · Views: 138
Top