From: Maxime Chupin (Ceremade) Date: Mon, 28 Nov 2016 13:14:20 +0000 (+0100) Subject: luamesh.lua: Ajout de la def des coordinate(s) des MeshPoints dans les dessins TikZ X-Git-Url: https://melusine.eu.org/syracuse/G/git/?a=commitdiff_plain;h=c08f7d2524bc559738fc7b21285c8c751705ef6f;p=delaunay.git luamesh.lua: Ajout de la def des coordinate(s) des MeshPoints dans les dessins TikZ --- diff --git a/doc/luamesh-doc.pdf b/doc/luamesh-doc.pdf index 4278d15..a2c839b 100644 Binary files a/doc/luamesh-doc.pdf and b/doc/luamesh-doc.pdf differ diff --git a/luamesh.lua b/luamesh.lua index e23d7a0..26a3cbf 100644 --- a/luamesh.lua +++ b/luamesh.lua @@ -255,6 +255,9 @@ end -- trace a triangulation with TikZ function traceMeshTikZ(listPoints, triangulation,points,color,colorBbox) output = "" + for i=1,#listPoints do + output = output .. "\\coordinate (MeshPoints".. i .. ") at (" .. listPoints[i].x .. "," .. listPoints[i].y .. ");" + end for i=1,#triangulation do PointI = listPoints[triangulation[i][1]] PointJ = listPoints[triangulation[i][2]] @@ -382,6 +385,9 @@ end -- print points of the mesh function tracePointsTikZ(listPoints,points,color,colorBbox) output = ""; + for i=1,#listPoints do + output = output .. "\\coordinate (MeshPoints".. i .. ") at (" .. listPoints[i].x .. "," .. listPoints[i].y .. ");" + end if(points=="points") then j=1 for i=1,#listPoints do @@ -507,6 +513,9 @@ function TeXaddOnePointTikZ(listPoints,P,step,bbox,color,colorBack, colorNew, co -- build the triangulation triangulation = BowyerWatson(listPoints,bbox) badTriangles = buildBadTriangles(P,triangulation) + for i=1,#listPoints do + output = output .. "\\coordinate (MeshPoints".. i .. ") at (" .. listPoints[i].x .. "," .. listPoints[i].y .. ");" + end if(step == "badT") then -- draw all triangle for i=1,#triangulation do