[Dart-dev] [4289] DART/trunk/observations/MADIS/convert_madis_rawin.f90: Add a missing array to the deallocate call so if the

[nancy at ucar.edu]

Revision: 4289
Author:   nancy
Date:     2010-02-22 17:02:57 -0700 (Mon, 22 Feb 2010)
Log Message:
-----------
Add a missing array to the deallocate call so if the
loop is iterated more than once, it won't fail on the
second call to allocate.

Modified Paths:
--------------
    DART/trunk/observations/MADIS/convert_madis_rawin.f90

-------------- next part --------------
Modified: DART/trunk/observations/MADIS/convert_madis_rawin.f90
===================================================================
--- DART/trunk/observations/MADIS/convert_madis_rawin.f90	2010-02-18 00:38:34 UTC (rev 4288)
+++ DART/trunk/observations/MADIS/convert_madis_rawin.f90	2010-02-23 00:02:57 UTC (rev 4289)
@@ -511,7 +511,7 @@
       end if
 
     end do
-    deallocate(pres, wdir, wspd, qc_wdir, qc_wspd)
+    deallocate(pres, wdir, wspd, qc_pres, qc_wdir, qc_wspd)
 
   end if