htape_create

INTERFACE:

   subroutine htape_create (t)

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 : lsmlon, lsmlat, nlevgrnd, nlevlak, numrad, rtmlon, rtmlat
     use clm_varctl  , only : caseid, ctitle, frivinp_rtm, fsurdat, finidat, fpftcon, &
                              version, hostname, username, conventions, source
     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

REVISION HISTORY:

   Created by Mariana Vertenstein

LOCAL VARIABLES: