[Dart-dev] DART/branches Revision: 12505

[dart at ucar.edu]

nancy at ucar.edu
2018-04-10 16:28:22 -0600 (Tue, 10 Apr 2018)
329
for PMO, if the forward operator returns a bad status,
add it to 1000 so when you look at the obs_seq.out from PMO
you have some clue about why the forward operator failed.

i don't know if this will break any code looking for exactly
the value 1000, but it's an enhancement i'd like to add to
the rma_trunk after some testing.




Modified: DART/branches/recam/assimilation_code/modules/assimilation/quality_control_mod.f90
===================================================================
--- DART/branches/recam/assimilation_code/modules/assimilation/quality_control_mod.f90	2018-04-10 22:26:49 UTC (rev 12504)
+++ DART/branches/recam/assimilation_code/modules/assimilation/quality_control_mod.f90	2018-04-10 22:28:22 UTC (rev 12505)
@@ -134,7 +134,7 @@
 if(input_qc == 0 .and. (assimilate_this_ob .or. evaluate_this_ob)) then
    set_input_qc = 0.0_r8
 else
-   set_input_qc = 1000.0_r8
+   set_input_qc = 1000.0_r8 + input_qc   ! give some clue about why
 endif
 
 end function set_input_qc