diff --git a/fem/src/ModelDescription.F90 b/fem/src/ModelDescription.F90 index 3fe104e8b3..3279fa39e1 100644 --- 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