<p><b>laura@ucar.edu</b> 2011-10-17 14:19:18 -0600 (Mon, 17 Oct 2011)</p><p>updated physics variables<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_physics/module_physics_vars.F
===================================================================
--- branches/atmos_physics/src/core_physics/module_physics_vars.F        2011-10-17 20:17:32 UTC (rev 1102)
+++ branches/atmos_physics/src/core_physics/module_physics_vars.F        2011-10-17 20:19:18 UTC (rev 1103)
@@ -14,6 +14,7 @@
  character(len=32),public:: conv_shallow_scheme
  character(len=32),public:: lsm_scheme
  character(len=32),public:: pbl_scheme
+ character(len=32),public:: radt_cld_scheme
  character(len=32),public:: radt_lw_scheme
  character(len=32),public:: radt_sw_scheme
  character(len=32),public:: sfclayer_scheme
@@ -29,12 +30,11 @@
  integer,public:: ids,ide,jds,jde,kds,kde
  integer,public:: ims,ime,jms,jme,kms,kme
  integer,public:: its,ite,jts,jte,kts,kte
- integer,public:: n_physics,n_microp
+ integer,public:: n_microp
 
  integer,public:: num_months          !number of months                                     [-]
 
  real(kind=RKIND),public:: dt_dyn     !time-step for dynamics
- real(kind=RKIND),public:: dt_physics !time-step for physics.
  real(kind=RKIND),public:: dt_microp  !time-step for cloud microphysics parameterization.
  real(kind=RKIND),public:: dt_radtlw  !time-step for longwave radiation parameterization  [mns]
  real(kind=RKIND),public:: dt_radtsw  !time-step for shortwave radiation parameterization [mns]
@@ -113,7 +113,7 @@
     f_qs = .true.,    &amp;!
     f_qg = .true.      !
 
- real(kind=RKIND),dimension(:,:),allocatable:: &amp;
+ real(kind=RKIND),dimension(:,:,:),allocatable:: &amp;
     f_ice,            &amp;!fraction of cloud ice (used in WRF only).
     f_rain             !fraction of rain (used in WRF only).
 
@@ -155,7 +155,6 @@
 !=============================================================================================
 !... variables and arrays related to parameterization of pbl:
 !=============================================================================================
- integer,public:: n_pbl
 
  integer,dimension(:,:),allocatable:: &amp;
     kpbl_p             !index of PBL top                                                   [-]

</font>
</pre>