[Dart-dev] [3424] DART/trunk/obs_sequence/obs_sequence_mod.f90: Important update! append_obs_to_seq() had a nasty bug

[nancy at ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080605/5de89f35/attachment.html
-------------- next part --------------
Modified: DART/trunk/obs_sequence/obs_sequence_mod.f90
===================================================================
--- DART/trunk/obs_sequence/obs_sequence_mod.f90	2008-06-05 00:59:36 UTC (rev 3423)
+++ DART/trunk/obs_sequence/obs_sequence_mod.f90	2008-06-05 20:34:47 UTC (rev 3424)
@@ -812,7 +812,7 @@
 endif
 
 ! free any space allocated at init time.
-call destroy_obs(obs)
+call destroy_obs(last_obs)
 
 end subroutine append_obs_to_seq