X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=delaunay.git;a=blobdiff_plain;f=test%2Fdelaunay.tex;fp=test%2Fdelaunay.tex;h=18379424c323beb298858c2f16ad718444e64b16;hp=83dcdfbc19cf2c24d34d197ae99cca575a3ef52c;hb=d40b2486ba6be29e1e905d3b55dc7199af2abe8a;hpb=fe3a5df51411d6ea20f72115641db9bc7d19a466 diff --git a/test/delaunay.tex b/test/delaunay.tex index 83dcdfb..1837942 100644 --- a/test/delaunay.tex +++ b/test/delaunay.tex @@ -8,169 +8,169 @@ \begin{document} -% \section{MetaPost} - -% \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)} - -% %\buildMeshBW[tikz, bbox = show]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)} - -% \buildMeshBW[mode=ext,bbox = show, color=red,colorBbox = blue]{mesh.txt} - -% \drawPointsMesh[mode=ext,bbox = show, color=red,print=points]{mesh.txt} - -% \drawPointsMesh[mode=ext,bbox = show, color=red]{mesh.txt} - - -% \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)} -% \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)} -% \meshAddPointBW[ -% meshpoint = x, -% colorBack=red!10, -% colorNew = green!20!red, -% scale=0.6cm, -% 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)} - -% \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 withcolor \mpcolor{red}; -% endfig; +\section{MetaPost} + +\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)} + +%\buildMeshBW[tikz, bbox = show]{(0,0);(3.5,3);(7,0);(7.5,5);(1.61,3.14);(3,1);(6,1.5)} + +\buildMeshBW[mode=ext,bbox = show, color=red,colorBbox = blue]{mesh.txt} + +\drawPointsMesh[mode=ext,bbox = show, color=red,print=points]{mesh.txt} + +\drawPointsMesh[mode=ext,bbox = show, color=red]{mesh.txt} + + +\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)} +\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)} +\meshAddPointBW[ +meshpoint = x, +colorBack=red!10, +colorNew = green!20!red, +scale=0.6cm, +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)} + +\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 withcolor \mpcolor{red}; +endfig; +} + + +\section{tikz} + +\buildMeshBW[tikz,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[tikz,mode=ext, color=red]{mesh.txt} + +\drawPointsMesh[tikz,mode=ext,bbox = show, +color=red,print=points]{mesh.txt} +\drawPointsMesh[tikz,mode=ext,bbox = show, color=red]{mesh.txt} + +\buildMeshBWinc[tikz,mode=ext,bbox = show, colorBbox = blue]{mesh.txt}{% +}% +{% + \draw[color = red] (0,0) -- (3,3); +} + +\meshAddPointBW[ +tikz, +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)} + +\meshAddPointBWinc[ +tikz, +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)} +{}{\draw[color=green] (0,0) -- (3,3);} + +\meshAddPointBW[ +tikz, +meshpoint = x, +colorBack=red!10, +colorNew = green!20!red, +scale=0.6cm, +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)} + + +% \def\CircumPoint{y} +% \luampcolor +% \directlua{ +% buildVoronoiMP("mesh.txt","ext","points","","1cm","show") % } +\buildVoronoiBW[mode=ext]{mesh.txt} +\buildVoronoiBW[mode=ext,delaunay=show,colorVoronoi=green!60!blue]{mesh.txt}\par +\buildVoronoiBW[mode=ext,print=points,delaunay=show,bbox=show,meshpoint=x,circumpoint=y]{mesh.txt} -% \section{tikz} +\buildVoronoiBW[tikz,mode=ext]{mesh.txt} +\buildVoronoiBW[tikz,mode=ext,delaunay=show,colorVoronoi=green!60!blue]{mesh.txt}\par +\buildVoronoiBW[tikz,mode=ext,print=points,delaunay=show,bbox=show,meshpoint=x,circumpoint=y]{mesh.txt} -% \buildMeshBW[tikz,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)} +\buildVoronoiBWinc[mode=ext]{mesh.txt}{beginfig(0);}{endfig;} +\buildVoronoiBWinc[tikz,mode=ext,print=points]{mesh.txt}{}{} -% \buildMeshBW[tikz,mode=ext, color=red]{mesh.txt} -% \drawPointsMesh[tikz,mode=ext,bbox = show, -% color=red,print=points]{mesh.txt} -% \drawPointsMesh[tikz,mode=ext,bbox = show, color=red]{mesh.txt} - -% \buildMeshBWinc[tikz,mode=ext,bbox = show, colorBbox = blue]{mesh.txt}{% -% }% -% {% -% \draw[color = red] (0,0) -- (3,3); -% } +\buildVoronoiBWinc[tikz,mode=ext,print=points,delaunay=show,meshpoint=x,circumpoint=y]{mesh.txt}{}{\draw[color=blue,thick] (0,0)--(3,3);} -% \meshAddPointBW[ -% tikz, -% 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)} - -% \meshAddPointBWinc[ -% tikz, -% 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)} -% {}{\draw[color=green] (0,0) -- (3,3);} - -% \meshAddPointBW[ -% tikz, -% meshpoint = x, -% colorBack=red!10, -% colorNew = green!20!red, -% scale=0.6cm, -% 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)} - - -% % \def\CircumPoint{y} -% % \luampcolor -% % \directlua{ -% % buildVoronoiMP("mesh.txt","ext","points","","1cm","show") -% % } -% \buildVoronoiBW[mode=ext]{mesh.txt} -% \buildVoronoiBW[mode=ext,delaunay=show,colorVoronoi=green!60!blue]{mesh.txt}\par -% \buildVoronoiBW[mode=ext,print=points,delaunay=show,bbox=show,meshpoint=x,circumpoint=y]{mesh.txt} - - -% \buildVoronoiBW[tikz,mode=ext]{mesh.txt} -% \buildVoronoiBW[tikz,mode=ext,delaunay=show,colorVoronoi=green!60!blue]{mesh.txt}\par -% \buildVoronoiBW[tikz,mode=ext,print=points,delaunay=show,bbox=show,meshpoint=x,circumpoint=y]{mesh.txt} - -% \buildVoronoiBWinc[mode=ext]{mesh.txt}{beginfig(0);}{endfig;} -% \buildVoronoiBWinc[tikz,mode=ext,print=points]{mesh.txt}{}{} - - -% \buildVoronoiBWinc[tikz,mode=ext,print=points,delaunay=show,meshpoint=x,circumpoint=y]{mesh.txt}{}{\draw[color=blue,thick] (0,0)--(3,3);} - -% \def\MeshPoints{P} -% \directlua{ -% drawGmshMP("maillage.msh","points","8cm") -% }\par -% \directlua{ -% gmshVoronoiMP("maillage.msh","none","8cm","none") -% } +\def\MeshPoints{P} +\directlua{ + drawGmshMP("maillage.msh","points","8cm") +}\par +\directlua{ + gmshVoronoiMP("maillage.msh","none","8cm","none") +} -% \drawGmsh[tikz,scale=8cm]{maillage.msh} +\drawGmsh[tikz,scale=8cm]{maillage.msh} -% \gmshVoronoi[tikz,scale=8cm,print=points,delaunay=show]{maillage.msh} +\gmshVoronoi[tikz,scale=8cm,print=points,delaunay=show]{maillage.msh} \meshPolygon[step=polygon,scale=3cm]{(0,0);(1,0);(1,0.5);(0.5,1);(-0.3,0.3)}