<p><b>laura@ucar.edu</b> 2010-07-26 09:53:59 -0600 (Mon, 26 Jul 2010)</p><p>updated with trunk<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/driver/module_subdriver.F
===================================================================
--- branches/atmos_physics/src/driver/module_subdriver.F        2010-07-26 15:52:29 UTC (rev 437)
+++ branches/atmos_physics/src/driver/module_subdriver.F        2010-07-26 15:53:59 UTC (rev 438)
@@ -53,6 +53,7 @@
       dt = config_dt
       ntimesteps = config_ntimesteps
 
+
       ! Compute diagnostic fields needed in solve loop, and initialize 
       !    simulation time to 0 for all blocks
       block_ptr =&gt; domain % blocklist
@@ -74,7 +75,7 @@
       do itimestep = 1,ntimesteps     
          write(0,*) 'Doing timestep ', itimestep
          call timer_start(&quot;time integration&quot;)
-         call mpas_timestep(domain, itimestep, dt)
+         call mpas_timestep(domain, itimestep, dt) 
          call timer_stop(&quot;time integration&quot;)
 
          ! Move time level 2 fields back into time level 1 for next time step

</font>
</pre>