[Dart-dev] [4315] DART/trunk/assim_tools/assim_tools_mod.f90: Removing 2 unused local vars.

nancy at ucar.edu nancy at ucar.edu
Fri Mar 12 13:25:28 MST 2010


Revision: 4315
Author:   nancy
Date:     2010-03-12 13:25:28 -0700 (Fri, 12 Mar 2010)
Log Message:
-----------
Removing 2 unused local vars.

Modified Paths:
--------------
    DART/trunk/assim_tools/assim_tools_mod.f90

-------------- next part --------------
Modified: DART/trunk/assim_tools/assim_tools_mod.f90
===================================================================
--- DART/trunk/assim_tools/assim_tools_mod.f90	2010-03-12 20:13:59 UTC (rev 4314)
+++ DART/trunk/assim_tools/assim_tools_mod.f90	2010-03-12 20:25:28 UTC (rev 4315)
@@ -214,7 +214,7 @@
 integer  :: num_close_obs_buffered, num_close_states_buffered
 integer  :: num_close_obs_calls_made, num_close_states_calls_made
 ! GSR add new count for only the 'assimilate' type close obs in the tile
-integer  :: assim_num_close_obs, localization_unit, secs, days, thiskind, rev_num_close_obs
+integer  :: localization_unit, secs, days, rev_num_close_obs
 character(len = 102)  :: base_loc_text   ! longest location formatting possible
 
 type(location_type)  :: my_obs_loc(obs_ens_handle%my_num_vars)


More information about the Dart-dev mailing list