[Dart-dev] DART/branches Revision: 11937
dart at ucar.edu
dart at ucar.edu
Mon Sep 18 16:53:51 MDT 2017
mizzi at ucar.edu
2017-09-18 16:53:48 -0600 (Mon, 18 Sep 2017)
57
Changes to get the PANDA test case working for release.
Modified: DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_iasi_input_nml.ksh
===================================================================
--- DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_iasi_input_nml.ksh 2017-09-14 22:41:30 UTC (rev 11936)
+++ DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_iasi_input_nml.ksh 2017-09-18 22:53:48 UTC (rev 11937)
@@ -20,6 +20,8 @@
filedir = ${NL_FILEDIR}
filename = ${NL_FILENAME}
IASI_CO_retrieval_type = ${NL_IASI_CO_RETRIEVAL_TYPE}
+ fac_obs_error = ${NL_FAC_OBS_ERROR}
+ use_log_co = ${NL_USE_LOG_CO}
/
&obs_sequence_nml
write_binary_obs_sequence = .false.
Modified: DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_mopitt_input_nml.ksh
===================================================================
--- DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_mopitt_input_nml.ksh 2017-09-14 22:41:30 UTC (rev 11936)
+++ DART/branches/mizzi/models/wrf_chem/hybrid_scripts/da_create_dart_mopitt_input_nml.ksh 2017-09-18 22:53:48 UTC (rev 11937)
@@ -53,6 +53,14 @@
filename_seq = 'obs_seq2008022206',obs_seq2008022212',
filename_out = 'obs_seq_ncep_2008022212'
/
+&obs_def_MOPITT_CO_nml
+ MOPITT_CO_retrieval_type = ${NL_MOPITT_CO_RETRIEVAL_TYPE:-'RETR'},
+ use_log_co = ${NL_USE_LOG_CO:-.false.},
+/
+&obs_def_IASI_CO_nml
+ IASI_CO_retrieval_type = ${NL_IASI_CO_RETRIEVAL_TYPE:-'RETR'},
+ use_log_co = ${NL_USE_LOG_CO:-.false.},
+/
EOF
Modified: DART/branches/mizzi/models/wrf_chem/model_mod.f90
===================================================================
--- DART/branches/mizzi/models/wrf_chem/model_mod.f90 2017-09-14 22:41:30 UTC (rev 11936)
+++ DART/branches/mizzi/models/wrf_chem/model_mod.f90 2017-09-18 22:53:48 UTC (rev 11937)
@@ -31,7 +31,7 @@
VERTISLEVEL, VERTISPRESSURE, VERTISHEIGHT, &
VERTISSCALEHEIGHT, &
get_close_type, get_dist, get_close_maxdist_init, &
- get_close_obs_init, loc_get_close_obs => get_close_obs
+ get_close_obs_init, loc_get_close_obs => get_close_obs
use utilities_mod, only : file_exist, open_file, close_file, &
register_module, error_handler, E_ERR, E_WARN, &
@@ -73,7 +73,7 @@
KIND_C3H8, KIND_C2H6, KIND_ACET, KIND_HCHO, KIND_C2H4, &
KIND_C3H6, KIND_TOL, KIND_MVK, KIND_BIGALK, KIND_ISOPR, &
KIND_MACR, KIND_GLYALD, KIND_C10H16, &
- KIND_AOD, KIND_CB1, KIND_CB2, KIND_OC1, KIND_OC2, &
+ KIND_AOD, KIND_BC1, KIND_BC2, KIND_OC1, KIND_OC2, &
KIND_DMS, KIND_DST01, KIND_DST02, KIND_DST03, KIND_DST04, &
KIND_DST05, KIND_SO4, KIND_SSLT01, KIND_SSLT02, KIND_SSLT03, &
KIND_SSLT04, KIND_TAUAER1, KIND_TAUAER2, KIND_TAUAER3, KIND_TAUAER4, &
@@ -80,7 +80,9 @@
KIND_PM25, KIND_PM10, &
!
! LXL/APM +++
- KIND_E_O3, KIND_E_CO, KIND_E_NO, KIND_EBU_CO, KIND_EBU_NO, &
+ KIND_E_CO, KIND_E_NO, KIND_E_NO2, KIND_E_SO2, KIND_E_OC, &
+ KIND_E_BC, KIND_E_PM_10, KIND_E_PM_25, &
+ KIND_EBU_CO, KIND_EBU_NO, &
KIND_EBU_OC, KIND_EBU_BC, KIND_EBU_c2h4, KIND_EBU_ch2o, &
KIND_EBU_ch3oh
@@ -328,7 +330,10 @@
type_smois, type_2dflash
! APM/AFAJ ++
integer :: type_so2, type_o3_column, type_o3, type_co, type_no, &
- type_no2, type_hno3, &
+ type_no2, type_bc1, type_bc2, type_oc1, type_oc2, &
+ type_dst01, type_dst02, type_dst03, type_dst04, type_dst05, &
+ type_sslt01, type_sslt02, type_sslt03, type_sslt04, &
+ type_so4, type_pm10, type_pm25, type_hno3, &
type_hno4, type_n2o5, type_pan, type_mek, type_ald, type_ch3o2, &
type_c3h8, type_c2h6, type_acet, type_hcho, type_c2h4, type_c3h6, &
type_tol, type_mvk, type_biglak, type_isopr, type_macr, type_glyald, &
@@ -335,7 +340,9 @@
type_c10h16
integer :: type_tauaer1, type_tauaer2, type_tauaer3, type_tauaer4
! LXL/APM +++
- integer :: type_e_o3, type_e_co, type_e_no, type_ebu_in_co, type_ebu_in_no, &
+ integer :: type_e_co, type_e_no, type_e_no2, type_e_so2, type_e_oc, type_e_bc, &
+ type_e_pm_10, type_e_pm_25, &
+ type_ebu_in_co, type_ebu_in_no, &
type_ebu_in_oc, type_ebu_in_bc, &
type_ebu_in_c2h4, type_ebu_in_ch2o, type_ebu_in_ch3oh
integer :: number_of_conv_variables, number_of_emiss_chemi_variables, &
@@ -992,18 +999,22 @@
wrf%dom(id)%type_hdiab = get_type_ind_from_type_string(id,'H_DIABATIC')
!
! APM/AFAJ/LXL +++
- wrf%dom(id)%type_o3 = get_type_ind_from_type_string(id,'o3')
wrf%dom(id)%type_co = get_type_ind_from_type_string(id,'co')
wrf%dom(id)%type_no = get_type_ind_from_type_string(id,'no')
+ wrf%dom(id)%type_no2 = get_type_ind_from_type_string(id,'no2')
wrf%dom(id)%type_tauaer1 = get_type_ind_from_type_string(id,'TAUAER1')
wrf%dom(id)%type_tauaer2 = get_type_ind_from_type_string(id,'TAUAER2')
wrf%dom(id)%type_tauaer3 = get_type_ind_from_type_string(id,'TAUAER3')
More information about the Dart-dev
mailing list