On Fri, 1 Nov 2019 15:48:35 +0000 "Jeff Squyres \(jsquyres\) via users" <users@lists.open-mpi.org> wrote:
> Open MPI doesn't have a public function in its Fortran interface > named "random_seed". So I'm not sure what that's about. That is a WRF+GCC bug. > On Nov 1, 2019, at 11:36 AM, Qianjin Zheng > <qianjin.zh...@hotmail.com<mailto:qianjin.zh...@hotmail.com>> wrote: ... > After the service got upgraded, I recompile my model with Open MPI v > 1.10.7, and the application failed to compile. I got an error > message; however, before the service upgraded I did not get any > error. Here is the error message: 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:2290:41: The wrf code is wrong (you can resolv this by updating wrf or fixing the definition of random_seed to be the right size). Or possibly by using an older gcc (but I don't exactly know how old). https://forum.mmm.ucar.edu/phpBB3/viewtopic.php?f=37&t=217 /Peter K
