WetIceHydrology

INTERFACE:

   subroutine WetIceHydrology (c)

DESCRIPTION:

   Calculate hydrology for ice and wetland

USES:

     use shr_kind_mod, only: r8 => shr_kind_r8
     use clmtype
     use globals, only: dtime
     use clm_varcon, only : istwet, istice

ARGUMENTS:

     implicit none
     type (column_type),target,intent(inout):: c		!column derived type

CALLED FROM:

REVISION HISTORY:

   7 November 2000: Mariana Vertenstein; Initial code
   2/28/02, Peter Thornton: Migrated to new data structures.

LOCAL VARIABLES:

   local pointers to original implicit in scalars
     real(r8),pointer:: forc_rain     !rain rate [mm/s]
     real(r8),pointer:: forc_snow     !snow rate [mm/s]
     real(r8),pointer:: qflx_evap_tot !qflx_evap_soi + qflx_evap_veg + qflx_tran_veg
     real(r8),pointer:: endwb         !water mass end of the time step
     real(r8),pointer:: begwb         !water mass begining of the time step
   local pointers to original implicit out scalars
     real(r8),pointer:: qflx_drain    !sub-surface runoff (mm H2O /s)
     real(r8),pointer:: qflx_surf     !surface runoff (mm H2O /s)
     real(r8),pointer:: qflx_infl     !infiltration (mm H2O /s)
     real(r8),pointer:: qflx_qrgwl    !qflx_surf at glaciers, wetlands, lakes