[Dart-dev] DART/branches Revision: 12217

[dart at ucar.edu]

nancy at ucar.edu
2017-12-19 10:47:08 -0700 (Tue, 19 Dec 2017)
239
make the adaptive inflation code print out what size change
it is using for type 5; update the input.nml to have 5 as one
of the flavors for testing.  that version should NOT be merged
onto the rma_trunk when we finally vet this version.




Modified: DART/branches/enhanced_inflation/assimilation_code/modules/assimilation/adaptive_inflate_mod.f90
===================================================================
--- DART/branches/enhanced_inflation/assimilation_code/modules/assimilation/adaptive_inflate_mod.f90	2017-12-19 17:03:00 UTC (rev 12216)
+++ DART/branches/enhanced_inflation/assimilation_code/modules/assimilation/adaptive_inflate_mod.f90	2017-12-19 17:47:08 UTC (rev 12217)
@@ -1112,6 +1112,11 @@
       endif
       call error_handler(E_MSG, trim(label) // ' inflation:', msgstring, source, revision, revdate)
    endif
+   if (inflation_handle%inflation_flavor == 5) then
+      write(msgstring, '(A, F8.3)') &
+            'inf stddev size change: ', inflation_handle%inf_sd_size_change
+      call error_handler(E_MSG, trim(label) // ' inflation:', msgstring, source, revision, revdate)
+   endif
 endif
 
 end subroutine log_inflation_info

Modified: DART/branches/enhanced_inflation/models/lorenz_96/work/input.nml
===================================================================
--- DART/branches/enhanced_inflation/models/lorenz_96/work/input.nml	2017-12-19 17:03:00 UTC (rev 12216)
+++ DART/branches/enhanced_inflation/models/lorenz_96/work/input.nml	2017-12-19 17:47:08 UTC (rev 12217)
@@ -62,12 +62,13 @@
    last_obs_days                = -1,
    last_obs_seconds             = -1,
 
-   inf_flavor                  = 2,                       0,
+   inf_flavor                  = 2,                       5,
    inf_initial_from_restart    = .false.,                 .false.,
    inf_sd_initial_from_restart = .false.,                 .false.,
    inf_deterministic           = .true.,                  .true.,
    inf_initial                 = 1.0,                     1.0,
    inf_sd_initial              = 0.6,                     0.0,
+   inf_sd_size_change          = 1.05,                    1.05,
    inf_damping                 = 0.9,                     1.0,
    inf_lower_bound             = 1.0,                     1.0,
    inf_upper_bound             = 1000000.0,               1000000.0,