|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
p1 |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
p2 |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
p3 |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
dmin |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
dmax |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
apm |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
bpm |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass)
|
:: |
rho |
|
|
|
|
integer,
|
public, |
dimension(maxhclass)
|
:: |
dtype |
|
|
|
|
integer,
|
public, |
dimension(maxhclass)
|
:: |
col |
|
|
|
|
integer,
|
public, |
dimension(maxhclass)
|
:: |
cp |
|
|
|
|
integer,
|
public, |
dimension(maxhclass)
|
:: |
phase |
|
|
|
|
real(kind=8),
|
public |
|
:: |
freq |
|
|
|
|
real(kind=8),
|
public |
|
:: |
k2 |
|
|
|
|
integer,
|
public |
|
:: |
nhclass |
|
|
|
|
integer,
|
public |
|
:: |
use_gas_abs |
|
|
|
|
integer,
|
public |
|
:: |
do_ray |
|
|
|
|
logical,
|
public |
|
:: |
radar_at_layer_one |
|
|
|
|
character(len=240),
|
public |
|
:: |
scale_LUT_file_name |
|
|
|
|
logical,
|
public |
|
:: |
load_scale_LUTs |
|
|
|
|
logical,
|
public |
|
:: |
update_scale_LUTs |
|
|
|
|
logical,
|
public, |
dimension(maxhclass,nRe_types)
|
:: |
N_scale_flag |
|
|
|
|
logical,
|
public, |
dimension(maxhclass,mt_ntt,nRe_types)
|
:: |
Z_scale_flag |
|
|
|
|
logical,
|
public, |
dimension(maxhclass,mt_ntt,nRe_types)
|
:: |
Z_scale_added_flag |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass,mt_ntt,nRe_types)
|
:: |
Ze_scaled |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass,mt_ntt,nRe_types)
|
:: |
Zr_scaled |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass,mt_ntt,nRe_types)
|
:: |
kr_scaled |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass,nd,nRe_types)
|
:: |
fc |
|
|
|
|
real(kind=8),
|
public, |
dimension(maxhclass,nd,nRe_types)
|
:: |
rho_eff |
|
|
|
|
real(kind=8),
|
public |
|
:: |
step_list(Re_MAX_BIN) |
|
|
|
|
real(kind=8),
|
public |
|
:: |
base_list(Re_MAX_BIN) |
|
|
|
|
real(kind=8),
|
public |
|
:: |
mt_ttl(cnt_liq) |
|
|
|
|
real(kind=8),
|
public |
|
:: |
mt_tti(cnt_ice) |
|
|
|
|
real(kind=8),
|
public |
|
:: |
D(nd) |
|
|
|