<p><b>dwj07@fsu.edu</b> 2011-10-04 13:14:07 -0600 (Tue, 04 Oct 2011)</p><p><br>
        -- BRANCH COMMIT --<br>
<br>
        Fixing the timer for u tend forcing.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/performance/src/core_ocean/mpas_ocn_tendency.F
===================================================================
--- branches/ocean_projects/performance/src/core_ocean/mpas_ocn_tendency.F        2011-10-04 19:03:35 UTC (rev 1053)
+++ branches/ocean_projects/performance/src/core_ocean/mpas_ocn_tendency.F        2011-10-04 19:14:07 UTC (rev 1054)
@@ -368,7 +368,7 @@
 
       call timer_start(&quot;u tend forcing&quot;)
       call ocn_vel_forcing_tend(grid, u, u_src, ke_edge, h_edge, tend_u, err)
-      call timer_start(&quot;u tend forcing&quot;)
+      call timer_stop(&quot;u tend forcing&quot;)
 
       !
       ! velocity tendency: vertical mixing d/dz( nu_v du/dz))

</font>
</pre>