X-Git-Url: https://melusine.eu.org/syracuse/G/git/?a=blobdiff_plain;f=test%2Fanimation.tex;h=aa5c29c4b5b9f3efed0795f71161bc4426c238b5;hb=c25242309db6a2554651e368376b07d30afc3601;hp=b3d33a749db4684c8219314be844abefd1e95239;hpb=f5b04999414b0f514d2fea252417c05ac2efeeac;p=delaunay.git

diff --git a/test/animation.tex b/test/animation.tex
index b3d33a7..aa5c29c 100644
--- a/test/animation.tex
+++ b/test/animation.tex
@@ -6,39 +6,79 @@
 \usepackage{multido}
 \pagestyle{empty}
 
+\def\drawPath{draw (-2,-2)*u--(8,-2)*u--(8,6)*u--(-2,6)*u--cycle  withcolor 0.99white;}
+\def\clipPath{clip currentpicture to (-2,-2)*u--(8,-2)*u--(8,6)*u--(-2,6)*u--cycle;}
 
 \begin{document}
 
-\multido{\ii=5+1}{3}{%
+\tracePointsMeshinc[
+mode=ext,
+bbox = show,
+colorBbox = blue!20,
+print=points
+]
+{mesh.txt}%
+{%
+  beginfig(0);
+  \drawPath
+}%
+{%
+  \clipPath
+  endfig;
+}
+
+\newpage
+
+\buildMeshBWinc[
+mode=ext,
+bbox = show,
+colorBbox = blue!20,
+print=points
+]
+{meshInit.txt}%
+{%
+  beginfig(0);
+  \drawPath
+}%
+{%
+  \clipPath
+  endfig;
+}
+
+\multido{\ii=5+1}{4}{%
   \newpage
   \meshAddPointBWinc[
   mode=ext,step=badtriangles,
   colorNew =green!20!red,
   colorBack=red!10,
   colorCircle = blue,
+  bbox = show,
+  colorBbox = blue!20
   ]
   {mesh.txt}{\ii}%
   {%
     beginfig(0);
+    \drawPath
   }%
   {%
-    draw (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle withcolor 0.99white;
-    clip currentpicture to (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle;
+    \clipPath
     endfig;
-  }  \newpage
+  }   \newpage
   \meshAddPointBWinc[
   mode=ext,step=cavity,
   colorNew =green!20!red,
   colorBack=red!10,
   colorCircle = blue,
+  bbox = show,
+  colorBbox = blue!20
   ]
   {mesh.txt}{\ii}%
   {%
     beginfig(0);
+    \drawPath
   }%
   {%
-    draw (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle withcolor 0.99white;
-    clip currentpicture to (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle;
+    \clipPath
     endfig;
   }  \newpage
   \meshAddPointBWinc[
@@ -46,18 +86,47 @@
   colorNew =green!20!red,
   colorBack=red!10,
   colorCircle = blue,
-  ]
+  bbox = show,
+  colorBbox = blue!20]
   {mesh.txt}{\ii}%
   {%
     beginfig(0);
+    \drawPath
   }%
   {%
-    draw (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle withcolor 0.99white;
-    clip currentpicture to (-1,-1)*u--(7.5,-1)*u--(7.5,5)*u--(-1,5)*u--cycle;
+    \clipPath
     endfig;
   }
 }
-
-
+\newpage
+\buildMeshBWinc[
+mode=ext,
+bbox = show,
+colorBbox = blue!20,
+print=points
+]
+{mesh.txt}%
+{%
+  beginfig(0);
+  \drawPath
+}%
+{%
+  \clipPath
+  endfig;
+}
+\newpage
+\buildMeshBWinc[
+mode=ext,
+print=points
+]
+{mesh.txt}%
+{%
+  beginfig(0);
+  \drawPath
+}%
+{%
+  \clipPath
+  endfig;
+}
 
 \end{document}