<p><b>laura@ucar.edu</b> 2010-06-14 10:13:32 -0600 (Mon, 14 Jun 2010)</p><p>Uncommented call to physics initialization and physics driver<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_hyd_atmos/mpas_interface.F
===================================================================
--- branches/atmos_physics/src/core_hyd_atmos/mpas_interface.F        2010-06-14 16:12:34 UTC (rev 347)
+++ branches/atmos_physics/src/core_hyd_atmos/mpas_interface.F        2010-06-14 16:13:32 UTC (rev 348)
@@ -40,7 +40,7 @@
 
 #ifdef DO_PHYSICS
    call physics_wrf_allocate(mesh)
-!  call physics_init(mesh, block % time_levs(1) % state)
+   call physics_init(mesh, block % time_levs(1) % state)
 #endif   
 
 end subroutine mpas_init
@@ -62,7 +62,7 @@
 
 subroutine mpas_timestep(domain, itimestep, dt &amp;
 #ifdef DO_PHYSICS
-                         ,n_physics  &amp;
+                         ,n_physics, config_ntimesteps  &amp;
 #endif
                         )
 
@@ -71,6 +71,7 @@
 #ifdef DO_PHYSICS
    use module_physics_driver
    use module_physics_manager
+   use module_physics_todynamics
 #endif
 
    implicit none
@@ -79,15 +80,15 @@
    integer, intent(in) :: itimestep
    real (kind=RKIND), intent(in) :: dt
 #ifdef DO_PHYSICS
-   integer, intent(in) :: n_physics
+   integer, intent(in) :: n_physics, config_ntimesteps
    logical:: l_physics
 #endif
 
 #ifdef DO_PHYSICS
-!  l_physics = .false.
-!  call physics_timetracker(itimestep,l_physics)
-!  if(l_physics) call physics_driver(domain,itimestep)
-   call timestep(domain, dt, itimestep)
+   l_physics = .false.
+   call physics_timetracker(itimestep,l_physics)
+   if(l_physics) call physics_driver(domain,itimestep)
+   call timestep(domain, dt, itimestep, config_ntimesteps)
 #else
    call timestep(domain, dt)
 #endif

</font>
</pre>