[Dart-dev] [6202] DART/branches/development/filter: remove 2 unused variables, and move the svn info

[nancy at ucar.edu]

Revision: 6202
Author:   nancy
Date:     2013-05-30 12:49:40 -0600 (Thu, 30 May 2013)
Log Message:
-----------
remove 2 unused variables, and move the svn info
to the bottom of the file(s).

Modified Paths:
--------------
    DART/branches/development/filter/filter.dopplerfold.f90
    DART/branches/development/filter/filter.f90

-------------- next part --------------
Modified: DART/branches/development/filter/filter.dopplerfold.f90
===================================================================
--- DART/branches/development/filter/filter.dopplerfold.f90	2013-05-30 18:48:24 UTC (rev 6201)
+++ DART/branches/development/filter/filter.dopplerfold.f90	2013-05-30 18:49:40 UTC (rev 6202)
@@ -4,12 +4,6 @@
 
 program filter
 
-! <next few lines under version control, do not edit>
-! $URL$
-! $Id$
-! $Revision$
-! $Date$
-
 !------------------------------------------------------------------------------
 use types_mod,            only : r8, missing_r8, metadatalength
 use obs_sequence_mod,     only : read_obs_seq, obs_type, obs_sequence_type,                  &
@@ -1432,7 +1426,7 @@
 integer,                 intent(in)    :: OBS_ERR_VAR_COPY, DART_qc_index
 
 integer               :: j, k, ens_offset, forward_min, forward_max
-integer               :: forward_unit, ivalue, low_qc_limit, high_qc_limit
+integer               :: forward_unit, ivalue
 real(r8)              :: error, diff_sd, ratio
 real(r8), allocatable :: obs_temp(:), forward_temp(:)
 real(r8)              :: obs_prior_mean, obs_prior_var, obs_val, obs_err_var
@@ -2108,3 +2102,10 @@
 !-------------------------------------------------------------------------
 
 end program filter
+
+! <next few lines under version control, do not edit>
+! $URL$
+! $Id$
+! $Revision$
+! $Date$
+

Modified: DART/branches/development/filter/filter.f90
===================================================================
--- DART/branches/development/filter/filter.f90	2013-05-30 18:48:24 UTC (rev 6201)
+++ DART/branches/development/filter/filter.f90	2013-05-30 18:49:40 UTC (rev 6202)
@@ -4,12 +4,6 @@
 
 program filter
 
-! <next few lines under version control, do not edit>
-! $URL$
-! $Id$
-! $Revision$
-! $Date$
-
 !------------------------------------------------------------------------------
 use types_mod,            only : r8, missing_r8, metadatalength
 use obs_sequence_mod,     only : read_obs_seq, obs_type, obs_sequence_type,                  &
@@ -1428,7 +1422,7 @@
 integer,                 intent(in)    :: OBS_ERR_VAR_COPY, DART_qc_index
 
 integer               :: j, k, ens_offset, forward_min, forward_max
-integer               :: forward_unit, ivalue, low_qc_limit, high_qc_limit
+integer               :: forward_unit, ivalue
 real(r8)              :: error, diff_sd, ratio
 real(r8), allocatable :: obs_temp(:), forward_temp(:)
 real(r8)              :: obs_prior_mean, obs_prior_var, obs_val, obs_err_var
@@ -1952,3 +1946,10 @@
 !-------------------------------------------------------------------------
 
 end program filter
+
+! <next few lines under version control, do not edit>
+! $URL$
+! $Id$
+! $Revision$
+! $Date$
+