Skip to content

Commit

Permalink
update documentation
Browse files Browse the repository at this point in the history
  • Loading branch information
DeniseWorthen committed Oct 17, 2024
1 parent ba12ee5 commit 91a0788
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 5 deletions.
2 changes: 1 addition & 1 deletion sorc/cpld_gridgen.fd/docs/cpld_gridgen.md
Original file line number Diff line number Diff line change
Expand Up @@ -239,7 +239,7 @@ the source tripole grid.
<tr><td row=2>grid_cice_NEMS_mx025.nc <td>the CICE grid file <td>used at runtime by CICE6
<tr><td row=3>kmtu_cice_NEMS_mx025.nc <td>the CICE mask file <td>used at runtime by CICE6
<tr><td row=4>mesh.mx025.nc <td>the ocean and ice mesh file <td>used at runtime by CICE6, MOM6, and CMEPS
<tr><td row=5>C384.mx025.tile[1-6].nc <td>the mapped ocean mask on the ATM tiles <td>used to create ATM ICs consistent with the <br> fractional grid
<tr><td row=5>C[XXX].mx025.tile[1-6].nc <td>the mapped ocean mask on the ATM tiles <td>used to create ATM ICs consistent with the <br> fractional grid for a given ATM resolution, where C[XXX]=C48,C96,C192,C384,C768 or C1152
</table>

<br>
Expand Down
7 changes: 3 additions & 4 deletions sorc/cpld_gridgen.fd/grdvars.F90
Original file line number Diff line number Diff line change
Expand Up @@ -28,10 +28,6 @@ module grdvars
!! grid should be generated. Default is false.
logical :: roottask !< flag indicating whether this is the roottask

integer, parameter :: nar = 6 !< the number of possible ATM resolutions
integer, parameter, dimension(nar) :: catm = & !< the ATM resolutions for mapped ocean masks
(/48, 96, 192, 384, 768, 1152/) !!

integer, parameter :: nv = 4. !< the number of vertices for each stagger location
integer, parameter :: ncoord = 2*4. !< the number of coord pairs (lat,lon) for each of
!! 4 stagger locations
Expand Down Expand Up @@ -167,6 +163,9 @@ module grdvars
!! rounded to minimum_depth
real(kind=real_kind), parameter :: maximum_lat = 88.0 !< The maximum latitude for water points for WW3

integer, parameter :: nar = 6 !< the number of possible ATM resolutions
integer, parameter, dimension(nar) :: catm = (/48, 96, 192, 384, 768, 1152/) !< the ATM resolutions for mapped ocean masks

contains
!> Allocate grid variables
!!
Expand Down

0 comments on commit 91a0788

Please sign in to comment.