Merge pull request E3SM-Project#2997 from E3SM-Project/bogensch/dp_gsize_fix

Bug fix when defining gsize in DP mode

Author: AaronDonahue

share/streams/shr_dmodel_mod.F90

@@ -383,7 +383,7 @@ subroutine shr_dmodel_readgrid( gGrid, gsMap, nxgo, nygo, nzgo, filename, compid
          nxgo = scm_nx
          nygo = scm_ny
          nzgo = -1
-         gsize = abs(scm_nx*scm_nx*nzgo)
+         gsize = abs(scm_nx*scm_ny*nzgo)
        else
          nxgo = nxg
          nygo = nyg