<p><b>mpetersen@lanl.gov</b> 2012-10-19 11:11:57 -0600 (Fri, 19 Oct 2012)</p><p>branch commit, basin_pbc_mrp: Changed config_write_output_on_startup flag to be logical.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/ocean_projects/partial_bottom_cells/src/core_ocean/Registry
===================================================================
--- branches/ocean_projects/partial_bottom_cells/src/core_ocean/Registry        2012-10-19 15:08:29 UTC (rev 2224)
+++ branches/ocean_projects/partial_bottom_cells/src/core_ocean/Registry        2012-10-19 17:11:57 UTC (rev 2225)
@@ -19,12 +19,12 @@
 namelist character io       config_restart_name        restart.nc
 namelist character io       config_output_interval     24:00:00
 namelist integer   io       config_frames_per_outfile  0
-namelist integer   io       config_pio_num_iotasks      0 
-namelist integer   io       config_pio_stride           1
-namelist integer   io       config_write_output_on_startup   true
+namelist integer   io       config_pio_num_iotasks     0 
+namelist integer   io       config_pio_stride          1
+namelist logical   io       config_write_output_on_startup  true
 namelist character decomposition config_block_decomp_file_prefix  graph.info.part.
 namelist integer   decomposition config_number_of_blocks          0
-namelist logical   decomposition config_explicit_proc_decomp      .false.
+namelist logical   decomposition config_explicit_proc_decomp      false
 namelist character decomposition config_proc_decomp_file_prefix   graph.info.part.
 namelist logical   restart  config_do_restart          false
 namelist character restart  config_restart_interval    none
@@ -65,7 +65,7 @@
 namelist real      hmix     config_apvm_scale_factor      0.0
 namelist character vmix     config_vert_visc_type       const
 namelist character vmix     config_vert_diff_type       const
-namelist logical   vmix     config_implicit_vertical_mix  .true.
+namelist logical   vmix     config_implicit_vertical_mix  true
 namelist real      vmix     config_convective_visc      1.0
 namelist real      vmix     config_convective_diff      1.0
 namelist real      vmix     config_bottom_drag_coeff    1.0e-3

Modified: branches/ocean_projects/partial_bottom_cells/src/core_ocean/mpas_ocn_mpas_core.F
===================================================================
--- branches/ocean_projects/partial_bottom_cells/src/core_ocean/mpas_ocn_mpas_core.F        2012-10-19 15:08:29 UTC (rev 2224)
+++ branches/ocean_projects/partial_bottom_cells/src/core_ocean/mpas_ocn_mpas_core.F        2012-10-19 17:11:57 UTC (rev 2225)
@@ -394,7 +394,7 @@
             call mpas_reset_clock_alarm(clock, outputAlarmID, ierr=ierr)
             ! output_frame will always be &gt; 1 here unless it was reset after the 
             ! maximum number of frames per outfile was reached.
-            if(output_frame == 1.and.config_write_output_on_startup) then
+            if(output_frame == 1) then
                call mpas_output_state_finalize(output_obj, domain % dminfo)
                call mpas_output_state_init(output_obj, domain, &quot;OUTPUT&quot;, trim(timeStamp))
             end if

</font>
</pre>