fix mapping for ocn-wav

NorESMhub · Dec 1, 2022 · 28199a1 · 28199a1
1 parent 57b6c0e
commit 28199a1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/mediator/esmFldsExchange_nems_mod.F90 b/mediator/esmFldsExchange_nems_mod.F90
@@ -576,7 +576,7 @@ subroutine esmFldsExchange_nems(gcomp, phase, rc)
        else
           if ( fldchk(is_local%wrap%FBexp(compocn)        , trim(fldname), rc=rc) .and. &
                fldchk(is_local%wrap%FBImp(compwav,compwav), trim(fldname), rc=rc)) then
-             call addmap_from(compwav, trim(fldname), compocn, mapbilnr_nstod, 'unset', 'unset')
+             call addmap_from(compwav, trim(fldname), compocn, mapbilnr_nstod, 'one', 'unset')
              call addmrg_to(compocn, trim(fldname), mrg_from=compwav, mrg_fld=trim(fldname), mrg_type='copy')
           end if
        end if