<p><b>duda</b> 2011-09-22 17:12:39 -0600 (Thu, 22 Sep 2011)</p><p>BRANCH COMMIT<br>
<br>
Minor changes:<br>
- Add cpp #define in real-data initialization to enable code needed when using NNRP for initial conditions<br>
- Set the first time step to 1, rather than 0<br>
<br>
<br>
M src/core_init_nhyd_atmos/module_read_met.F<br>
M src/core_nhyd_atmos/module_mpas_core.F<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_init_nhyd_atmos/module_read_met.F
===================================================================
--- branches/atmos_physics/src/core_init_nhyd_atmos/module_read_met.F        2011-09-22 16:54:00 UTC (rev 1016)
+++ branches/atmos_physics/src/core_init_nhyd_atmos/module_read_met.F        2011-09-22 23:12:39 UTC (rev 1017)
@@ -1,3 +1,5 @@
+#define _METGRID
+
module read_met
integer, parameter :: MAX_FILENAME_LEN = 1024
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-22 16:54:00 UTC (rev 1016)
+++ branches/atmos_physics/src/core_nhyd_atmos/module_mpas_core.F        2011-09-22 23:12:39 UTC (rev 1017)
@@ -282,7 +282,7 @@
! During integration, time level 1 stores the model state at the beginning of the
! time step, and time level 2 stores the state advanced dt in time by timestep(...)
- itimestep = 0
+ itimestep = 1
do while (.not. MPAS_isClockStopTime(clock))
currTime = MPAS_getClockTime(clock, MPAS_NOW, ierr)
</font>
</pre>