Merge pull request #64 from NCAR/fix_mct_cap

fix a typo in ocn_comp_mct.F90
NOAA-GFDL · May 31, 2018 · 5477d8c · 5477d8c
2 parents 62ffc0b + e12d952
commit 5477d8c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/config_src/mct_driver/ocn_comp_mct.F90 b/config_src/mct_driver/ocn_comp_mct.F90
@@ -1772,7 +1772,7 @@ subroutine update_ocean_model(OS, Ocean_sfc, time_start_update, &
   call set_net_mass_forcing(OS%fluxes, OS%forces, OS%grid)
 
   if (OS%nstep==0) then
-    call finish_MOM_initialization(OS%Time, OS%dirs, OS%MOM_CSp, S%restart_CSp)
+    call finish_MOM_initialization(OS%Time, OS%dirs, OS%MOM_CSp, OS%restart_CSp)
   endif
 
   call disable_averaging(OS%diag)