Update cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90

Co-authored-by: Denise Worthen <[email protected]>
CICE-Consortium · Feb 25, 2024 · ce8fa47 · ce8fa47
1 parent 7ccd200
commit ce8fa47
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90 b/cicecore/drivers/nuopc/cmeps/ice_comp_nuopc.F90
@@ -809,7 +809,7 @@ subroutine InitializeRealize(gcomp, importState, exportState, clock, rc)
        if (ref_ymd /= start_ymd .or. ref_tod /= start_tod) then
           if (my_task == master_task) then
              write(nu_diag,*) trim(subname),': ref_ymd ',ref_ymd, ' must equal start_ymd ',start_ymd
-             write(nu_diag,*) trim(subname),': ref_ymd ',ref_tod, ' must equal start_tod ',start_tod
+             write(nu_diag,*) trim(subname),': ref_tod',ref_tod, ' must equal start_tod ',start_tod
           end if
        end if