CAM
|
Data Types | |
interface | addfld |
type | master_entry |
type | master_list |
type | rdim_id |
type | rvar_id |
Functions/Subroutines | |
subroutine, public | init_masterlinkedlist () |
subroutine, public | intht () |
subroutine, public | history_readnl (nlfile, dtime) |
subroutine | set_field_dimensions (field) |
subroutine | setup_interpolation_and_define_vector_complements () |
subroutine | restart_vars_setnames () |
subroutine | restart_dims_setnames () |
subroutine, public | init_restart_history (File) |
type(var_desc_t) function, pointer | restartvar_getdesc (name) |
subroutine, public | write_restart_history (File, yr_spec, mon_spec, day_spec, sec_spec) |
subroutine, public | read_restart_history (File) |
character(len=max_string_len) function, public | get_hfilepath (tape) |
character(len=max_string_len) function, public | get_hist_restart_filepath (tape) |
integer function, public | get_ptapes () |
recursive type(master_entry) function, pointer | get_entry_by_name (listentry, name) |
subroutine | avgflagtostring (avgflag, time_op) |
subroutine | fldlst () |
subroutine | print_active_fldlst () |
subroutine | inifld (t, listentry, avgflag, prec_wrt) |
subroutine | patch_init (t) |
subroutine | strip_null (str) |
character(len=max_fieldname_len) function | strip_suffix (name) |
character(len=fieldname_len) function | getname (inname) |
subroutine | parserangestring (rangestr, chars, begval, begchar, begname, endval, endchar, endname) |
subroutine | parselonlat (lonlatname, beglon, endlon, lonname, beglat, endlat, latname) |
character(len=1) function | getflag (inname) |
subroutine | list_index (list, name, index) |
recursive subroutine, public | outfld (fname, field, idim, c, avg_subcol_field) |
subroutine | get_field_properties (fname, found, tape_out, ff_out) |
logical function | is_initfile (file_index) |
integer function | strcmpf (name1, name2) |
subroutine | h_inquire (t) |
subroutine, public | add_default (name, tindex, flag) |
subroutine | h_override (t) |
subroutine | h_define (t, restart) |
subroutine | h_normalize (f, t) |
subroutine | h_zero (f, t) |
subroutine | dump_field (f, t, restart) |
logical function, public | write_inithist () |
subroutine, public | wshist (rgnht_in) |
subroutine | addfld_1d (fname, vdim_name, avgflag, units, long_name, gridname, flag_xyfill, sampling_seq, standard_name, fill_value) |
subroutine | addfld_nd (fname, dimnames, avgflag, units, long_name, gridname, flag_xyfill, sampling_seq, standard_name, fill_value) |
logical function | field_part_of_vector (fname, meridional_name, zonal_name) |
subroutine, public | register_vector_field (zonal_field_name, meridional_field_name) |
subroutine | add_entry_to_master (newentry) |
subroutine, public | wrapup (rstwr, nlend) |
integer function | gen_hash_key (string) |
integer function | get_masterlist_indx (fldname) |
subroutine | bld_outfld_hash_tbls () |
subroutine | bld_htapefld_indices |
logical function, public | hist_fld_active (fname) |
logical function, dimension(numcols), public | hist_fld_col_active (fname, lchnk, numcols) |
Variables | |
type(master_entry), pointer | masterlinkedlist => null() |
type(master_list), dimension(:), pointer | masterlist => null() |
type(active_entry), dimension(:), pointer | tape => null() |
type(active_entry), dimension(:), allocatable, target | history_tape |
type(active_entry), dimension(:), allocatable, target | restarthistory_tape |
integer, parameter | restartvarcnt = 37 |
integer, parameter | restartdimcnt = 10 |
type(rvar_id), dimension(restartvarcnt) | restartvars |
type(rdim_id), dimension(restartdimcnt) | restartdims |
integer, parameter | ptapes_dim_ind = 1 |
integer, parameter | max_string_len_dim_ind = 2 |
integer, parameter | fieldname_lenp2_dim_ind = 3 |
integer, parameter | pflds_dim_ind = 4 |
integer, parameter | max_chars_dim_ind = 5 |
integer, parameter | max_fieldname_len_dim_ind = 6 |
integer, parameter | maxnflds_dim_ind = 7 |
integer, parameter | maxvarmdims_dim_ind = 8 |
integer, parameter | registeredmdims_dim_ind = 9 |
integer, parameter | max_hcoordname_len_dim_ind = 10 |
integer | nfmaster = 0 |
integer, dimension(ptapes) | nflds |
integer | i |
integer, dimension(ptapes), public | nhtfrq = (/0, (-24, i=2,ptapes)/) |
integer, dimension(ptapes), public | mfilt = 30 |
integer, dimension(ptapes), public | nfils |
integer, dimension(ptapes) | ndens = 2 |
integer, dimension(ptapes) | ncprec = -999 |
real(r8), dimension(ptapes) | beg_time |
logical, dimension(ptapes) | rgnht = .false. |
logical, dimension(ptapes), public | hstwr = .false. |
logical | empty_htapes = .false. |
logical | htapes_defined = .false. |
character(len= *), parameter | history_namelist = 'cam_history_nl' |
character(len=max_string_len), dimension(ptapes) | hrestpath = (/(' ',i=1,ptapes)/) |
character(len=max_string_len), dimension(ptapes) | nfpath = (/(' ',i=1,ptapes)/) |
character(len=max_string_len), dimension(ptapes) | cpath |
character(len=max_string_len), dimension(ptapes) | nhfil |
character(len=1), dimension(ptapes), public | avgflag_pertape = (/(' ',i=1,ptapes)/) |
character(len=16) | logname |
character(len=16) | host |
character(len=max_string_len), public | ctitle = ' ' |
character(len=8) | inithist = 'YEARLY' |
logical, public | inithist_all = .false. |
character(len=fieldname_lenp2), dimension(pflds, ptapes), public | fincl |
character(len=max_chars), dimension(pflds, ptapes) | fincllonlat |
character(len=fieldname_lenp2), dimension(pflds, ptapes) | fexcl |
character(len=fieldname_lenp2), dimension(pflds, ptapes) | fwrtpr |
character(len=fieldname_suffix_len) | fieldname_suffix = '&IC' |
logical, dimension(ptapes), public | interpolate_output = .false. |
type(interp_info_t), dimension(ptapes - 2) | interpolate_info |
character(len=7), parameter | hist_avg_flags = ' ABIXML' |
character(len=22), parameter | lt_desc = 'mean (over local time)' |
logical, dimension(ptapes) | collect_column_output |
integer | maxvarmdims =1 |
integer, parameter | tbl_hash_pri_sz_lg2 = 16 |
integer, parameter | tbl_hash_oflow_percent = 20 |
integer, parameter | tbl_hash_pri_sz = 2**tbl_hash_pri_sz_lg2 |
integer, parameter | tbl_hash_oflow_sz = tbl_hash_pri_sz * (tbl_hash_oflow_percent/100.0_r8) |
integer, dimension(0:tbl_hash_pri_sz-1) | tbl_hash_pri |
integer, dimension(tbl_hash_oflow_sz) | tbl_hash_oflow |
integer, parameter | gen_hash_key_offset = z'000053db' |
integer, parameter | tbl_max_idx = 15 |
integer, dimension(0:tbl_max_idx) | tbl_gen_hash_key = (/61,59,53,47,43,41,37,31,29,23,17,13,11,7,3,1/) |
character(len=max_string_len) | rhfilename_spec = '%c.cam.rh%t.%y-%m-%d-%s.nc' |
character(len=max_string_len), dimension(ptapes), public | hfilename_spec = (/ (' ', i=1, ptapes) /) |
integer, dimension(ptapes) | lcltod_start |
integer, dimension(ptapes) | lcltod_stop |
subroutine, public cam_history::add_default | ( | character(len=*), intent(in) | name, |
integer, intent(in) | tindex, | ||
character(len=1), intent(in) | flag | ||
) |
|
private |
subroutine cam_history::addfld_1d | ( | character(len=*), intent(in) | fname, |
character(len=*), intent(in) | vdim_name, | ||
character(len=1), intent(in) | avgflag, | ||
character(len=*), intent(in) | units, | ||
character(len=*), intent(in) | long_name, | ||
character(len=*), intent(in), optional | gridname, | ||
logical, intent(in), optional | flag_xyfill, | ||
character(len=*), intent(in), optional | sampling_seq, | ||
character(len=*), intent(in), optional | standard_name, | ||
real(r8), intent(in), optional | fill_value | ||
) |
|
private |
|
private |
|
private |
|
private |
subroutine cam_history::dump_field | ( | integer, intent(in) | f, |
integer, intent(in) | t, | ||
logical, intent(in) | restart | ||
) |
logical function cam_history::field_part_of_vector | ( | character(len=*), intent(in) | fname, |
character(len=*), intent(out), optional | meridional_name, | ||
character(len=*), intent(out), optional | zonal_name | ||
) |
|
private |
integer function cam_history::gen_hash_key | ( | character(len=*), intent(in) | string | ) |
|
private |
subroutine cam_history::get_field_properties | ( | character(len=*), intent(in) | fname, |
logical, intent(out) | found, | ||
type(active_entry), dimension(:), optional, pointer | tape_out, | ||
integer, intent(out), optional | ff_out | ||
) |
character(len=max_string_len) function, public cam_history::get_hfilepath | ( | integer, intent(in) | tape | ) |
character(len=max_string_len) function, public cam_history::get_hist_restart_filepath | ( | integer, intent(in) | tape | ) |
|
private |
integer function, public cam_history::get_ptapes | ( | ) |
|
private |
|
private |
|
private |
|
private |
subroutine cam_history::h_normalize | ( | integer, intent(in) | f, |
integer, intent(in) | t | ||
) |
|
private |
subroutine cam_history::h_zero | ( | integer, intent(in) | f, |
integer, intent(in) | t | ||
) |
logical function, public cam_history::hist_fld_active | ( | character(len=*), intent(in) | fname | ) |
logical function, dimension(numcols), public cam_history::hist_fld_col_active | ( | character(len=*), intent(in) | fname, |
integer, intent(in) | lchnk, | ||
integer, intent(in) | numcols | ||
) |
subroutine, public cam_history::history_readnl | ( | character(len=*), intent(in) | nlfile, |
integer, intent(in) | dtime | ||
) |
|
private |
subroutine, public cam_history::init_masterlinkedlist | ( | ) |
subroutine, public cam_history::init_restart_history | ( | type(file_desc_t), intent(inout) | File | ) |
subroutine, public cam_history::intht | ( | ) |
|
private |
|
private |
recursive subroutine, public cam_history::outfld | ( | character(len=*), intent(in) | fname, |
real(r8), dimension(idim,*), intent(in) | field, | ||
integer, intent(in) | idim, | ||
integer, intent(in) | c, | ||
logical, intent(in), optional | avg_subcol_field | ||
) |
|
private |
|
private |
|
private |
subroutine cam_history::print_active_fldlst | ( | ) |
subroutine, public cam_history::read_restart_history | ( | type(file_desc_t), intent(inout) | File | ) |
subroutine, public cam_history::register_vector_field | ( | character(len=*), intent(in) | zonal_field_name, |
character(len=*), intent(in) | meridional_field_name | ||
) |
|
private |
subroutine cam_history::restart_vars_setnames | ( | ) |
type(var_desc_t) function, pointer cam_history::restartvar_getdesc | ( | character(len=*), intent(in) | name | ) |
subroutine cam_history::set_field_dimensions | ( | type(field_info), intent(inout) | field | ) |
subroutine cam_history::setup_interpolation_and_define_vector_complements | ( | ) |
|
private |
subroutine cam_history::strip_null | ( | character(len=*), intent(inout) | str | ) |
|
private |
subroutine, public cam_history::wrapup | ( | logical, intent(in) | rstwr, |
logical, intent(in) | nlend | ||
) |
logical function, public cam_history::write_inithist | ( | ) |
subroutine, public cam_history::write_restart_history | ( | type(file_desc_t), intent(inout) | File, |
integer, intent(in), optional | yr_spec, | ||
integer, intent(in), optional | mon_spec, | ||
integer, intent(in), optional | day_spec, | ||
integer, intent(in), optional | sec_spec | ||
) |
subroutine, public cam_history::wshist | ( | logical, dimension(ptapes), intent(in), optional | rgnht_in | ) |
character(len=1), dimension(ptapes), public cam_history::avgflag_pertape = (/(' ',i=1,ptapes)/) |
|
private |
|
private |
|
private |
character(len=max_string_len), public cam_history::ctitle = ' ' |
|
private |
|
private |
|
private |
|
private |
character(len=fieldname_lenp2), dimension(pflds,ptapes), public cam_history::fincl |
|
private |
|
private |
|
private |
character(len=max_string_len), dimension(ptapes), public cam_history::hfilename_spec = (/ (' ', i=1, ptapes) /) |
|
private |
|
private |
|
private |
|
private |
|
private |
logical, dimension(ptapes), public cam_history::hstwr = .false. |
|
private |
|
private |
|
private |
logical, public cam_history::inithist_all = .false. |
|
private |
logical, dimension(ptapes), public cam_history::interpolate_output = .false. |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
integer, dimension(ptapes), public cam_history::mfilt = 30 |
|
private |
|
private |
integer, dimension(ptapes), public cam_history::nfils |
|
private |
|
private |
|
private |
|
private |
integer, dimension(ptapes), public cam_history::nhtfrq = (/0, (-24, i=2,ptapes)/) |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |