NewModel

Parser/Gmsh.l

@@ -204,6 +204,7 @@ MPI_Rank                return tMPI_Rank;
 MPI_Size                return tMPI_Size;
 Memory                  return tMemory;
 
+NewModel                return tNewModel;
 Nurbs			return tNurbs;
 
 OnelabAction            return tOnelabAction;

Parser/Gmsh.tab.hpp

@@ -99,121 +99,122 @@ extern int gmsh_yydebug;
      tToday = 308,
      tFixRelativePath = 309,
      tSyncModel = 310,
-     tOnelabAction = 311,
-     tOnelabRun = 312,
-     tCpu = 313,
-     tMemory = 314,
-     tTotalMemory = 315,
-     tCreateTopology = 316,
-     tCreateTopologyNoHoles = 317,
-     tDistanceFunction = 318,
-     tDefineConstant = 319,
-     tUndefineConstant = 320,
-     tDefineNumber = 321,
-     tDefineString = 322,
-     tPoint = 323,
-     tCircle = 324,
-     tEllipse = 325,
-     tLine = 326,
-     tSphere = 327,
-     tPolarSphere = 328,
-     tSurface = 329,
-     tSpline = 330,
-     tVolume = 331,
-     tCharacteristic = 332,
-     tLength = 333,
-     tParametric = 334,
-     tElliptic = 335,
-     tRefineMesh = 336,
-     tAdaptMesh = 337,
-     tRelocateMesh = 338,
-     tPlane = 339,
-     tRuled = 340,
-     tTransfinite = 341,
-     tComplex = 342,
-     tPhysical = 343,
-     tCompound = 344,
-     tPeriodic = 345,
-     tUsing = 346,
-     tPlugin = 347,
-     tDegenerated = 348,
-     tRecursive = 349,
-     tRotate = 350,
-     tTranslate = 351,
-     tSymmetry = 352,
-     tDilate = 353,
-     tExtrude = 354,
-     tLevelset = 355,
-     tRecombine = 356,
-     tSmoother = 357,
-     tSplit = 358,
-     tDelete = 359,
-     tCoherence = 360,
-     tIntersect = 361,
-     tMeshAlgorithm = 362,
-     tReverse = 363,
-     tLayers = 364,
-     tScaleLast = 365,
-     tHole = 366,
-     tAlias = 367,
-     tAliasWithOptions = 368,
-     tCopyOptions = 369,
-     tQuadTriAddVerts = 370,
-     tQuadTriNoNewVerts = 371,
-     tQuadTriSngl = 372,
-     tQuadTriDbl = 373,
-     tRecombLaterals = 374,
-     tTransfQuadTri = 375,
-     tText2D = 376,
-     tText3D = 377,
-     tInterpolationScheme = 378,
-     tTime = 379,
-     tCombine = 380,
-     tBSpline = 381,
-     tBezier = 382,
-     tNurbs = 383,
-     tNurbsOrder = 384,
-     tNurbsKnots = 385,
-     tColor = 386,
-     tColorTable = 387,
-     tFor = 388,
-     tIn = 389,
-     tEndFor = 390,
-     tIf = 391,
-     tEndIf = 392,
-     tExit = 393,
-     tAbort = 394,
-     tField = 395,
-     tReturn = 396,
-     tCall = 397,
-     tFunction = 398,
-     tShow = 399,
-     tHide = 400,
-     tGetValue = 401,
-     tGetEnv = 402,
-     tGetString = 403,
-     tHomology = 404,
-     tCohomology = 405,
-     tBetti = 406,
-     tSetOrder = 407,
-     tExists = 408,
-     tFileExists = 409,
-     tGMSH_MAJOR_VERSION = 410,
-     tGMSH_MINOR_VERSION = 411,
-     tGMSH_PATCH_VERSION = 412,
-     tAFFECTDIVIDE = 413,
-     tAFFECTTIMES = 414,
-     tAFFECTMINUS = 415,
-     tAFFECTPLUS = 416,
-     tOR = 417,
-     tAND = 418,
-     tNOTEQUAL = 419,
-     tEQUAL = 420,
-     tGREATEROREQUAL = 421,
-     tLESSOREQUAL = 422,
-     UNARYPREC = 423,
-     tMINUSMINUS = 424,
-     tPLUSPLUS = 425
+     tNewModel = 311,
+     tOnelabAction = 312,
+     tOnelabRun = 313,
+     tCpu = 314,
+     tMemory = 315,
+     tTotalMemory = 316,
+     tCreateTopology = 317,
+     tCreateTopologyNoHoles = 318,
+     tDistanceFunction = 319,
+     tDefineConstant = 320,
+     tUndefineConstant = 321,
+     tDefineNumber = 322,
+     tDefineString = 323,
+     tPoint = 324,
+     tCircle = 325,
+     tEllipse = 326,
+     tLine = 327,
+     tSphere = 328,
+     tPolarSphere = 329,
+     tSurface = 330,
+     tSpline = 331,
+     tVolume = 332,
+     tCharacteristic = 333,
+     tLength = 334,
+     tParametric = 335,
+     tElliptic = 336,
+     tRefineMesh = 337,
+     tAdaptMesh = 338,
+     tRelocateMesh = 339,
+     tPlane = 340,
+     tRuled = 341,
+     tTransfinite = 342,
+     tComplex = 343,
+     tPhysical = 344,
+     tCompound = 345,
+     tPeriodic = 346,
+     tUsing = 347,
+     tPlugin = 348,
+     tDegenerated = 349,
+     tRecursive = 350,
+     tRotate = 351,
+     tTranslate = 352,
+     tSymmetry = 353,
+     tDilate = 354,
+     tExtrude = 355,
+     tLevelset = 356,
+     tRecombine = 357,
+     tSmoother = 358,
+     tSplit = 359,
+     tDelete = 360,
+     tCoherence = 361,
+     tIntersect = 362,
+     tMeshAlgorithm = 363,
+     tReverse = 364,
+     tLayers = 365,
+     tScaleLast = 366,
+     tHole = 367,
+     tAlias = 368,
+     tAliasWithOptions = 369,
+     tCopyOptions = 370,
+     tQuadTriAddVerts = 371,
+     tQuadTriNoNewVerts = 372,
+     tQuadTriSngl = 373,
+     tQuadTriDbl = 374,
+     tRecombLaterals = 375,
+     tTransfQuadTri = 376,
+     tText2D = 377,
+     tText3D = 378,
+     tInterpolationScheme = 379,
+     tTime = 380,
+     tCombine = 381,
+     tBSpline = 382,
+     tBezier = 383,
+     tNurbs = 384,
+     tNurbsOrder = 385,
+     tNurbsKnots = 386,
+     tColor = 387,
+     tColorTable = 388,
+     tFor = 389,
+     tIn = 390,
+     tEndFor = 391,
+     tIf = 392,
+     tEndIf = 393,
+     tExit = 394,
+     tAbort = 395,
+     tField = 396,
+     tReturn = 397,
+     tCall = 398,
+     tFunction = 399,
+     tShow = 400,
+     tHide = 401,
+     tGetValue = 402,
+     tGetEnv = 403,
+     tGetString = 404,
+     tHomology = 405,
+     tCohomology = 406,
+     tBetti = 407,
+     tSetOrder = 408,
+     tExists = 409,
+     tFileExists = 410,
+     tGMSH_MAJOR_VERSION = 411,
+     tGMSH_MINOR_VERSION = 412,
+     tGMSH_PATCH_VERSION = 413,
+     tAFFECTDIVIDE = 414,
+     tAFFECTTIMES = 415,
+     tAFFECTMINUS = 416,
+     tAFFECTPLUS = 417,
+     tOR = 418,
+     tAND = 419,
+     tNOTEQUAL = 420,
+     tEQUAL = 421,
+     tGREATEROREQUAL = 422,
+     tLESSOREQUAL = 423,
+     UNARYPREC = 424,
+     tMINUSMINUS = 425,
+     tPLUSPLUS = 426
    };
 #endif
 
@@ -234,7 +235,7 @@ typedef union YYSTYPE
 
 
 /* Line 2053 of yacc.c  */
-#line 238 "Gmsh.tab.hpp"
+#line 239 "Gmsh.tab.hpp"
 } YYSTYPE;
 # define YYSTYPE_IS_TRIVIAL 1
 # define yystype YYSTYPE /* obsolescent; will be withdrawn */

Parser/Gmsh.y

@@ -116,7 +116,8 @@ struct doubleXstring{
 %token tPrintf tError tStr tSprintf tStrCat tStrPrefix tStrRelative tStrReplace
 %token tFind tStrFind tStrCmp tStrChoice
 %token tTextAttributes
-%token tBoundingBox tDraw tSetChanged tToday tFixRelativePath tSyncModel
+%token tBoundingBox tDraw tSetChanged tToday tFixRelativePath
+%token tSyncModel tNewModel
 %token tOnelabAction tOnelabRun
 %token tCpu tMemory tTotalMemory
 %token tCreateTopology tCreateTopologyNoHoles
@@ -2885,6 +2886,11 @@ Command :
       // GModel directly during parsing.
       GModel::current()->importGEOInternals();
     }
+   | tNewModel tEND
+    {
+      new GModel();
+      GModel::current(GModel::list.size() - 1);
+    }
    | tBoundingBox tEND
     {
       CTX::instance()->forcedBBox = 0;

doc/texinfo/gmsh.texi

@@ -1798,6 +1798,9 @@ Changes the name of the current model.
 Forces an immediate transfer from the old geometrical database into the
 new one (this transfer normally occurs right after a file is read).
 
+@item NewModel;
+Creates a new current model.
+
 @item Include @var{char-expression};
 Includes the file named @var{char-expression} at the current position in the
 input file. The include command should be given on a line of its own.  If