\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}{%
+\drawPointsMeshinc[
+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[
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}