[Dart-dev] DART/branches Revision: 12898

[dart at ucar.edu]

nancy at ucar.edu
2018-10-09 15:16:05 -0600 (Tue, 09 Oct 2018)
457
separate the declaration of a variable and setting an
initial value.  if they're on the same line it becomes
a 'save' variable and keeps its value across multiple 
calls.  this is not what is intended for this code.
(i can't see anyplace in our code where we are calling
read_state() multiple times with and without inflation,
but i must have had some test program that did because
i found this error.)

TLDR: fix a bug that i don't think affected anyone.




Modified: DART/branches/radiance/assimilation_code/modules/io/state_vector_io_mod.f90
===================================================================
--- DART/branches/radiance/assimilation_code/modules/io/state_vector_io_mod.f90	2018-10-08 21:41:12 UTC (rev 12897)
+++ DART/branches/radiance/assimilation_code/modules/io/state_vector_io_mod.f90	2018-10-09 21:16:05 UTC (rev 12898)
@@ -178,8 +178,10 @@
 type(adaptive_inflate_type), optional, intent(in) :: post_inflate_handle
 logical,                     optional, intent(in) :: perturb_from_single_copy
 
-logical :: inflation_handles = .false.
+logical :: inflation_handles 
 
+inflation_handles = .false.
+
 if ( .not. module_initialized ) call state_vector_io_init() ! to read the namelist
 
 ! check whether file_info handle is initialized