Skip to content

Commit

Permalink
Update to allow compilation and running within existing constant regime
Browse files Browse the repository at this point in the history
  • Loading branch information
proteanplanet committed Sep 21, 2023
1 parent 8eec0c6 commit f35b39c
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions components/mpas-seaice/src/shared/mpas_seaice_constants.F
Original file line number Diff line number Diff line change
Expand Up @@ -85,9 +85,9 @@ module seaice_constants
snowThicknessMinimum

! biogeochemistry constants
real(kind=RKIND), parameter, public :: &
skeletalLayerThickness = sk_l , &
gramsCarbonPerMolCarbon = R_gC2molC ! g carbon per mol carbon
real(kind=RKIND), public :: &
skeletalLayerThickness, &
gramsCarbonPerMolCarbon ! g carbon per mol carbon

! ocean biogeochemistry ISPOL values
real(kind=RKIND), parameter, public :: &
Expand Down

0 comments on commit f35b39c

Please sign in to comment.