doc/luamesh-doc.listing

   1   \documentclass{article}
   2   %% lualatex compilation
   3   \usepackage[margin=2.5cm]{geometry}
   4   \usepackage{luamesh}
   5   \usepackage{fontspec}
   6   \usepackage{multido}
   7   \pagestyle{empty}
   8
   9   \def\drawPath{draw (-2,-2)*u--(8,-2)*u--(8,6)*u--(-2,6)*u--cycle  withcolor 0.99white;}
  10   \def\clipPath{clip currentpicture to (-2,-2)*u--(8,-2)*u--(8,6)*u--(-2,6)*u--cycle;}
  11
  12   \begin{document}
  13
  14   \drawPointsMeshinc[
  15   mode=ext,
  16   bbox = show,
  17   colorBbox = blue!20,
  18   print=points
  19   ]
  20   {mesh.txt}%
  21   {%
  22     beginfig(0);
  23     \drawPath
  24   }%
  25   {%
  26     \clipPath
  27     endfig;
  28   }
  29   \newpage
  30   \buildMeshBWinc[
  31   mode=ext,
  32   bbox = show,
  33   colorBbox = blue!20,
  34   print=points
  35   ]
  36   {meshInit.txt}%
  37   {%
  38     beginfig(0);
  39     \drawPath
  40   }%
  41   {%
  42     \clipPath
  43     endfig;
  44   }
  45   \multido{\ii=5+1}{4}{%
  46     \newpage
  47     \meshAddPointBWinc[
  48     mode=ext,step=badtriangles,
  49     colorNew =green!20!red,
  50     colorBack=red!10,
  51     colorCircle = blue,
  52     bbox = show,
  53     colorBbox = blue!20
  54     ]
  55     {mesh.txt}{\ii}%
  56     {%
  57       beginfig(0);
  58       \drawPath
  59     }%
  60     {%
  61       \clipPath
  62       endfig;
  63     }   \newpage
  64     \meshAddPointBWinc[
  65     mode=ext,step=cavity,
  66     colorNew =green!20!red,
  67     colorBack=red!10,
  68     colorCircle = blue,
  69     bbox = show,
  70     colorBbox = blue!20
  71     ]
  72     {mesh.txt}{\ii}%
  73     {%
  74       beginfig(0);
  75       \drawPath
  76     }%
  77     {%
  78       \clipPath
  79       endfig;
  80     }  \newpage
  81     \meshAddPointBWinc[
  82     mode=ext,step=newtriangles,
  83     colorNew =green!20!red,
  84     colorBack=red!10,
  85     colorCircle = blue,
  86     bbox = show,
  87     colorBbox = blue!20]
  88     {mesh.txt}{\ii}%
  89     {%
  90       beginfig(0);
  91       \drawPath
  92     }%
  93     {%
  94       \clipPath
  95       endfig;
  96     }
  97   }
  98   \newpage
  99   \buildMeshBWinc[
 100   mode=ext,
 101   bbox = show,
 102   colorBbox = blue!20,
 103   print=points
 104   ]
 105   {mesh.txt}%
 106   {%
 107     beginfig(0);
 108     \drawPath
 109   }%
 110   {%
 111     \clipPath
 112     endfig;
 113   }
 114   \newpage
 115   \buildMeshBWinc[
 116   mode=ext,
 117   print=points
 118   ]
 119   {mesh.txt}%
 120   {%
 121     beginfig(0);
 122     \drawPath
 123   }%
 124   {%
 125     \clipPath
 126     endfig;
 127   }
 128 \end{document}