X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=delaunay.git;a=blobdiff_plain;f=test%2Fdelaunay.tex;h=5b983917f08ffd6b5ede9ebfdc339150de3fe884;hp=42abe52453886a81f5308fdf8db7adba8172273b;hb=d865bd5b172801559649eabbef29fd8f3898ce70;hpb=99c7eb1c5fdd23d7617d3817806af416e4614d15

diff --git a/test/delaunay.tex b/test/delaunay.tex
index 42abe52..5b98391 100644
--- a/test/delaunay.tex
+++ b/test/delaunay.tex
@@ -7,45 +7,77 @@
 \pagestyle{empty}
 \begin{document}
 
-\buildMesh[print=points,  meshpoint = I, color=red]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)}
+\buildMeshBW[print=points,  meshpoint = I, color=red]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)}
 
-\buildMesh[tikz, bbox = show]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)}
+%\buildMeshBW[tikz, bbox = show]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)}
 
-\buildMesh[mode=ext]{mesh.txt}
+\buildMeshBW[mode=ext,bbox = show, color=red,colorBbox = blue]{mesh.txt}
 
-\meshAddOnePoint[
+
+\buildMeshBWinc[mode=ext,bbox = show, color=red,colorBbox =
+blue]{mesh.txt}{%
+  beginfig(0);
+}%
+{%
+  draw MeshPoints[3] -- MeshPoints[9];
+  endfig;
+}
+
+\meshAddPointBW[
 meshpoint = x,
 colorNew =green!20!red,
 colorBack=red!10,
 colorCircle = green!70,
 scale=0.6cm]
 {(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(6,4)}{(3,1)}
-\meshAddOnePoint[
+\meshAddPointBW[
+color = green,
 meshpoint = x,
 colorBack=red!10,
 colorNew = green!20!red,
 scale=0.6cm,
 step=cavity]
 {(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(6,4)}{(3,1)}
-\meshAddOnePoint[
+\meshAddPointBW[
 meshpoint = x,
 colorBack=red!10,
 colorNew = green!20!red,
 scale=0.6cm,
-step=newtriangles,
-newpoint = y
+step=badtriangles,
+newpoint = y,
+bbox = show,
+colorBbox = black
 ]
 {(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(6,4)}{(3,1)}
 
-\multido{\ii=5+1}{3}{%
-  \newpage
-  \meshAddOnePoint[mode=ext,step=badtriangles]{mesh.txt}{\ii}
-  \newpage
-  \meshAddOnePoint[mode=ext,step=cavity]{mesh.txt}{\ii}
-  \newpage
-  \meshAddOnePoint[mode=ext,step=newtriangles]{mesh.txt}{\ii}
-}
+\mplibcolor\myclr{red}
+
+\newcommand\test{draw (0,0) -- (2cm,0) withcolor \myclr;}
+
+\begin{mplibcode}
+  beginfig(0);
+  %\meshAddOnePoint[picture=embedded]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(6,4)}{(3,1)}
+  \test
+  endfig;
+\end{mplibcode}
 
+\meshAddPointBWinc[
+meshpoint = x,
+colorBack=red!10,
+colorNew = green!20!red,
+scale=0.6cm,
+step=badtriangles,
+newpoint = y,
+bbox = show,
+colorBbox = blue!20,
+]
+{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(6,4)}{(3,1)}{%
+beginfig(0);
+}%
+{%
+  draw (-1,-1)*u--(8.5,-1)*u--(8.5,6)*u--(-1,6)*u--cycle;
+endfig;
+}
 
 
 \end{document}