Index: nwpw/nwpwlib/Parallel/Parallel-mpi.F
===================================================================
--- nwpw/nwpwlib/Parallel/Parallel-mpi.F	(revision 26281)
+++ nwpw/nwpwlib/Parallel/Parallel-mpi.F	(revision 26282)
@@ -1903,6 +1903,7 @@
 #include "stupid_mpi4.fh"
 #else
 #include "mpif.h"
+      integer mpierr
 #endif
 
 #ifdef MPI4
@@ -1934,6 +1935,7 @@
 #include "stupid_mpi4.fh"
 #else
 #include "mpif.h"
+      integer mpierr
 #endif
 
 #ifdef MPI4
@@ -1981,6 +1983,7 @@
 #include "stupid_mpi4.fh"
 #else
 #include "mpif.h"
+      integer mpierr
 #endif
 
 #ifdef MPI4