Fixes alternating wt issue

vanroekel · Mar 2, 2021 · 4923b0e · 4923b0e
1 parent 939a1dd
commit 4923b0e
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/core_ocean/shared/mpas_ocn_adcReconstruct.F b/src/core_ocean/shared/mpas_ocn_adcReconstruct.F
@@ -348,7 +348,6 @@ subroutine compute_ADC_tends(nCells,nVertLevels, nTracers, dt,activeTracers, uve
                sumd(k,iCell) = 0.0_RKIND
                !Mc(k,iCell) = 0.0_RKIND
               !w2(i1,k,iCell) = 0.0_RKIND
-               wt(i1,k,iCell) = 0.0_RKIND
             endif
              !redo mid quantities
             areaFractionMid(k-1,iCell) = 0.5_RKIND*(areaFraction(k-1,iCell) + areaFraction(k,iCell))