var/da/da_varbc_tamdar/da_varbc_tamdar.f90

   1 module da_varbc_tamdar
   2
   3    !---------------------------------------------------------------------------
   4    ! Purpose: module for variational bias correction of TAMDAR temperature.
   5    !---------------------------------------------------------------------------
   6
   7    use module_dm, only : wrf_dm_sum_real, wrf_dm_sum_integer
   8    use da_control, only : trace_use,missing_r, qc_varbc_bad, stdout, filename_len, &
   9       rootproc, varbc_nbgerr, ierr, comm, max_ext_its, &
  10       obs_qc_pointer, tamdar, tamdar_sfc, missing_r,print_detail_obs, &
  11       use_varbc_tamdar, varbc_tamdar_nbgerr, varbc_tamdar_nobsmin, &
  12       varbc_tamdar_unit, varbc_tamdar_bm, varbc_tamdar_pred0, fail_varbc_aircraft
  13    use da_define_structures, only : iv_type, y_type, be_type, varbc_tamdar_type
  14    use da_reporting, only : da_error, message, da_warning, da_message
  15    use da_tools, only : da_eof_decomposition, da_diff_seconds
  16    use da_tools_serial, only : da_free_unit, da_get_unit
  17    use da_tracing, only : da_trace_entry, da_trace_exit, da_trace, &
  18       da_trace_int_sort
  19
  20    implicit none
  21
  22 contains
  23
  24 #include "da_varbc_tamdar_init.inc"
  25 #include "da_varbc_tamdar_pred.inc"
  26 #include "da_varbc_tamdar_direct.inc"
  27 #include "da_varbc_tamdar_precond.inc"
  28 #include "da_varbc_tamdar_tl.inc"
  29 #include "da_varbc_tamdar_adj.inc"
  30 #include "da_varbc_tamdar_update.inc"
  31
  32 end module da_varbc_tamdar