Go to the source code of this file.
Modules | |
module | seq_diag_mct |
Functions/Subroutines | |
subroutine | seq_diag_mct::seq_diag_zero_mct (EClock, mode) |
subroutine | seq_diag_mct::seq_diag_accum_mct () |
subroutine | seq_diag_mct::seq_diag_sum0_mct () |
subroutine | seq_diag_mct::seq_diag_atm_mct (dom_a, frac_a, a2x_a, x2a_a) |
subroutine | seq_diag_mct::seq_diag_lnd_mct (dom_l, frac_l, l2x_l, x2l_l) |
subroutine | seq_diag_mct::seq_diag_rtm_mct (dom_r, r2x_r) |
subroutine | seq_diag_mct::seq_diag_ocn_mct (dom_o, frac_o, o2x_o, x2o_o, xao_o, r2x_o) |
subroutine | seq_diag_mct::seq_diag_ice_mct (dom_i, frac_i, i2x_i, x2i_i) |
subroutine | seq_diag_mct::seq_diag_print_mct (EClock, stop_alarm, budg_print_inst, budg_print_daily, budg_print_month, budg_print_ann, budg_print_ltann, budg_print_ltend) |
subroutine | seq_diag_mct::seq_diag_avect_mct (cdata, AV, comment) |
subroutine | seq_diag_mct::seq_diag_avdiff_mct (AV1, AV2, ID, comment) |
Variables | |
real(r8), parameter | seq_diag_mct::HFLXtoWFLX = - (shr_const_ocn_ref_sal-shr_const_ice_ref_sal) / (shr_const_ocn_ref_sal*shr_const_latice) |
integer(in), parameter | seq_diag_mct::c_size = 18 |
integer(in), parameter | seq_diag_mct::c_atm_as = 1 |
integer(in), parameter | seq_diag_mct::c_atm_ar = 2 |
integer(in), parameter | seq_diag_mct::c_inh_is = 3 |
integer(in), parameter | seq_diag_mct::c_inh_ir = 4 |
integer(in), parameter | seq_diag_mct::c_ish_is = 5 |
integer(in), parameter | seq_diag_mct::c_ish_ir = 6 |
integer(in), parameter | seq_diag_mct::c_lnd_ls = 7 |
integer(in), parameter | seq_diag_mct::c_lnd_lr = 8 |
integer(in), parameter | seq_diag_mct::c_ocn_os = 9 |
integer(in), parameter | seq_diag_mct::c_ocn_or = 10 |
integer(in), parameter | seq_diag_mct::c_inh_as = 11 |
integer(in), parameter | seq_diag_mct::c_inh_ar = 12 |
integer(in), parameter | seq_diag_mct::c_ish_as = 13 |
integer(in), parameter | seq_diag_mct::c_ish_ar = 14 |
integer(in), parameter | seq_diag_mct::c_lnd_as = 15 |
integer(in), parameter | seq_diag_mct::c_lnd_ar = 16 |
integer(in), parameter | seq_diag_mct::c_ocn_as = 17 |
integer(in), parameter | seq_diag_mct::c_ocn_ar = 18 |
character(len=8), dimension(c_size), parameter | seq_diag_mct::cname = (/,,,,,, ,,,, ,,,, ,,, /) |
integer(in), parameter | seq_diag_mct::f_size = 17 |
integer(in), parameter | seq_diag_mct::f_a = 1 |
integer(in), parameter | seq_diag_mct::f_h = 2 |
integer(in), parameter | seq_diag_mct::f_w = 11 |
integer(in), parameter | seq_diag_mct::f_area = 1 |
integer(in), parameter | seq_diag_mct::f_hfrz = 2 |
integer(in), parameter | seq_diag_mct::f_hmelt = 3 |
integer(in), parameter | seq_diag_mct::f_hswnet = 4 |
integer(in), parameter | seq_diag_mct::f_hlwdn = 5 |
integer(in), parameter | seq_diag_mct::f_hlwup = 6 |
integer(in), parameter | seq_diag_mct::f_hlatv = 7 |
integer(in), parameter | seq_diag_mct::f_hlatf = 8 |
integer(in), parameter | seq_diag_mct::f_hioff = 9 |
integer(in), parameter | seq_diag_mct::f_hsen = 10 |
integer(in), parameter | seq_diag_mct::f_wfrz = 11 |
integer(in), parameter | seq_diag_mct::f_wmelt = 12 |
integer(in), parameter | seq_diag_mct::f_wrain = 13 |
integer(in), parameter | seq_diag_mct::f_wsnow = 14 |
integer(in), parameter | seq_diag_mct::f_wevap = 15 |
integer(in), parameter | seq_diag_mct::f_wroff = 16 |
integer(in), parameter | seq_diag_mct::f_wioff = 17 |
character(len=8), dimension(f_size), parameter | seq_diag_mct::fname = (/,,,,, ,,,,, ,,,, ,, /) |
integer(in), parameter | seq_diag_mct::p_size = 5 |
integer(in), parameter | seq_diag_mct::p_inst = 1 |
integer(in), parameter | seq_diag_mct::p_day = 2 |
integer(in), parameter | seq_diag_mct::p_mon = 3 |
integer(in), parameter | seq_diag_mct::p_ann = 4 |
integer(in), parameter | seq_diag_mct::p_inf = 5 |
character(len=8), dimension(p_size), parameter | seq_diag_mct::pname = (/,,,, /) |
real(r8) | seq_diag_mct::budg_dataL |
real(r8) | seq_diag_mct::budg_dataG |
real(r8), dimension(f_size, c_size, p_size) | seq_diag_mct::budg_ns |
character(len=*), paramete | seq_diag_mct::afldname ) |
character(len=*), paramete | seq_diag_mct::latname ) |
character(len=*), paramete | seq_diag_mct::afracname ) |
character(len=*), paramete | seq_diag_mct::lfracname ) |
character(len=*), paramete | seq_diag_mct::ofracname ) |
character(len=*), paramete | seq_diag_mct::ifracname ) |
character(len=*), paramete | seq_diag_mct::ascalname ) |
character(len=*), paramete | seq_diag_mct::lfrinname ) |
character(*), paramete | seq_diag_mct::modName ) |
integer(in), parameter | seq_diag_mct::debug = 0 |