<p><b>mpetersen@lanl.gov</b> 2011-10-17 10:43:37 -0600 (Mon, 17 Oct 2011)</p><p>A few corrections to barotropic subcycling.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/split_explicit_timestepping/src/core_ocean/mpas_ocn_time_integration_split.F
===================================================================
--- branches/ocean_projects/split_explicit_timestepping/src/core_ocean/mpas_ocn_time_integration_split.F        2011-10-17 15:44:46 UTC (rev 1087)
+++ branches/ocean_projects/split_explicit_timestepping/src/core_ocean/mpas_ocn_time_integration_split.F        2011-10-17 16:43:37 UTC (rev 1088)
@@ -623,7 +623,7 @@
 
                 block % state % time_levs(newBtrSubcycleTime) % state % uBtrSubcycle % array(iEdge) &amp; 
               = block % state % time_levs(oldBtrSubcycleTime) % state % uBtrSubcycle % array(iEdge) &amp; 
-              + config_btr_gam3_uWt2*dt/config_n_btr_subcycles *( &amp;
+              + dt/config_n_btr_subcycles *( &amp;
                         uPerp &amp;
                       - gravity &amp;
                         *(  sshCell2 &amp;
@@ -723,7 +723,7 @@
 
                block % state % time_levs(1) % state % FBtr % array(iEdge) &amp;
              = block % state % time_levs(1) % state % FBtr % array(iEdge) &amp;
-             + FBtr_coeff*flux
+             + flux
 
 
          end do

</font>
</pre>