[Dart-dev] [5777] DART/branches/development/observations/snow/snow_to_obs_netcdf.f90: give the qc an initial value.

[nancy at ucar.edu]

Revision: 5777
Author:   nancy
Date:     2012-07-05 16:03:21 -0600 (Thu, 05 Jul 2012)
Log Message:
-----------
give the qc an initial value.   this is not complete;
the lat/lon are NOT set correctly yet.

Modified Paths:
--------------
    DART/branches/development/observations/snow/snow_to_obs_netcdf.f90

-------------- next part --------------
Modified: DART/branches/development/observations/snow/snow_to_obs_netcdf.f90
===================================================================
--- DART/branches/development/observations/snow/snow_to_obs_netcdf.f90	2012-07-05 21:58:12 UTC (rev 5776)
+++ DART/branches/development/observations/snow/snow_to_obs_netcdf.f90	2012-07-05 22:03:21 UTC (rev 5777)
@@ -226,6 +226,7 @@
 ! we have to pick an error range.  since this is a snow cover fraction
 ! observation, the valid values should go from 0 to 1.0, so pick 0.1 for now.
 terr = 0.1_r8   ! FIXME - wild guess
+qc = 0.0_r8     ! we will reject anything with a bad qc
 
 
 alongloop:  do ialo = 1, coarse_along