Do not prepare mesh by default for p-elements before splitting.

ElmerCSC · Jan 30, 2025 · fc663ee · fc663ee
1 parent 2d62e2d
commit fc663ee
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/fem/src/ModelDescription.F90 b/fem/src/ModelDescription.F90
@@ -2984,7 +2984,9 @@ FUNCTION LoadModel( ModelName,BoundariesOnly,numprocs,mype,MeshIndex) RESULT( Mo
 
       IF( MeshLevels > 1 ) THEN
         ! This has been commented out, but is needed. There may be some issues in parallel still...
-        CALL PrepareMesh( Model, NewMesh, ParEnv % PEs > 1 )        
+        IF(ListGetLogical(Model % Simulation,'Prepare Mesh Before Split',GotIt) ) THEN
+          CALL PrepareMesh( Model, NewMesh, ParEnv % PEs > 1 )
+        END IF
       END IF