htape_timeconst

INTERFACE:

   subroutine htape_timeconst(t, mode)

DESCRIPTION:

Write time constant values to primary history tape. Issue the required netcdf wrapper calls to define the history file contents.

USES:

     use clmtype
     use clm_varcon   , only : zsoi, zlak, secspday
     use domainMod    , only : ldomain,llatlon,adomain,alatlon,gatm
 #if (defined RTM)
     use RunoffMod    , only : runoff
 #endif	
     use clm_time_manager, only : get_nstep, get_curr_date, get_curr_time
     use clm_time_manager, only : get_ref_date

ARGUMENTS:

     implicit none
     integer, intent(in) :: t              ! tape index
     character(len=*), intent(in) :: mode  ! 'define' or 'write'

REVISION HISTORY:

   Created by Mariana Vertenstein

LOCAL VARIABLES: