Merge pull request #153 from lbi2018/master

GitHub Issue NOAA-EMC/GSI#152.
AndrewEichmann-NOAA · May 3, 2021 · dcb735a · dcb735a
2 parents c502c92 + 7939d47
commit dcb735a
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 5 deletions.
diff --git a/modulefiles/modulefile.ProdGSI.wcoss_c b/modulefiles/modulefile.ProdGSI.wcoss_c
@@ -30,7 +30,7 @@ module load intel/18.1.163
 module load craype-sandybridge
 module load cray-mpich/7.2.0
 
-module load cmake/3.6.2
+module load cmake/3.16.2
 
 # Loading netcdf modules
 module load HDF5-parallel-intel-sandybridge/1.10.6

diff --git a/src/gsi/get_gefs_for_regional.f90 b/src/gsi/get_gefs_for_regional.f90
@@ -116,7 +116,6 @@ subroutine get_gefs_for_regional
   character(len=*),parameter::myname='get_gefs_for_regional'
   real(r_kind) bar_norm,sig_norm,kapr,kap1,trk
   integer(i_kind) iret,i,j,k,k2,n,mm1,iderivative
-  integer(i_kind) mype_out
   integer(i_kind) ic2,ic3,it
   integer(i_kind) ku,kv,kt,kq,koz,kcw,kz,kps
   character(255) filename,filelists(ntlevs_ens)
@@ -376,16 +375,14 @@ subroutine get_gefs_for_regional
         gfshead%idsl= 1
         gfshead%idvc = 2
 
-        ! FV3GFS write component does not include JCAP, infer from DIMY-2
-        njcap=latb-2
 
         nlat_gfs=gfshead%latb+2
         nlon_gfs=gfshead%lonb
         nsig_gfs=gfshead%levs
 
         jcap_gfs=gfshead%latb-2
 
-        if (mype==mype_out) write(6,*)'GESINFO:  Read NCEP FV3GFS netCDF ', &
+        if (mype==0) write(6,*)'GESINFO:  Read NCEP FV3GFS netCDF ', &
            'format file, ',trim(filename)
         ! hard code nvcoord to be 2
         gfshead%nvcoord=2 ! ak and bk