remove inadvertent reassignment of layer_frac

mom-ocean · Mar 17, 2023 · d1d53bc · d1d53bc
1 parent ed93a23
commit d1d53bc
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/tracer/ideal_age_example.F90 b/src/tracer/ideal_age_example.F90
@@ -400,7 +400,6 @@ subroutine ideal_age_tracer_column_physics(h_old, h_new, ea, eb, fluxes, dt, G,
 
           if (G%mask2dT(i,j) > 0.0) then
             layer_frac = BL_layers(i,j)-nk
-            layer_frac = 0.9
             CS%tr(i,j,k,m) = layer_frac * (CS%tr(i,j,k,m) + G%mask2dT(i,j)*dt &
                              *Isecs_per_year) + (1.-layer_frac) * young_val
           else