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(); }