public void SetDistantEdgeNum(int dest, int locnum)
{
for (int i = 0; i < loc2distedge[locnum - 1].Size(); i += 1)
{
if (loc2distedge[locnum - 1][i] == dest)
{
return;
}
}
loc2distedge.Add(locnum - 1, dest);
}
public void UpdateCoarseGrid()
{
// cout << "UpdateCoarseGrid" << endl;
// if (is_updated) return;
NgMPI_Comm comm = mesh.GetCommunicator();
int id = comm.Rank();
int ntasks = comm.Size();
if (ntasks == 1)
{
return;
}
Reset();
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timer = NgProfiler::CreateTimer("UpdateCoarseGrid");
NgProfiler.RegionTimer reg = new NgProfiler.RegionTimer(UpdateCoarseGrid_timer);
(*testout) << "UPDATE COARSE GRID PARALLEL TOPOLOGY " << "\n";
if (id == 0)
{
PrintMessage(1, "update parallel topology");
}
// UpdateCoarseGridGlobal();
// MPI_Barrier (MPI_COMM_WORLD);
MPI_Group MPI_GROUP_comm = new MPI_Group();
MPI_Group MPI_LocalGroup = new MPI_Group();
MPI_Comm MPI_LocalComm = new MPI_Comm();
int[] process_ranks = { 0 };
MPI_Comm_group(comm, MPI_GROUP_comm);
MPI_Group_excl(MPI_GROUP_comm, 1, process_ranks, MPI_LocalGroup);
MPI_Comm_create(comm, MPI_LocalGroup, MPI_LocalComm);
if (id == 0)
{
return;
}
MeshTopology topology = mesh.GetTopology();
Array <int> cnt_send = new Array <int>(ntasks - 1);
// update new vertices after mesh-refinement
if (mesh.mlbetweennodes.Size() > 0)
{
// cout << "UpdateCoarseGrid - vertices" << endl;
int newnv = mesh.mlbetweennodes.Size();
loc2distvert.ChangeSize(mesh.mlbetweennodes.Size());
/*
* for (PointIndex pi = PointIndex::BASE; pi < newnv+PointIndex::BASE; pi++)
* {
* PointIndex v1 = mesh.mlbetweennodes[pi][0];
* PointIndex v2 = mesh.mlbetweennodes[pi][1];
* if (mesh.mlbetweennodes[pi][0] != PointIndex::BASE-1)
* for (int dest = 1; dest < ntasks; dest++)
* if (IsExchangeVert (dest, v1) && IsExchangeVert (dest, v2))
* SetDistantPNum(dest, pi);
* }
*/
bool changed = true;
while (changed)
{
changed = false;
// build exchange vertices
cnt_send = 0;
foreach (PointIndex pi in mesh.Points().Range())
{
foreach (int dist in GetDistantPNums(pi - PointIndex.BASE))
{
cnt_send[dist - 1]++;
}
}
TABLE <int> dest2vert = new TABLE <int>(cnt_send);
foreach (PointIndex pi in mesh.Points().Range())
{
foreach (int dist in GetDistantPNums(pi - PointIndex.BASE))
{
dest2vert.Add(dist - 1, pi);
}
}
for (PointIndex pi = PointIndex.BASE; pi < newnv + PointIndex.BASE; pi++)
{
PointIndex v1 = mesh.mlbetweennodes[pi][0];
PointIndex v2 = mesh.mlbetweennodes[pi][1];
if (mesh.mlbetweennodes[pi][0] != PointIndex.BASE - 1)
{
// for (int dest = 1; dest < ntasks; dest++)
foreach (int dest in GetDistantPNums(v1 - PointIndex.BASE))
{
if (IsExchangeVert(dest, new netgen.PointIndex(v1)) && IsExchangeVert(dest, new netgen.PointIndex(v2)))
{
cnt_send[dest - 1]++;
}
}
}
}
TABLE <int> dest2pair = new TABLE <int>(cnt_send);
// for (int dest = 1; dest < ntasks; dest++)
for (PointIndex pi = PointIndex.BASE; pi < newnv + PointIndex.BASE; pi++)
{
PointIndex v1 = mesh.mlbetweennodes[pi][0];
PointIndex v2 = mesh.mlbetweennodes[pi][1];
if (mesh.mlbetweennodes[pi][0] != PointIndex.BASE - 1)
{
foreach (int dest in GetDistantPNums(v1 - PointIndex.BASE))
{
if (IsExchangeVert(dest, new netgen.PointIndex(v1)) && IsExchangeVert(dest, new netgen.PointIndex(v2)))
{
dest2pair.Add(dest - 1, pi);
}
}
}
}
cnt_send = 0;
int v1;
int v2;
for (PointIndex pi = PointIndex.BASE; pi < newnv + PointIndex.BASE; pi++)
{
PointIndex v1 = mesh.mlbetweennodes[pi][0];
PointIndex v2 = mesh.mlbetweennodes[pi][1];
if (mesh.mlbetweennodes[pi][0] != PointIndex.BASE - 1)
{
foreach (int dest in GetDistantPNums(v1 - PointIndex.BASE))
{
if (IsExchangeVert(dest, new netgen.PointIndex(v2)))
{
cnt_send[dest - 1] += 2;
}
}
}
}
TABLE <int> send_verts = new TABLE <int>(cnt_send);
Array <int, PointIndex.BASE> loc2exchange = new Array <int, PointIndex.BASE>(mesh.GetNV());
for (int dest = 1; dest < ntasks; dest++)
{
if (dest != id)
{
loc2exchange = -1;
int cnt = 0;
/*
* for (PointIndex pi : mesh.Points().Range())
* if (IsExchangeVert(dest, pi))
* loc2exchange[pi] = cnt++;
*/
foreach (PointIndex pi in dest2vert[dest - 1])
{
loc2exchange[pi] = cnt++;
}
// for (PointIndex pi = PointIndex::BASE; pi < newnv+PointIndex::BASE; pi++)
foreach (PointIndex pi in dest2pair[dest - 1])
{
PointIndex v1 = mesh.mlbetweennodes[pi][0];
PointIndex v2 = mesh.mlbetweennodes[pi][1];
if (mesh.mlbetweennodes[pi][0] != PointIndex.BASE - 1)
{
if (IsExchangeVert(dest, new netgen.PointIndex(v1)) && IsExchangeVert(dest, new netgen.PointIndex(v2)))
{
send_verts.Add(dest - 1, loc2exchange[v1]);
send_verts.Add(dest - 1, loc2exchange[v2]);
}
}
}
}
}
TABLE <int> recv_verts = new TABLE <int>(ntasks - 1);
netgen.GlobalMembers.MyMPI_ExchangeTable(send_verts, recv_verts, MPI_TAG_MESH + 9, MPI_LocalComm);
for (int dest = 1; dest < ntasks; dest++)
{
if (dest != id)
{
loc2exchange = -1;
int cnt = 0;
/*
* for (PointIndex pi : mesh.Points().Range())
* if (IsExchangeVert(dest, pi))
* loc2exchange[pi] = cnt++;
*/
foreach (PointIndex pi in dest2vert[dest - 1])
{
loc2exchange[pi] = cnt++;
}
FlatArray <int> recvarray = recv_verts[dest - 1];
for (int ii = 0; ii < recvarray.Size(); ii += 2)
{
foreach (PointIndex pi in dest2pair[dest - 1])
{
// for (PointIndex pi = PointIndex::BASE; pi < newnv+PointIndex::BASE; pi++)
PointIndex v1 = mesh.mlbetweennodes[pi][0];
PointIndex v2 = mesh.mlbetweennodes[pi][1];
if (mesh.mlbetweennodes[pi][0] != PointIndex.BASE - 1)
{
INDEX_2 re = new INDEX_2(recvarray[ii], recvarray[ii + 1]);
INDEX_2 es = new INDEX_2(loc2exchange[v1], loc2exchange[v2]);
if (es == re && !IsExchangeVert(dest, new netgen.PointIndex(pi)))
{
SetDistantPNum(dest, new netgen.PointIndex(pi));
changed = true;
}
}
}
}
}
}
}
}
Array <int> sendarray = new Array <int>();
Array <int> recvarray = new Array <int>();
// cout << "UpdateCoarseGrid - edges" << endl;
// static int timerv = NgProfiler::CreateTimer ("UpdateCoarseGrid - ex vertices");
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timere = NgProfiler::CreateTimer("UpdateCoarseGrid - ex edges");
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timerf = NgProfiler::CreateTimer("UpdateCoarseGrid - ex faces");
NgProfiler.StartTimer(UpdateCoarseGrid_timere);
int nfa = topology.GetNFaces();
int ned = topology.GetNEdges();
// build exchange vertices
cnt_send = 0;
foreach (PointIndex pi in mesh.Points().Range())
{
foreach (int dist in GetDistantPNums(pi - PointIndex.BASE))
{
cnt_send[dist - 1]++;
}
}
TABLE <int> dest2vert = new TABLE <int>(cnt_send);
foreach (PointIndex pi in mesh.Points().Range())
{
foreach (int dist in GetDistantPNums(pi - PointIndex.BASE))
{
dest2vert.Add(dist - 1, pi);
}
}
// exchange edges
cnt_send = 0;
int v1;
int v2;
for (int edge = 1; edge <= ned; edge++)
{
topology.GetEdgeVertices(edge, ref v1, ref v2);
for (int dest = 1; dest < ntasks; dest++)
{
if (IsExchangeVert(dest, v1) && IsExchangeVert(dest, v2))
{
cnt_send[dest - 1] += 1;
}
}
}
TABLE <int> dest2edge = new TABLE <int>(cnt_send);
foreach (int v in cnt_send)
{
v *= 2;
}
TABLE <int> send_edges = new TABLE <int>(cnt_send);
for (int edge = 1; edge <= ned; edge++)
{
topology.GetEdgeVertices(edge, ref v1, ref v2);
for (int dest = 1; dest < ntasks; dest++)
{
if (IsExchangeVert(dest, v1) && IsExchangeVert(dest, v2))
{
dest2edge.Add(dest - 1, edge);
}
}
}
Array <int, PointIndex.BASE> loc2exchange = new Array <int, PointIndex.BASE>(mesh.GetNV());
for (int dest = 1; dest < ntasks; dest++)
{
loc2exchange = -1;
int cnt = 0;
foreach (PointIndex pi in dest2vert[dest - 1])
{
loc2exchange[pi] = cnt++;
}
foreach (int edge in dest2edge[dest - 1])
{
topology.GetEdgeVertices(edge, ref v1, ref v2);
if (IsExchangeVert(dest, v1) && IsExchangeVert(dest, v2))
{
send_edges.Add(dest - 1, loc2exchange[v1]);
send_edges.Add(dest - 1, loc2exchange[v2]);
}
}
}
// cout << "UpdateCoarseGrid - edges mpi-exchange" << endl;
TABLE <int> recv_edges = new TABLE <int>(ntasks - 1);
netgen.GlobalMembers.MyMPI_ExchangeTable(send_edges, recv_edges, MPI_TAG_MESH + 9, MPI_LocalComm);
// cout << "UpdateCoarseGrid - edges mpi-exchange done" << endl;
/*
* for (int dest = 1; dest < ntasks; dest++)
* {
* auto ex2loc = dest2vert[dest-1];
* FlatArray<int> recvarray = recv_edges[dest-1];
* for (int ii = 0; ii < recvarray.Size(); ii+=2)
* for (int edge : dest2edge[dest-1])
* {
* topology.GetEdgeVertices (edge, v1, v2);
* INDEX_2 re(ex2loc[recvarray[ii]],
* ex2loc[recvarray[ii+1]]);
* INDEX_2 es(v1, v2);
* if (es == re)
* SetDistantEdgeNum(dest, edge);
* }
* }
*/
for (int dest = 1; dest < ntasks; dest++)
{
var ex2loc = dest2vert[dest - 1];
if (ex2loc.Size() == 0)
{
continue;
}
INDEX_2_CLOSED_HASHTABLE <int> vert2edge = new INDEX_2_CLOSED_HASHTABLE <int>((uint)(2 * dest2edge[dest - 1].Size() + 10));
foreach (int edge in dest2edge[dest - 1])
{
topology.GetEdgeVertices(edge, ref v1, ref v2);
vert2edge.Set(new INDEX_2(v1, v2), edge);
}
FlatArray <int> recvarray = recv_edges[dest - 1];
for (int ii = 0; ii < recvarray.Size(); ii += 2)
{
INDEX_2 re = new INDEX_2(ex2loc[recvarray[ii]], ex2loc[recvarray[ii + 1]]);
if (vert2edge.Used(re))
{
SetDistantEdgeNum(dest, vert2edge.Get(re));
}
}
}
NgProfiler.StopTimer(UpdateCoarseGrid_timere);
// MPI_Barrier (MPI_LocalComm);
// cout << "UpdateCoarseGrid - faces" << endl;
if (mesh.GetDimension() == 3)
{
NgProfiler.StartTimer(UpdateCoarseGrid_timerf);
Array <int> verts = new Array <int>();
// exchange faces
cnt_send = 0;
for (int face = 1; face <= nfa; face++)
{
topology.GetFaceVertices(face, verts);
for (int dest = 1; dest < ntasks; dest++)
{
if (dest != id)
{
if (IsExchangeVert(dest, verts[0]) && IsExchangeVert(dest, verts[1]) && IsExchangeVert(dest, verts[2]))
{
cnt_send[dest - 1]++;
}
}
}
}
TABLE <int> dest2face = new TABLE <int>(cnt_send);
for (int face = 1; face <= nfa; face++)
{
topology.GetFaceVertices(face, verts);
for (int dest = 1; dest < ntasks; dest++)
{
if (dest != id)
{
if (IsExchangeVert(dest, verts[0]) && IsExchangeVert(dest, verts[1]) && IsExchangeVert(dest, verts[2]))
{
dest2face.Add(dest - 1, face);
}
}
}
}
foreach (int c in cnt_send)
{
c *= 3;
}
TABLE <int> send_faces = new TABLE <int>(cnt_send);
Array <int, PointIndex.BASE> loc2exchange = new Array <int, PointIndex.BASE>(mesh.GetNV());
for (int dest = 1; dest < ntasks; dest++)
{
if (dest != id)
{
/*
* loc2exchange = -1;
* int cnt = 0;
* for (PointIndex pi : mesh.Points().Range())
* if (IsExchangeVert(dest, pi))
* loc2exchange[pi] = cnt++;
*/
if (dest2vert[dest - 1].Size() == 0)
{
continue;
}
loc2exchange = -1;
int cnt = 0;
foreach (PointIndex pi in dest2vert[dest - 1])
{
loc2exchange[pi] = cnt++;
}
foreach (int face in dest2face[dest - 1])
{
topology.GetFaceVertices(face, verts);
if (IsExchangeVert(dest, verts[0]) && IsExchangeVert(dest, verts[1]) && IsExchangeVert(dest, verts[2]))
{
send_faces.Add(dest - 1, loc2exchange[verts[0]]);
send_faces.Add(dest - 1, loc2exchange[verts[1]]);
send_faces.Add(dest - 1, loc2exchange[verts[2]]);
}
}
}
}
// cout << "UpdateCoarseGrid - faces mpi-exchange" << endl;
TABLE <int> recv_faces = new TABLE <int>(ntasks - 1);
netgen.GlobalMembers.MyMPI_ExchangeTable(send_faces, recv_faces, MPI_TAG_MESH + 9, MPI_LocalComm);
// cout << "UpdateCoarseGrid - faces mpi-exchange done" << endl;
/*
* for (int dest = 1; dest < ntasks; dest++)
* if (dest != id)
* {
* loc2exchange = -1;
* int cnt = 0;
* for (PointIndex pi : dest2vert[dest-1])
* loc2exchange[pi] = cnt++;
*
* FlatArray<int> recvarray = recv_faces[dest-1];
* for (int ii = 0; ii < recvarray.Size(); ii+=3)
* for (int face : dest2face[dest-1])
* {
* topology.GetFaceVertices (face, verts);
* INDEX_3 re(recvarray[ii], recvarray[ii+1], recvarray[ii+2]);
* INDEX_3 es(loc2exchange[verts[0]], loc2exchange[verts[1]], loc2exchange[verts[2]]);
* if (es == re)
* SetDistantFaceNum(dest, face);
* }
* }
*/
for (int dest = 1; dest < ntasks; dest++)
{
var ex2loc = dest2vert[dest - 1];
if (ex2loc.Size() == 0)
{
continue;
}
INDEX_3_CLOSED_HASHTABLE <int> vert2face = new INDEX_3_CLOSED_HASHTABLE <int>(2 * dest2face[dest - 1].Size() + 10);
foreach (int face in dest2face[dest - 1])
{
topology.GetFaceVertices(face, verts);
vert2face.Set(new INDEX_3(verts[0], verts[1], verts[2]), face);
}
FlatArray <int> recvarray = recv_faces[dest - 1];
for (int ii = 0; ii < recvarray.Size(); ii += 3)
{
INDEX_3 re = new INDEX_3(ex2loc[recvarray[ii]], ex2loc[recvarray[ii + 1]], ex2loc[recvarray[ii + 2]]);
if (vert2face.Used(re))
{
SetDistantFaceNum(dest, vert2face.Get(re));
}
}
}
/*
* Array<int,1> glob2loc;
*
* int maxface = 0;
* for (int face = 1; face <= nfa; face++)
* maxface = max (maxface, GetGlobalFaceNum (face));
*
* // glob2loc.SetSize (nfaglob);
* glob2loc.SetSize (maxface);
* glob2loc = -1;
*
* for (int loc = 1; loc <= nfa; loc++)
* glob2loc[GetGlobalFaceNum(loc)] = loc;
*
* cnt_send = 0;
* Array<int> verts;
* for (int face = 1; face <= nfa; face++)
* {
* topology.GetFaceVertices (face, verts);
* for (int dest = 1; dest < ntasks; dest++)
* if (IsExchangeVert (dest, verts[0]) &&
* IsExchangeVert (dest, verts[1]) &&
* IsExchangeVert (dest, verts[2]))
* {
* cnt_send[dest-1]+=2;
* }
* }
*
* TABLE<int> send_faces(cnt_send);
* for (int face = 1; face <= nfa; face++)
* {
* topology.GetFaceVertices (face, verts);
* for (int dest = 1; dest < ntasks; dest++)
* {
* if (IsExchangeVert (dest, verts[0]) &&
* IsExchangeVert (dest, verts[1]) &&
* IsExchangeVert (dest, verts[2]))
* {
* send_faces.Add (dest-1, GetGlobalFaceNum(face));
* send_faces.Add (dest-1, face);
* }
* }
* }
* TABLE<int> recv_faces(ntasks-1);
* MyMPI_ExchangeTable (send_faces, recv_faces, MPI_TAG_MESH+8, MPI_LocalComm);
*
* for (int sender = 1; sender < ntasks; sender ++)
* if (id != sender)
* {
* FlatArray<int> recvarray = recv_faces[sender-1];
*
* for (int ii = 0; ii < recvarray.Size(); )
* {
* int globf = recvarray[ii++];
* int distf = recvarray[ii++];
*
* if (globf <= maxface)
* {
* int locf = glob2loc[globf];
* if (locf != -1)
* SetDistantFaceNum (sender, locf);
* }
* }
* }
*/
NgProfiler.StopTimer(UpdateCoarseGrid_timerf);
}
// cout << "UpdateCoarseGrid - done" << endl;
is_updated = true;
}
public void CombineImprove(Mesh mesh)
{
if (!faceindex)
{
PrintMessage(3, "Combine improve");
for (faceindex = 1; faceindex <= mesh.GetNFD(); faceindex++)
{
CombineImprove(mesh);
if (multithread.terminate)
{
throw new Exception("Meshing stopped");
}
}
faceindex = 0;
return;
}
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timer = NgProfiler::CreateTimer("Combineimprove 2D");
NgProfiler.RegionTimer reg = new NgProfiler.RegionTimer(CombineImprove_timer);
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timerstart = NgProfiler::CreateTimer("Combineimprove 2D start");
NgProfiler.StartTimer(CombineImprove_timerstart);
//C++ TO C# CONVERTER NOTE: This static local variable declaration (not allowed in C#) has been moved just prior to the method:
// static int timerstart1 = NgProfiler::CreateTimer("Combineimprove 2D start1");
NgProfiler.StartTimer(CombineImprove_timerstart1);
// int i, j, k, l;
// PointIndex pi;
// SurfaceElementIndex sei;
Array <SurfaceElementIndex> seia = new Array <SurfaceElementIndex>();
mesh.GetSurfaceElementsOfFace(faceindex, seia);
for (int i = 0; i < seia.Size(); i++)
{
if (mesh[seia[i]].GetNP() != 3)
{
return;
}
}
int surfnr = 0;
if (faceindex)
{
surfnr = mesh.GetFaceDescriptor(faceindex).SurfNr();
}
// PointIndex pi1, pi2;
// MeshPoint p1, p2, pnew;
double bad1;
double bad2;
Vec <3> nv;
int np = mesh.GetNP();
//int nse = mesh.GetNSE();
TABLE <SurfaceElementIndex, PointIndex.BASE> elementsonnode = new TABLE <SurfaceElementIndex, PointIndex.BASE>(np);
Array <SurfaceElementIndex> hasonepi = new Array <SurfaceElementIndex>();
Array <SurfaceElementIndex> hasbothpi = new Array <SurfaceElementIndex>();
for (int i = 0; i < seia.Size(); i++)
{
Element2d el = mesh[seia[i]];
for (int j = 0; j < el.GetNP(); j++)
{
elementsonnode.Add(el[j], seia[i]);
}
}
Array <bool, PointIndex.BASE> @fixed = new Array <bool, PointIndex.BASE>(np);
@fixed = false;
NgProfiler.StopTimer(CombineImprove_timerstart1);
/*
* for (SegmentIndex si = 0; si < mesh.GetNSeg(); si++)
* {
* INDEX_2 i2(mesh[si][0], mesh[si][1]);
* fixed[i2.I1()] = true;
* fixed[i2.I2()] = true;
* }
*/
for (int i = 0; i < seia.Size(); i++)
{
Element2d sel = mesh[seia[i]];
for (int j = 0; j < sel.GetNP(); j++)
{
PointIndex pi1 = sel.PNumMod(j + 2);
PointIndex pi2 = sel.PNumMod(j + 3);
if (mesh.IsSegment(pi1, pi2))
{
@fixed[pi1] = true;
@fixed[pi2] = true;
}
}
}
for (int i = 0; i < mesh.LockedPoints().Size(); i++)
{
@fixed[mesh.LockedPoints()[i]] = true;
}
Array <Vec <3>, PointIndex.BASE> normals = new Array <Vec <3>, PointIndex.BASE>(np);
for (PointIndex pi = mesh.Points().Begin(); pi < mesh.Points().End(); pi++)
{
if (elementsonnode[pi].Size())
{
Element2d hel = mesh[elementsonnode[pi][0]];
for (int k = 0; k < 3; k++)
{
if (hel[k] == pi)
{
SelectSurfaceOfPoint(mesh[pi], hel.GeomInfoPi(k + 1));
GetNormalVector(surfnr, mesh[pi], hel.GeomInfoPi(k + 1), normals[pi]);
break;
}
}
}
}
NgProfiler.StopTimer(CombineImprove_timerstart);
for (int i = 0; i < seia.Size(); i++)
{
SurfaceElementIndex sei = seia[i];
Element2d elem = mesh[sei];
if (elem.IsDeleted())
{
continue;
}
for (int j = 0; j < 3; j++)
{
PointIndex pi1 = elem[j];
PointIndex pi2 = elem[(j + 1) % 3];
if (pi1 < PointIndex.BASE || pi2 < PointIndex.BASE)
{
continue;
}
/*
* INDEX_2 i2(pi1, pi2);
* i2.Sort();
* if (segmentht.Used(i2))
* continue;
*/
bool debugflag = false;
if (debugflag)
{
(*testout) << "Combineimprove, face = " << faceindex << "pi1 = " << pi1 << " pi2 = " << pi2 << "\n";
}
/*
* // save version:
* if (fixed.Get(pi1) || fixed.Get(pi2))
* continue;
* if (pi2 < pi1) swap (pi1, pi2);
*/
// more general
if (@fixed[pi2])
{
netgen.GlobalMembers.Swap(ref pi1, ref pi2);
}
if (@fixed[pi2])
{
continue;
}
double loch = mesh.GetH(mesh[pi1]);
INDEX_2 si2 = new INDEX_2(pi1, pi2);
si2.Sort();
/*
* if (edgetested.Used (si2))
* continue;
* edgetested.Set (si2, 1);
*/
hasonepi.SetSize(0);
hasbothpi.SetSize(0);
for (int k = 0; k < elementsonnode[pi1].Size(); k++)
{
Element2d el2 = mesh[elementsonnode[pi1][k]];
if (el2.IsDeleted())
{
continue;
}
if (el2[0] == pi2 || el2[1] == pi2 || el2[2] == pi2)
{
hasbothpi.Append(elementsonnode[pi1][k]);
nv = netgen.GlobalMembers.Cross(new Vec3d(mesh[el2[0]], mesh[el2[1]]), new Vec3d(mesh[el2[0]], mesh[el2[2]]));
}
else
{
hasonepi.Append(elementsonnode[pi1][k]);
}
}
Element2d hel = mesh[hasbothpi[0]];
for (int k = 0; k < 3; k++)
{
if (hel[k] == pi1)
{
SelectSurfaceOfPoint(mesh[pi1], hel.GeomInfoPi(k + 1));
GetNormalVector(surfnr, mesh[pi1], hel.GeomInfoPi(k + 1), nv);
break;
}
}
// nv = normals.Get(pi1);
for (int k = 0; k < elementsonnode[pi2].Size(); k++)
{
Element2d el2 = mesh[elementsonnode[pi2][k]];
if (el2.IsDeleted())
{
continue;
}
if (el2[0] == pi1 || el2[1] == pi1 || el2[2] == pi1)
{
;
}
else
{
hasonepi.Append(elementsonnode[pi2][k]);
}
}
bad1 = 0;
int illegal1 = 0;
int illegal2 = 0;
for (int k = 0; k < hasonepi.Size(); k++)
{
Element2d el = mesh[hasonepi[k]];
bad1 += CalcTriangleBadness(mesh[el[0]], mesh[el[1]], mesh[el[2]], nv, -1, loch);
illegal1 += 1 - mesh.LegalTrig(el);
}
for (int k = 0; k < hasbothpi.Size(); k++)
{
Element2d el = mesh[hasbothpi[k]];
bad1 += CalcTriangleBadness(mesh[el[0]], mesh[el[1]], mesh[el[2]], nv, -1, loch);
illegal1 += 1 - mesh.LegalTrig(el);
}
bad1 /= (hasonepi.Size() + hasbothpi.Size());
MeshPoint p1 = mesh[pi1];
MeshPoint p2 = mesh[pi2];
MeshPoint pnew = new MeshPoint(p1);
mesh[pi1] = pnew;
mesh[pi2] = pnew;
bad2 = 0;
for (int k = 0; k < hasonepi.Size(); k++)
{
Element2d el = mesh[hasonepi[k]];
double err = CalcTriangleBadness(mesh[el[0]], mesh[el[1]], mesh[el[2]], nv, -1, loch);
bad2 += err;
Vec <3> hnv = netgen.GlobalMembers.Cross(new Vec3d(mesh[el[0]], mesh[el[1]]), new Vec3d(mesh[el[0]], mesh[el[2]]));
if (hnv * nv < 0)
{
bad2 += 1e10;
}
for (int l = 0; l < 3; l++)
{
if ((normals[el[l]] * nv) < 0.5)
{
bad2 += 1e10;
}
}
illegal2 += 1 - mesh.LegalTrig(el);
}
bad2 /= hasonepi.Size();
mesh[pi1] = p1;
mesh[pi2] = p2;
if (debugflag)
{
(*testout) << "bad1 = " << bad1 << ", bad2 = " << bad2 << "\n";
}
bool should = (bad2 < bad1 && bad2 < 1e4);
if (bad2 < 1e4)
{
if (illegal1 > illegal2)
{
should = true;
}
if (illegal2 > illegal1)
{
should = false;
}
}
if (should)
{
/*
* (*testout) << "combine !" << endl;
* (*testout) << "bad1 = " << bad1 << ", bad2 = " << bad2 << endl;
* (*testout) << "illegal1 = " << illegal1 << ", illegal2 = " << illegal2 << endl;
* (*testout) << "loch = " << loch << endl;
*/
mesh[pi1] = pnew;
PointGeomInfo gi = new PointGeomInfo();
// bool gi_set(false);
Element2d el1p = new Element2d(null);
int l = 0;
while (mesh[elementsonnode[pi1][l]].IsDeleted() && l < elementsonnode.EntrySize(pi1))
{
l++;
}
if (l < elementsonnode.EntrySize(pi1))
{
el1p = mesh[elementsonnode[pi1][l]];
}
else
{
cerr << "OOPS!" << "\n";
}
for (l = 0; l < el1p.GetNP(); l++)
{
if (el1p[l] == pi1)
{
gi = el1p.GeomInfoPi(l + 1);
// gi_set = true;
}
}
// (*testout) << "Connect point " << pi2 << " to " << pi1 << "\n";
for (int k = 0; k < elementsonnode[pi2].Size(); k++)
{
Element2d el = mesh[elementsonnode[pi2][k]];
if (el.IsDeleted())
{
continue;
}
elementsonnode.Add(pi1, elementsonnode[pi2][k]);
bool haspi1 = false;
for (l = 0; l < el.GetNP(); l++)
{
if (el[l] == pi1)
{
haspi1 = true;
}
}
if (haspi1)
{
continue;
}
for (int l = 0; l < el.GetNP(); l++)
{
if (el[l] == pi2)
{
el[l] = pi1;
el.GeomInfoPi(l + 1) = gi;
}
@fixed[el[l]] = true;
}
}
/*
* for (k = 0; k < hasbothpi.Size(); k++)
* {
* cout << mesh[hasbothpi[k]] << endl;
* for (l = 0; l < 3; l++)
* cout << mesh[mesh[hasbothpi[k]][l]] << " ";
* cout << endl;
* }
*/
for (int k = 0; k < hasbothpi.Size(); k++)
{
mesh[hasbothpi[k]].Delete();
/*
* for (l = 0; l < 4; l++)
* mesh[hasbothpi[k]][l] = PointIndex::BASE-1;
*/
}
}
}
}
// mesh.Compress();
mesh.SetNextTimeStamp();
}
