<p><b>laura@ucar.edu</b> 2010-11-18 15:55:46 -0700 (Thu, 18 Nov 2010)</p><p>corrected call to physics_registry_init and physics_init in accordance with new Registry<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_hyd_atmos/module_core.F
===================================================================
--- branches/atmos_physics/src/core_hyd_atmos/module_core.F        2010-11-18 22:52:36 UTC (rev 624)
+++ branches/atmos_physics/src/core_hyd_atmos/module_core.F        2010-11-18 22:55:46 UTC (rev 625)
@@ -75,9 +75,9 @@
 
       !proceed with initialization of physics parameterization if moist_physics is set to true:
       if(moist_physics) then
-         call physics_registry_init(config_do_restart, mesh, block % state % time_levs(1) % state)
+         call physics_registry_init(config_do_restart, mesh, block % diag_physics, block % tend_physics)
          call physics_wrf_interface(mesh)
-         call physics_init(mesh, block % state % time_levs(1) % state)
+         call physics_init(mesh, block % state % time_levs(1) % state, block % diag_physics)
       endif
 #endif
    

Modified: branches/atmos_physics/src/core_nhyd_atmos/module_core.F
===================================================================
--- branches/atmos_physics/src/core_nhyd_atmos/module_core.F        2010-11-18 22:52:36 UTC (rev 624)
+++ branches/atmos_physics/src/core_nhyd_atmos/module_core.F        2010-11-18 22:55:46 UTC (rev 625)
@@ -79,9 +79,9 @@
       !proceed with initialization of physics parameterization if moist_physics is set to true:
       if(moist_physics) then
 !initialization of all physics variables in registry:
-         call physics_registry_init(config_do_restart, mesh, block % state % time_levs(1) % state)
+         call physics_registry_init(config_do_restart, mesh, block % diag_physics, block % tend_physics)
          call physics_wrf_interface(mesh)
-         call physics_init(mesh, block % state % time_levs(1) % state)
+         call physics_init(mesh, block % state % time_levs(1) % state, block % diag_physics)
       endif
 #endif
    

</font>
</pre>