htape_create

INTERFACE:

   subroutine htape_create (t, histrest)

DESCRIPTION:

Define contents of history file t. Issue the required netcdf wrapper calls to define the history file contents.

USES:

     use clmtype
     use clm_varpar  , only : nlevgrnd, nlevlak, numrad, rtmlon, rtmlat
     use clm_varctl  , only : caseid, ctitle, fsurdat, finidat, fpftcon, &
                              version, hostname, username, conventions, source
 #ifdef RTM
     use clm_varctl  , only : frivinp_rtm
 #endif
     use domainMod   , only : llatlon,alatlon
     use fileutils   , only : get_filename
 #if (defined CASA)
     use CASAMod,    only : nlive, npools, npool_types
 #endif

ARGUMENTS:

     implicit none
     integer, intent(in) :: t                   ! tape index
     logical, intent(in), optional :: histrest  ! if creating the history restart file

REVISION HISTORY:

   Created by Mariana Vertenstein

LOCAL VARIABLES: