Skip some processes when not base_bio_on

If base_bio_on is false, we don't want to request any output from the GCM or deal with the iron flux forcing fields
NCAR · Jan 29, 2024 · bd80540 · bd80540
1 parent c2bd1d0
commit bd80540
Show file tree

Hide file tree

Showing 2 changed files with 146 additions and 132 deletions.
diff --git a/src/tracer/MARBL_forcing_mod.F90 b/src/tracer/MARBL_forcing_mod.F90
@@ -79,7 +79,7 @@ subroutine MARBL_forcing_init(G, param_file, diag, day, inputdir, use_marbl, CS)
     type(marbl_forcing_CS), pointer, intent(inout) :: CS          !< A pointer that is set to point to control
                                                                   !! structure for MARBL forcing
 
-    character(len=40)  :: mdl = "MOM_forcing_type"  ! This module's name.
+    character(len=40)  :: mdl = "MARBL_forcing_mod"  ! This module's name.
     character(len=15)  :: atm_co2_opt
     character(len=200) :: err_message