ice_history_fields.F90 File Reference

Go to the source code of this file.

Data Types
type	ice_history_fields::ice_hist_field
Modules
module	ice_history_fields
Functions/Subroutines
subroutine	ice_history_fields::construct_filename (ncfile, suffix, ns)
Variables
logical(kind=log_kind)	ice_history_fields::hist_avg
character(len=char_len_long)	ice_history_fields::history_dir
character(len=char_len_long)	ice_history_fields::incond_dir
character(len=char_len)	ice_history_fields::history_file
character(len=char_len)	ice_history_fields::incond_file
character(len=3)	ice_history_fields::history_format
integer(kind=int_kind), parameter	ice_history_fields::max_avail_hist_fields = 600
integer(kind=int_kind)	ice_history_fields::num_avail_hist_fields = 0
type(ice_hist_field), dimension(max_avail_hist_fields)	ice_history_fields::avail_hist_fields
integer(kind=int_kind), parameter	ice_history_fields::ncat_hist = ncat
integer(kind=int_kind), parameter	ice_history_fields::nvar = 11
real(kind=real_kind), dimension(max_nstrm)	ice_history_fields::time_beg
real(kind=real_kind), dimension(max_nstrm)	ice_history_fields::time_end
real(kind=real_kind), dimension(2)	ice_history_fields::time_bounds
real(kind=dbl_kind), dimension(:,:,:,:), allocatable	ice_history_fields::aa
logical(kind=log_kind), dimension(nvar)	ice_history_fields::igrd
logical(kind=log_kind)	ice_history_fields::f_bounds = .true.
integer(kind=int_kind), parameter	ice_history_fields::n_tmask = 1
integer(kind=int_kind), parameter	ice_history_fields::n_tarea = 2
integer(kind=int_kind), parameter	ice_history_fields::n_uarea = 3
integer(kind=int_kind), parameter	ice_history_fields::n_dxt = 4
integer(kind=int_kind), parameter	ice_history_fields::n_dyt = 5
integer(kind=int_kind), parameter	ice_history_fields::n_dxu = 6
integer(kind=int_kind), parameter	ice_history_fields::n_dyu = 7
integer(kind=int_kind), parameter	ice_history_fields::n_HTN = 8
integer(kind=int_kind), parameter	ice_history_fields::n_HTE = 9
integer(kind=int_kind), parameter	ice_history_fields::n_ANGLE = 10
integer(kind=int_kind), parameter	ice_history_fields::n_ANGLET = 11
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_aicen
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_vicen
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_apondn
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_fsurfn_ai
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_fcondtopn_ai
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_fmelttn_ai
integer(kind=int_kind), dimension(ncat_hist, max_nstrm)	ice_history_fields::n_flatn_ai
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_faero_atm
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_faero_ocn
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_aerosn1
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_aerosn2
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_aeroic1
integer(kind=int_kind), dimension(n_aeromx, max_nstrm)	ice_history_fields::n_aeroic2
integer(kind=int_kind), dimension(n_aeromx *ncat_hist, max_nstrm	ice_history_fields::n_aerosn1n )
integer(kind=int_kind), dimension(n_aeromx *ncat_hist, max_nstrm	ice_history_fields::n_aerosn2n )
integer(kind=int_kind), dimension(n_aeromx *ncat_hist, max_nstrm	ice_history_fields::n_aeroic1n )
integer(kind=int_kind), dimension(n_aeromx *ncat_hist, max_nstrm	ice_history_fields::n_aeroic2n )