<p><b>laura@ucar.edu</b> 2011-09-27 11:53:34 -0600 (Tue, 27 Sep 2011)</p><p>added option to call the subroutine init_coupled_diagnostics when using restart files with DA cycling.<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_nhyd_atmos/module_mpas_core.F
===================================================================
--- branches/atmos_physics/src/core_nhyd_atmos/module_mpas_core.F        2011-09-27 17:52:11 UTC (rev 1023)
+++ branches/atmos_physics/src/core_nhyd_atmos/module_mpas_core.F        2011-09-27 17:53:34 UTC (rev 1024)
@@ -196,7 +196,7 @@
                                        block % mesh % nVertLevels, block % mesh % nEdges, &amp;
                                        block % parinfo % edgesToSend, block % parinfo % edgesToRecv)
    
-      if (.not. config_do_restart) then
+      if (.not. config_do_restart .or. (config_do_restart .and. config_do_DAcycling)) then
          call init_coupled_diagnostics( block % state % time_levs(1) % state, block % diag, mesh)
       end if
       call compute_solve_diagnostics(dt, block % state % time_levs(1) % state, block % diag, mesh)

</font>
</pre>