<p><b>dwj07@fsu.edu</b> 2012-02-21 14:49:24 -0700 (Tue, 21 Feb 2012)</p><p><br>
        -- BRANCH COMMIT --<br>
<br>
        Fixing sign error in flux3 computation. Sign is different in ocean and atmosphere.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/monotonic_advection/src/operators/mpas_tracer_advection_helpers.F
===================================================================
--- branches/ocean_projects/monotonic_advection/src/operators/mpas_tracer_advection_helpers.F        2012-02-21 18:26:27 UTC (rev 1524)
+++ branches/ocean_projects/monotonic_advection/src/operators/mpas_tracer_advection_helpers.F        2012-02-21 21:49:24 UTC (rev 1525)
@@ -15,7 +15,9 @@
    real function flux3( q_im2, q_im1, q_i, q_ip1, u, coef)!{{{
         real (kind=RKIND), intent(in) :: q_im2, q_im1, q_i, q_ip1, u, coef
 
-        flux3 = (u * (7.0 * (q_i + q_im1) - (q_ip1 + q_im2)) + coef * abs(u) * ((q_ip1 - q_im2) - 3.0*(q_i-q_im1)))/12.0
+        !dwj 02/21/12 flux3 is different in ocean and atmosphere
+        !flux3 = (u * (7.0 * (q_i + q_im1) - (q_ip1 + q_im2)) + coef * abs(u) * ((q_ip1 - q_im2) - 3.0*(q_i-q_im1)))/12.0
+        flux3 = (u * (7.0 * (q_i + q_im1) - (q_ip1 + q_im2)) - coef * abs(u) * ((q_ip1 - q_im2) - 3.0*(q_i-q_im1)))/12.0
    end function!}}}
 
 end module mpas_tracer_advection_helpers

</font>
</pre>