ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2025-02-11 04:43:08 +05:00
Code Issues Packages Projects Releases Wiki Activity

partitioning

Browse Source
This commit is contained in:
Joachim Schoeberl 2015-02-05 14:29:21 +00:00
parent 492cff546d
commit e61f1c9312
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
ng/ngpkg.cpp
View File

@ -2650,6 +2650,7 @@ namespace netgen
Tcl_Interp * interp, Tcl_Interp * interp,
int argc, tcl_const char *argv[]) int argc, tcl_const char *argv[])
{ {
#ifdef PARALLEL
if (!mesh) if (!mesh)
{ {
Tcl_SetResult (interp, err_needsmesh, TCL_STATIC); Tcl_SetResult (interp, err_needsmesh, TCL_STATIC);
@ -2665,6 +2666,17 @@ namespace netgen
for (ElementIndex ei = 0; ei < mesh->GetNE(); ei++) for (ElementIndex ei = 0; ei < mesh->GetNE(); ei++)
(*mesh)[ei].SetIndex ( (*mesh)[ei].GetPartition() ); (*mesh)[ei].SetIndex ( (*mesh)[ei].GetPartition() );
return TCL_OK;
#else
Tcl_SetResult (interp, (char*)"metis not available", TCL_STATIC);
return TCL_ERROR;
#endif
#ifdef METISold #ifdef METISold
if (!mesh) if (!mesh)
@ -2741,7 +2753,6 @@ namespace netgen
#endif #endif
return TCL_OK;
} }