Skip to content

Commit

Permalink
Merge branch 'develop' into feature/lnd_iau
Browse files Browse the repository at this point in the history
* develop:
  Update chunksizes for cubed sphere grid (NOAA-EMC#876)
  First reconciliation PR from production/RRFS.v1 (NOAA-EMC#872)
  • Loading branch information
tsga committed Oct 30, 2024
2 parents 300cdfc + 99091f9 commit 0527fa6
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 3 deletions.
4 changes: 2 additions & 2 deletions io/module_write_netcdf.F90
Original file line number Diff line number Diff line change
Expand Up @@ -398,14 +398,14 @@ end function nf_set_log_level
par_access = NF90_COLLECTIVE
if (rank == 2 .and. ichunk2d(grid_id) > 0 .and. jchunk2d(grid_id) > 0) then
if (is_cubed_sphere) then
chunksizes = [im, jm, tileCount, 1]
chunksizes = [im, jm, 1, 1]
else
chunksizes = [ichunk2d(grid_id), jchunk2d(grid_id), 1]
end if
ncerr = nf90_def_var_chunking(ncid, varids(i), NF90_CHUNKED, chunksizes) ; NC_ERR_STOP(ncerr)
else if (rank == 3 .and. ichunk3d(grid_id) > 0 .and. jchunk3d(grid_id) > 0 .and. kchunk3d(grid_id) > 0) then
if (is_cubed_sphere) then
chunksizes = [im, jm, lm, tileCount, 1]
chunksizes = [im, jm, 1, 1, 1]
else
chunksizes = [ichunk3d(grid_id), jchunk3d(grid_id), min(kchunk3d(grid_id),fldlev(i)), 1]
end if
Expand Down

0 comments on commit 0527fa6

Please sign in to comment.