From cb585c5852d3701d1eedfe9fe14b42fcf980e7a3 Mon Sep 17 00:00:00 2001
From: Paul Hall <45795415+phall-brown@users.noreply.github.com>
Date: Wed, 26 Apr 2023 09:48:17 -0400
Subject: [PATCH] Removed mrg_fracname from Fwxx merges

---
 mediator/esmFldsExchange_cesm_mod.F90 | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/mediator/esmFldsExchange_cesm_mod.F90 b/mediator/esmFldsExchange_cesm_mod.F90
index ddf0570ce..b3b0f56c5 100644
--- a/mediator/esmFldsExchange_cesm_mod.F90
+++ b/mediator/esmFldsExchange_cesm_mod.F90
@@ -3009,10 +3009,12 @@ subroutine esmFldsExchange_cesm(gcomp, phase, rc)
           if (fldchk(is_local%wrap%FBimp(compice,compice), 'Fioi_taux', rc=rc)) then 
              call addmap_from(compice, 'Fioi_taux', compwav, mapfcopy, 'unset', 'unset')
              call addmrg_to(compwav, 'Fwxx_taux', &
-                  mrg_from=compice, mrg_fld='Fioi_taux', mrg_type='merge', mrg_fracname='ifrac')
+                  mrg_from=compice, mrg_fld='Fioi_taux', mrg_type='merge')
+!                  mrg_from=compice, mrg_fld='Fioi_taux', mrg_type='merge', mrg_fracname='ifrac')
           end if
           call addmrg_to(compwav, 'Fwxx_taux', &
-               mrg_from=compmed, mrg_fld='Faox_taux', mrg_type='merge', mrg_fracname='ofrac')
+               mrg_from=compmed, mrg_fld='Faox_taux', mrg_type='merge')
+!               mrg_from=compmed, mrg_fld='Faox_taux', mrg_type='merge', mrg_fracname='ofrac')
        end if
     end if
 !PSH end