3 use module_domain
, only
: domain
5 use da_control
, only
: obs_qc_pointer
,max_ob_levels
,missing_r
, &
6 v_interp_p
, v_interp_h
, check_max_iv_print
, trace_use
, &
7 missing
, max_error_uv
, max_error_t
, rootproc
, &
8 max_error_p
,max_error_q
, check_max_iv_unit
,check_max_iv
, &
9 max_stheight_diff
,missing_data
,max_error_bq
,max_error_slp
, &
10 max_error_bt
, max_error_buv
, radar
,fails_error_max
, &
11 use_radar_rv
, use_radar_rf
,below_model_surface
,mkz
,above_model_lid
,&
12 fg_format
,fg_format_wrf_arw_regional
,fg_format_wrf_nmm_regional
,fg_format_wrf_arw_global
,&
13 fg_format_kma_global
,max_error_rv
,max_error_rf
, &
14 far_below_model_surface
,kms
,kme
,kts
,kte
, trace_use_dull
,filename_len
,&
16 use da_define_structures
, only
: maxmin_type
, iv_type
, y_type
, jo_type
, &
17 bad_data_type
, x_type
, number_type
, bad_data_type
, &
19 use da_interpolation
, only
: da_to_zk
, da_interp_lin_3d
,da_interp_lin_3d_adj
20 use da_par_util
, only
:da_proc_stats_combine
21 use da_par_util1
, only
: da_proc_sum_int
22 use da_statistics
, only
: da_stats_calculate
23 use da_tools
, only
: da_residual
, map_info
, da_llxy_wrf
, da_llxy_default
, da_convert_zk
24 use da_tracing
, only
: da_trace_entry
, da_trace_exit
25 use da_reporting
, only
: da_error
26 use da_tools_serial
, only
: da_get_unit
, da_free_unit
28 ! The "stats_radar_type" is ONLY used locally in da_radar:
30 type residual_radar1_type
33 end type residual_radar1_type
35 type maxmin_radar_stats_type
36 type (maxmin_type
) :: rv
! Radial velocity
37 type (maxmin_type
) :: rf
! Reflectivity
38 end type maxmin_radar_stats_type
41 type (maxmin_radar_stats_type
) :: maximum
, minimum
42 type (residual_radar1_type
) :: average
, rms_err
43 end type stats_radar_type
45 real, parameter :: leh1
=43.1
46 real, parameter :: leh2
=17.5
50 #
include "da_ao_stats_radar.inc"
51 #
include "da_jo_and_grady_radar.inc"
52 #
include "da_residual_radar.inc"
53 #
include "da_oi_stats_radar.inc"
54 #
include "da_print_stats_radar.inc"
55 #
include "da_transform_xtoy_radar.inc"
56 #
include "da_transform_xtoy_radar_adj.inc"
57 #
include "da_check_max_iv_radar.inc"
58 #
include "da_get_innov_vector_radar.inc"
59 #
include "da_radial_velocity.inc"
60 #
include "da_radial_velocity_lin.inc"
61 #
include "da_radial_velocity_adj.inc"
62 #
include "da_calculate_grady_radar.inc"
63 #
include "da_max_error_qc_radar.inc"
64 #
include "da_write_oa_radar_ascii.inc"