INTERFACE:
subroutine hist_addfld1d (fname, units, avgflag, long_name, type1d_out, & ptr_gcell, ptr_lunit, ptr_col, ptr_pft, ptr_lnd, & ptr_rof, ptr_atm, p2c_scale_type, c2l_scale_type, & l2g_scale_type, set_lake, set_urb, set_nourb, & set_noglcmec, set_spec, default)DESCRIPTION:
Initialize a single level history field. The pointer, ptrhist, is a pointer to the clmtype array that the history buffer will use. The value of type1d passed to masterlist_add_fld determines which of the 1d type of the output and the beginning and ending indices the history buffer field). Default history contents for given field on all tapes are set by calling [masterlist_make_active] for the appropriate tape. After the masterlist is built, routine [htapes_build] is called for an initial or branch run to initialize the actual history tapes.
USES:
use clmtype use domainMod , only : alatlon use clm_varpar, only : rtmlon, rtmlatARGUMENTS:
implicit none character(len=*), intent(in) :: fname ! field name character(len=*), intent(in) :: units ! units of field character(len=1), intent(in) :: avgflag ! time averaging flag character(len=*), intent(in) :: long_name ! long name of field character(len=*), optional, intent(in) :: type1d_out ! output type (from clmtype) real(r8) , optional, pointer :: ptr_gcell(:) ! pointer to gridcell array real(r8) , optional, pointer :: ptr_lunit(:) ! pointer to landunit array real(r8) , optional, pointer :: ptr_col(:) ! pointer to column array real(r8) , optional, pointer :: ptr_pft(:) ! pointer to pft array real(r8) , optional, pointer :: ptr_rof(:) ! pointer to channel runoff real(r8) , optional, pointer :: ptr_lnd(:) ! pointer to lnd array real(r8) , optional, pointer :: ptr_atm(:) ! pointer to atm array real(r8) , optional, intent(in) :: set_lake ! value to set lakes to real(r8) , optional, intent(in) :: set_urb ! value to set urban to real(r8) , optional, intent(in) :: set_nourb ! value to set non-urban to real(r8) , optional, intent(in) :: set_noglcmec ! value to set non-glacier_mec to real(r8) , optional, intent(in) :: set_spec ! value to set special to character(len=*), optional, intent(in) :: p2c_scale_type ! scale type for subgrid averaging of pfts to column character(len=*), optional, intent(in) :: c2l_scale_type ! scale type for subgrid averaging of columns to landunits character(len=*), optional, intent(in) :: l2g_scale_type ! scale type for subgrid averaging of landunits to gridcells character(len=*), optional, intent(in) :: default ! if set to 'inactive, field will not appear on primary tapeREVISION HISTORY:
Created by Mariana VertensteinLOCAL VARIABLES: