[Dart-dev] [5929] DART/branches/development/observations/MADIS/convert_madis_marine. f90: merge changes from trunk:

[nancy at ucar.edu]

Revision: 5929
Author:   nancy
Date:     2012-11-20 11:29:57 -0700 (Tue, 20 Nov 2012)
Log Message:
-----------
merge changes from trunk:

fix the test for a missing elevation in the marine data;
should have been comparing to elev_miss all along instead
of missing_r8 which is a dart-specific value and not what
is encoded in the input netcdf files.

Modified Paths:
--------------
    DART/branches/development/observations/MADIS/convert_madis_marine.f90

-------------- next part --------------
Modified: DART/branches/development/observations/MADIS/convert_madis_marine.f90
===================================================================
--- DART/branches/development/observations/MADIS/convert_madis_marine.f90	2012-11-20 18:29:13 UTC (rev 5928)
+++ DART/branches/development/observations/MADIS/convert_madis_marine.f90	2012-11-20 18:29:57 UTC (rev 5929)
@@ -207,7 +207,7 @@
         tobs(n) == tobu(i) ) cycle obsloop
   end do
 
-  if ( elev(n) /= missing_r8 ) then
+  if ( elev(n) /= elev_miss ) then
     palt = pres_alt_to_pres(elev(n)) * 0.01_r8
   else
     palt = pres_alt_to_pres(def_elev) * 0.01_r8