[genius] Fri Mar 10 13:15:25 2017 Jiri (George) Lebl <jirka 5z com>

[George Lebl <jirka src gnome org>]

commit 6755e6ca9df9f28cdfeb9b2d438022ec9ae677e1
Author: Jiri (George) Lebl <jiri lebl gmail com>
Date:   Sat Apr 15 16:32:35 2017 -0500

    Fri Mar 10 13:15:25 2017  Jiri (George) Lebl <jirka 5z com>
    
        * examples/dalemb-pulse.gel: Add some other example functions
          (commented out) for playing around.

 examples/complex-analysis-mesh.gel    |    6 +++---
 examples/vibrating-drumhead-modes.gel |    8 ++++----
 2 files changed, 7 insertions(+), 7 deletions(-)
---
diff --git a/examples/complex-analysis-mesh.gel b/examples/complex-analysis-mesh.gel
index 7b2085c..9f4cf71 100644
--- a/examples/complex-analysis-mesh.gel
+++ b/examples/complex-analysis-mesh.gel
@@ -14,7 +14,7 @@
 #function f(z) = (3+1i)*z+(0.3+0.5i);
 #function f(z) = 4*z^2;
 #function f(z) = 10*z^3;
-#function f(z) = 4*(z-0.2)*(z+0.2);
+function f(z) = 4*(z-0.2)*(z+0.2);
 #function f(z) = 10*z^2*(z-0.2)
 #function f(z) = 0.25/z;
 #function f(z) = 0.25/conj(z);
@@ -24,8 +24,8 @@
 #approximately square grid
 LinePlotWindow = [-1.3,1.3,-1.0,1.0];
 
-shape = "circle";
-#shape = "rectangle";
+#shape = "circle";
+shape = "rectangle";
 
 # if to plot only outline of the rectangle or the circle
 only_outline = false;
diff --git a/examples/vibrating-drumhead-modes.gel b/examples/vibrating-drumhead-modes.gel
index 553495d..81ff579 100644
--- a/examples/vibrating-drumhead-modes.gel
+++ b/examples/vibrating-drumhead-modes.gel
@@ -84,9 +84,9 @@ SurfacePlotVariableNames = ["x","y","z"];
 
 #One mode
 if n >= 0 then (
-  for t=0.0 to 10.0 by 0.01 do (
+  for t=0.0 to 30.0 by 0.03 do (
     data = null;
-    for r=0 to 1.0 by 1/10.0 do (
+    for r=0 to 1.0 by 1.0/12 do (
       for theta=0 to 2*pi by pi/15 do (
         x = r*cos(theta);
         y = r*sin(theta);
@@ -98,9 +98,9 @@ if n >= 0 then (
     SurfacePlotData(data,[-1,1,-1,1,-1,1])
   )
 ) else (
-  for t=0.0 to 10.0 by 0.01 do (
+  for t=0.0 to 30.0 by 0.03 do (
     data = null;
-    for r=0 to 1.0 by 1/10.0 do (
+    for r=0 to 1.0 by 1.0/12 do (
       for theta=0 to 2*pi by pi/15 do (
         x = r*cos(theta);
         y = r*sin(theta);