--- MITgcm_contrib/dgoldberg/streamice/slope_limiter.F 2012/03/29 15:59:21 1.1 +++ MITgcm_contrib/dgoldberg/streamice/slope_limiter.F 2013/05/23 22:12:33 1.2 @@ -15,7 +15,7 @@ SLOPE_LIMITER = 0.0 else r = num/denom - SLOPE_LIMITER = 0.0*(r+abs(r))/(1+abs(r)) + SLOPE_LIMITER = (r+abs(r))/(1+abs(r)) endif RETURN