Skip to content

Commit

Permalink
Add run-time parameters CFC11_IC_VAL and CFC12_IC_VAL.
Browse files Browse the repository at this point in the history
  • Loading branch information
klindsay28 committed Aug 24, 2021
1 parent fa96ae3 commit f6524ad
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions src/tracer/MOM_CFC_cap.F90
Original file line number Diff line number Diff line change
Expand Up @@ -120,6 +120,12 @@ function register_CFC_cap(HI, GV, param_file, CS, tr_Reg, restart_CS)
"if they are not found in the restart files. Otherwise "//&
"it is a fatal error if tracers are not found in the "//&
"restart files of a restarted run.", default=.false.)
call get_param(param_file, mdl, "CFC11_IC_VAL", CS%CFC11_IC_val, &
"Value that CFC_11 is set to when it is not read from a file.", &
units="mol kg-1", default=0.0)
call get_param(param_file, mdl, "CFC12_IC_VAL", CS%CFC12_IC_val, &
"Value that CFC_12 is set to when it is not read from a file.", &
units="mol kg-1", default=0.0)

! the following params are not used in this module. Instead, they are used in
! the cap but are logged here to keep all the CFC cap params together.
Expand Down

0 comments on commit f6524ad

Please sign in to comment.