<p><b>mpetersen@lanl.gov</b> 2011-09-07 15:44:07 -0600 (Wed, 07 Sep 2011)</p><p>minor updates<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/timesplitting_mrp/src/core_ocean/Registry
===================================================================
--- branches/ocean_projects/timesplitting_mrp/src/core_ocean/Registry        2011-09-07 17:12:04 UTC (rev 984)
+++ branches/ocean_projects/timesplitting_mrp/src/core_ocean/Registry        2011-09-07 21:44:07 UTC (rev 985)
@@ -30,7 +30,7 @@
 namelist real      timestep_higdon config_btr_mom_decay_time    3600.0
 namelist real      timestep_higdon config_btr_flux_coef         1.0
 namelist real      timestep_higdon config_btr_mom_eddy_visc2    0.0
-namelist integer timestep_higdon config_btr_subcycle_loop_factor  2
+namelist integer   timestep_higdon config_btr_subcycle_loop_factor  2
 namelist character timestep_higdon config_SSH_from  avg_flux
 namelist character timestep_higdon config_new_btr_variables_from  btr_avg
 namelist logical   sw_model config_h_ScaleWithMesh     false

Modified: branches/ocean_projects/timesplitting_mrp/src/core_ocean/module_time_integration.F
===================================================================
--- branches/ocean_projects/timesplitting_mrp/src/core_ocean/module_time_integration.F        2011-09-07 17:12:04 UTC (rev 984)
+++ branches/ocean_projects/timesplitting_mrp/src/core_ocean/module_time_integration.F        2011-09-07 21:44:07 UTC (rev 985)
@@ -1071,7 +1071,7 @@
 
                allocate(uTemp(block % mesh % nVertLevels))
 
-        if (config_SSH_from=='computed_from_avg_flux') then
+        if (config_SSH_from=='avg_flux') then
            ! Accumulate fluxes in the tend % ssh variable
            block % tend % ssh % array(:) = 0.0
            do iEdge=1,block % mesh % nEdges

</font>
</pre>