Apply suggestions from code review

Co-authored-by: Aidan Heerdegen <[email protected]>

src/access/accesscm_coupler/mom_oasis3_interface.F90

@@ -737,7 +737,7 @@ subroutine from_coupler(step,Ocean_sfc,Ice_ocean_boundary, Atm_fields, Time)
   case('co2_io')
      ! Ice_ocean_boundary%co2(iisc:iiec,jjsc:jjec) =  vwork(iisc:iiec,jjsc:jjec)
      ! Set the pcair field in the Atm_fields coupler_bc_type "co2_flux" boundary condition,
-     ! converting from from [ppmv] to [mol/mol]
+     ! converting from [ppmv] to [mol/mol]
      call set_coupler_type_data(vwork, "co2_flux", ind_pcair, Atm_fields, &
          scale_factor=1.e-6, idim=(/iisc,iisc,iiec,iiec/), jdim=(/jjsc,jjsc,jjec,jjec/))
   case('wnd_io')

src/access/accesscm_coupler/ocean_solo.F90

@@ -536,7 +536,7 @@ subroutine ocean_solo_restart(Time_run, Time_res, time_stamp)
 end subroutine ocean_solo_restart
 
 !====================================================================
-! get forcing data from data_overide 
+! get forcing data from data_override 
 subroutine ice_ocn_bnd_from_data(x, Time_next)
 
       type (ice_ocean_boundary_type) :: x

src/mom5/ocean_bgc/ocean_generic_tracer.F90

@@ -342,7 +342,6 @@ subroutine ocean_generic_sbc(Ice_ocean_boundary_fluxes,Disd,Djsd, T_prog, runoff
     ! with MOM6. Note this means that the generic_?_update_from_coupler method is no longer
     ! called here. Instead this will be called later in ocean_generic_sbc_adjust when flux
     ! adjustments are available
-    ! call generic_tracer_coupler_get(Ice_ocean_boundary_fluxes)
     call generic_tracer_coupler_accumulate(Ice_ocean_boundary_fluxes, 1.)
 
     ! dts: Is this still needed here, since this is now also done in ocean_generic_sbc_adjust?