free allocated memory in x09 and demo

Author: mohawk2

Demo.pm

@@ -148,6 +148,7 @@ my @demo = (
   plcol0( 1 );
   plstransform( undef, undef );
   plflush();
+  plFree2dGrid($cgrid2);
 ]],
 
 [act => q[
@@ -195,6 +196,7 @@ my @demo = (
   plcol0 (1);
   plline ($px , $py); # Plot the cylinder
   plflush();
+  plFree2dGrid($cgrid2);
 ]],
 
 [actnw => q|

t/x09.pl

@@ -91,7 +91,7 @@ sub polar {
   plcol0 (1);
   pllab ("", "", "Polar Contour Plot");
 
-#  plFree2dGrid ($cgrid2);
+  plFree2dGrid($cgrid2);
 }
 
 # Shielded potential contour plot example
@@ -211,7 +211,7 @@ sub potential {
   plcol0 ($ncollab);
   pllab ("", "", "Shielded potential of charges in a conducting sphere");
 
-#  plFree2dGrid ($cgrid2);
+  plFree2dGrid($cgrid2);
 }
 
 # main