Merge pull request ESCOMP#349 from mnlevy1981/send_ndep_to_ocn

Send nitrogen deposition from atm to ocn

mediator/esmFldsExchange_cesm_mod.F90

@@ -1960,6 +1960,17 @@ subroutine esmFldsExchange_cesm(gcomp, phase, rc)
                mrg_from=compatm, mrg_fld='Faxa_dstdry', mrg_type='copy_with_weights', mrg_fracname='ofrac')
        end if
     end if
+    if (phase == 'advertise') then
+       call addfld_to(compocn, 'Faxa_ndep')
+       call addfld_from(compatm, 'Faxa_ndep')
+    else
+       if ( fldchk(is_local%wrap%FBImp(compatm,compatm), 'Faxa_ndep', rc=rc) .and. &
+            fldchk(is_local%wrap%FBExp(compocn)        , 'Faxa_ndep', rc=rc)) then
+          call addmap_from(compatm, 'Faxa_ndep', compocn, mapconsf, 'one', atm2ocn_map)
+          call addmrg_to(compocn, 'Faxa_ndep', &
+               mrg_from=compatm, mrg_fld='Faxa_ndep', mrg_type='copy')
+       end if
+    end if
 
     ! ---------------------------------------------------------------------
     ! to ocn: enthalpy from atm rain, snow, evaporation