/* A Bison parser, made from Gmsh.y
by GNU Bison version 1.28 */
#define YYBISON 1 /* Identify Bison output. */
#define tDOUBLE 257
#define tSTRING 258
#define tBIGSTR 259
#define tEND 260
#define tAFFECT 261
#define tDOTS 262
#define tPi 263
#define tMPI_Rank 264
#define tMPI_Size 265
#define tEuclidian 266
#define tCoordinates 267
#define tExp 268
#define tLog 269
#define tLog10 270
#define tSqrt 271
#define tSin 272
#define tAsin 273
#define tCos 274
#define tAcos 275
#define tTan 276
#define tRand 277
#define tAtan 278
#define tAtan2 279
#define tSinh 280
#define tCosh 281
#define tTanh 282
#define tFabs 283
#define tFloor 284
#define tCeil 285
#define tFmod 286
#define tModulo 287
#define tHypot 288
#define tPrintf 289
#define tSprintf 290
#define tStrCat 291
#define tStrPrefix 292
#define tStrRelative 293
#define tBoundingBox 294
#define tDraw 295
#define tToday 296
#define tPoint 297
#define tCircle 298
#define tEllipse 299
#define tLine 300
#define tSphere 301
#define tPolarSphere 302
#define tSurface 303
#define tSpline 304
#define tVolume 305
#define tCharacteristic 306
#define tLength 307
#define tParametric 308
#define tElliptic 309
#define tPlane 310
#define tRuled 311
#define tTransfinite 312
#define tComplex 313
#define tPhysical 314
#define tUsing 315
#define tBump 316
#define tProgression 317
#define tPlugin 318
#define tRotate 319
#define tTranslate 320
#define tSymmetry 321
#define tDilate 322
#define tExtrude 323
#define tDuplicata 324
#define tLoop 325
#define tRecombine 326
#define tDelete 327
#define tCoherence 328
#define tIntersect 329
#define tBoundary 330
#define tAttractor 331
#define tLayers 332
#define tHole 333
#define tAlias 334
#define tAliasWithOptions 335
#define tText2D 336
#define tText3D 337
#define tInterpolationScheme 338
#define tTime 339
#define tGrain 340
#define tCombine 341
#define tBSpline 342
#define tBezier 343
#define tNurbs 344
#define tOrder 345
#define tKnots 346
#define tColor 347
#define tColorTable 348
#define tFor 349
#define tIn 350
#define tEndFor 351
#define tIf 352
#define tEndIf 353
#define tExit 354
#define tField 355
#define tThreshold 356
#define tStructured 357
#define tLatLon 358
#define tGrad 359
#define tPostView 360
#define tReturn 361
#define tCall 362
#define tFunction 363
#define tShow 364
#define tHide 365
#define tGetValue 366
#define tGMSH_MAJOR_VERSION 367
#define tGMSH_MINOR_VERSION 368
#define tGMSH_PATCH_VERSION 369
#define tAFFECTPLUS 370
#define tAFFECTMINUS 371
#define tAFFECTTIMES 372
#define tAFFECTDIVIDE 373
#define tOR 374
#define tAND 375
#define tEQUAL 376
#define tNOTEQUAL 377
#define tLESSOREQUAL 378
#define tGREATEROREQUAL 379
#define tPLUSPLUS 380
#define tMINUSMINUS 381
#define UNARYPREC 382
#line 1 "Gmsh.y"
// $Id: Gmsh.tab.cpp,v 1.329 2007-09-05 10:11:30 geuzaine Exp $
//
// Copyright (C) 1997-2007 C. Geuzaine, J.-F. Remacle
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
// USA.
//
// Please report all bugs and problems to <gmsh@geuz.org>.
#include <stdarg.h>
#include <time.h>
#include "PluginManager.h"
#include "ParUtil.h"
#include "Gmsh.h"
#include "Numeric.h"
#include "Context.h"
#include "GModel.h"
#include "Geo.h"
#include "GeoInterpolation.h"
#include "Generator.h"
#include "Draw.h"
#include "Views.h"
#include "Options.h"
#include "Colors.h"
#include "Parser.h"
#include "OpenFile.h"
#include "CommandLine.h"
#include "FunctionManager.h"
#include "ColorTable.h"
#include "OS.h"
#include "CreateFile.h"
#include "gmshSurface.h"
#include "Field.h"
#include "BackgroundMesh.h"
Tree_T *Symbol_T = NULL;
extern Context_T CTX;
extern Mesh *THEM;
static ExtrudeParams extr;
static Post_View *View;
static List_T *ViewValueList;
static double ViewCoord[100];
static int *ViewNumList, ViewNumNodes, ViewNumComp, ViewNumListTmp;
static int ViewCoordIdx, ViewElementIdx;
static int ViewErrorFlags[VIEW_NB_ELEMENT_TYPES];
#define MAX_RECUR_LOOPS 100
static int ImbricatedLoop = 0;
static gmshSurface *myGmshSurface = 0;
static fpos_t yyposImbricatedLoopsTab[MAX_RECUR_LOOPS];
static int yylinenoImbricatedLoopsTab[MAX_RECUR_LOOPS];
static double LoopControlVariablesTab[MAX_RECUR_LOOPS][3];
static char *LoopControlVariablesNameTab[MAX_RECUR_LOOPS];
void yyerror(char *s);
void yymsg(int type, char *fmt, ...);
void skip_until(char *skip, char *until);
int PrintListOfDouble(char *format, List_T *list, char *buffer);
int CheckViewErrorFlags(Post_View *v);
#line 78 "Gmsh.y"
typedef union {
char *c;
int i;
unsigned int u;
double d;
double v[5];
Shape s;
List_T *l;
} YYSTYPE;
#include <stdio.h>
#ifndef __cplusplus
#ifndef __STDC__
#define const
#endif
#endif
#define YYFINAL 1286
#define YYFLAG -32768
#define YYNTBASE 149
#define YYTRANSLATE(x) ((unsigned)(x) <= 382 ? yytranslate[x] : 217)
static const short yytranslate[] = { 0,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 134, 2, 144, 2, 133, 2, 2, 139,
140, 131, 129, 145, 130, 143, 132, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 125,
2, 127, 120, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
141, 2, 142, 138, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 146, 2, 147, 148, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 1, 3, 4, 5, 6,
7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
27, 28, 29, 30, 31, 32, 33, 34, 35, 36,
37, 38, 39, 40, 41, 42, 43, 44, 45, 46,
47, 48, 49, 50, 51, 52, 53, 54, 55, 56,
57, 58, 59, 60, 61, 62, 63, 64, 65, 66,
67, 68, 69, 70, 71, 72, 73, 74, 75, 76,
77, 78, 79, 80, 81, 82, 83, 84, 85, 86,
87, 88, 89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100, 101, 102, 103, 104, 105, 106,
107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
117, 118, 119, 121, 122, 123, 124, 126, 128, 135,
136, 137
};
#if YYDEBUG != 0
static const short yyprhs[] = { 0,
0, 2, 5, 6, 9, 11, 13, 15, 17, 19,
21, 23, 25, 27, 29, 31, 33, 35, 37, 39,
42, 48, 56, 64, 74, 81, 90, 97, 104, 105,
108, 111, 114, 117, 120, 123, 125, 129, 131, 135,
136, 137, 148, 150, 154, 155, 169, 171, 175, 176,
192, 201, 216, 217, 224, 231, 233, 235, 237, 239,
241, 243, 245, 250, 258, 268, 275, 282, 286, 293,
298, 305, 315, 322, 332, 338, 347, 356, 368, 375,
385, 395, 405, 407, 409, 417, 426, 436, 445, 454,
463, 473, 482, 488, 495, 502, 509, 517, 525, 533,
543, 551, 561, 579, 587, 595, 607, 616, 625, 634,
643, 647, 652, 663, 671, 679, 688, 697, 706, 714,
723, 729, 741, 747, 757, 762, 772, 777, 779, 781,
782, 785, 792, 799, 806, 813, 818, 825, 829, 834,
840, 844, 848, 853, 858, 862, 870, 878, 882, 890,
894, 897, 900, 916, 919, 926, 935, 944, 955, 957,
960, 962, 966, 971, 973, 979, 991, 1005, 1006, 1014,
1015, 1029, 1030, 1046, 1047, 1054, 1055, 1066, 1075, 1084,
1093, 1106, 1119, 1132, 1147, 1162, 1177, 1178, 1191, 1192,
1205, 1206, 1219, 1220, 1237, 1238, 1255, 1256, 1273, 1274,
1293, 1294, 1313, 1314, 1333, 1335, 1338, 1344, 1352, 1362,
1365, 1375, 1382, 1392, 1402, 1411, 1421, 1430, 1439, 1446,
1451, 1462, 1473, 1484, 1495, 1498, 1500, 1504, 1507, 1510,
1513, 1517, 1521, 1525, 1529, 1533, 1537, 1541, 1545, 1549,
1553, 1557, 1561, 1565, 1569, 1575, 1580, 1585, 1590, 1595,
1600, 1605, 1610, 1615, 1620, 1625, 1632, 1637, 1642, 1647,
1652, 1657, 1662, 1669, 1676, 1683, 1688, 1693, 1698, 1703,
1708, 1713, 1718, 1723, 1728, 1733, 1738, 1745, 1750, 1755,
1760, 1765, 1770, 1775, 1782, 1789, 1796, 1801, 1803, 1805,
1807, 1809, 1811, 1813, 1815, 1817, 1823, 1828, 1833, 1836,
1842, 1846, 1853, 1858, 1866, 1873, 1875, 1878, 1881, 1885,
1889, 1901, 1911, 1919, 1927, 1929, 1933, 1935, 1937, 1940,
1944, 1949, 1955, 1958, 1962, 1966, 1972, 1977, 1979, 1981,
1985, 1992, 1994, 1996, 2000, 2004, 2014, 2022, 2024, 2030,
2034, 2041, 2043, 2047, 2049, 2051, 2053, 2055, 2062, 2067,
2072, 2077, 2084, 2091
};
static const short yyrhs[] = { 150,
0, 1, 6, 0, 0, 150, 151, 0, 154, 0,
153, 0, 173, 0, 175, 0, 176, 0, 179, 0,
180, 0, 181, 0, 184, 0, 201, 0, 202, 0,
203, 0, 183, 0, 182, 0, 127, 0, 127, 127,
0, 35, 139, 5, 140, 6, 0, 35, 139, 5,
140, 152, 215, 6, 0, 35, 139, 5, 145, 211,
140, 6, 0, 35, 139, 5, 145, 211, 140, 152,
215, 6, 0, 4, 5, 146, 155, 147, 6, 0,
4, 5, 4, 206, 146, 155, 147, 6, 0, 80,
4, 141, 204, 142, 6, 0, 81, 4, 141, 204,
142, 6, 0, 0, 155, 158, 0, 155, 162, 0,
155, 165, 0, 155, 167, 0, 155, 168, 0, 155,
170, 0, 204, 0, 156, 145, 204, 0, 204, 0,
157, 145, 204, 0, 0, 0, 4, 159, 139, 156,
140, 160, 146, 157, 147, 6, 0, 215, 0, 161,
145, 215, 0, 0, 82, 139, 204, 145, 204, 145,
204, 140, 163, 146, 161, 147, 6, 0, 215, 0,
164, 145, 215, 0, 0, 83, 139, 204, 145, 204,
145, 204, 145, 204, 140, 166, 146, 164, 147, 6,
0, 84, 146, 208, 147, 146, 208, 147, 6, 0,
84, 146, 208, 147, 146, 208, 147, 146, 208, 147,
146, 208, 147, 6, 0, 0, 85, 169, 146, 157,
147, 6, 0, 86, 139, 204, 140, 209, 6, 0,
7, 0, 116, 0, 117, 0, 118, 0, 119, 0,
135, 0, 136, 0, 4, 171, 204, 6, 0, 4,
141, 204, 142, 171, 204, 6, 0, 4, 141, 146,
211, 147, 142, 171, 209, 6, 0, 4, 141, 142,
7, 209, 6, 0, 4, 141, 142, 116, 209, 6,
0, 4, 172, 6, 0, 4, 141, 204, 142, 172,
6, 0, 4, 7, 216, 6, 0, 4, 143, 4,
7, 216, 6, 0, 4, 141, 204, 142, 143, 4,
7, 216, 6, 0, 4, 143, 4, 171, 204, 6,
0, 4, 141, 204, 142, 143, 4, 171, 204, 6,
0, 4, 143, 4, 172, 6, 0, 4, 141, 204,
142, 143, 4, 172, 6, 0, 4, 143, 93, 143,
4, 7, 212, 6, 0, 4, 141, 204, 142, 143,
93, 143, 4, 7, 212, 6, 0, 4, 143, 94,
7, 213, 6, 0, 4, 141, 204, 142, 143, 94,
7, 213, 6, 0, 64, 139, 4, 140, 143, 4,
7, 204, 6, 0, 64, 139, 4, 140, 143, 4,
7, 216, 6, 0, 204, 0, 216, 0, 43, 139,
204, 140, 7, 206, 6, 0, 60, 43, 139, 174,
140, 7, 209, 6, 0, 77, 43, 101, 139, 204,
140, 7, 209, 6, 0, 104, 101, 139, 204, 140,
7, 204, 6, 0, 106, 101, 139, 204, 140, 7,
204, 6, 0, 102, 101, 139, 204, 140, 7, 209,
6, 0, 109, 101, 139, 204, 140, 7, 5, 209,
6, 0, 103, 101, 139, 204, 140, 7, 5, 6,
0, 52, 53, 101, 209, 6, 0, 77, 43, 209,
7, 209, 6, 0, 77, 46, 209, 7, 209, 6,
0, 52, 53, 209, 7, 204, 6, 0, 46, 139,
204, 140, 7, 209, 6, 0, 50, 139, 204, 140,
7, 209, 6, 0, 44, 139, 204, 140, 7, 209,
6, 0, 44, 139, 204, 140, 7, 209, 56, 206,
6, 0, 45, 139, 204, 140, 7, 209, 6, 0,
45, 139, 204, 140, 7, 209, 56, 206, 6, 0,
54, 139, 204, 140, 7, 146, 204, 145, 204, 145,
5, 145, 5, 145, 5, 147, 6, 0, 88, 139,
204, 140, 7, 209, 6, 0, 89, 139, 204, 140,
7, 209, 6, 0, 90, 139, 204, 140, 7, 209,
92, 209, 91, 204, 6, 0, 46, 71, 139, 204,
140, 7, 209, 6, 0, 60, 46, 139, 174, 140,
7, 209, 6, 0, 56, 49, 139, 204, 140, 7,
209, 6, 0, 57, 49, 139, 204, 140, 7, 209,
6, 0, 12, 13, 6, 0, 13, 49, 204, 6,
0, 54, 49, 139, 204, 140, 7, 5, 5, 5,
6, 0, 47, 139, 204, 140, 7, 209, 6, 0,
48, 139, 204, 140, 7, 209, 6, 0, 49, 71,
139, 204, 140, 7, 209, 6, 0, 60, 49, 139,
174, 140, 7, 209, 6, 0, 59, 51, 139, 204,
140, 7, 209, 6, 0, 51, 139, 204, 140, 7,
209, 6, 0, 60, 51, 139, 174, 140, 7, 209,
6, 0, 66, 206, 146, 177, 147, 0, 65, 146,
206, 145, 206, 145, 204, 147, 146, 177, 147, 0,
67, 206, 146, 177, 147, 0, 68, 146, 206, 145,
204, 147, 146, 177, 147, 0, 70, 146, 177, 147,
0, 75, 46, 146, 211, 147, 49, 146, 204, 147,
0, 76, 146, 177, 147, 0, 178, 0, 176, 0,
0, 178, 175, 0, 178, 43, 146, 211, 147, 6,
0, 178, 46, 146, 211, 147, 6, 0, 178, 49,
146, 211, 147, 6, 0, 178, 51, 146, 211, 147,
6, 0, 73, 146, 178, 147, 0, 73, 4, 141,
204, 142, 6, 0, 73, 4, 6, 0, 73, 4,
4, 6, 0, 93, 212, 146, 178, 147, 0, 110,
215, 6, 0, 111, 215, 6, 0, 110, 146, 178,
147, 0, 111, 146, 178, 147, 0, 4, 216, 6,
0, 4, 4, 141, 204, 142, 215, 6, 0, 4,
4, 4, 141, 204, 142, 6, 0, 4, 204, 6,
0, 64, 139, 4, 140, 143, 4, 6, 0, 87,
4, 6, 0, 100, 6, 0, 40, 6, 0, 40,
146, 204, 145, 204, 145, 204, 145, 204, 145, 204,
145, 204, 147, 6, 0, 41, 6, 0, 95, 139,
204, 8, 204, 140, 0, 95, 139, 204, 8, 204,
8, 204, 140, 0, 95, 4, 96, 146, 204, 8,
204, 147, 0, 95, 4, 96, 146, 204, 8, 204,
8, 204, 147, 0, 97, 0, 109, 4, 0, 107,
0, 108, 4, 6, 0, 98, 139, 204, 140, 0,
99, 0, 69, 206, 146, 178, 147, 0, 69, 146,
206, 145, 206, 145, 204, 147, 146, 178, 147, 0,
69, 146, 206, 145, 206, 145, 206, 145, 204, 147,
146, 178, 147, 0, 0, 69, 206, 146, 178, 185,
199, 147, 0, 0, 69, 146, 206, 145, 206, 145,
204, 147, 146, 178, 186, 199, 147, 0, 0, 69,
146, 206, 145, 206, 145, 206, 145, 204, 147, 146,
178, 187, 199, 147, 0, 0, 69, 146, 178, 188,
199, 147, 0, 0, 69, 4, 141, 204, 142, 146,
178, 189, 199, 147, 0, 69, 43, 146, 204, 145,
206, 147, 6, 0, 69, 46, 146, 204, 145, 206,
147, 6, 0, 69, 49, 146, 204, 145, 206, 147,
6, 0, 69, 43, 146, 204, 145, 206, 145, 206,
145, 204, 147, 6, 0, 69, 46, 146, 204, 145,
206, 145, 206, 145, 204, 147, 6, 0, 69, 49,
146, 204, 145, 206, 145, 206, 145, 204, 147, 6,
0, 69, 43, 146, 204, 145, 206, 145, 206, 145,
206, 145, 204, 147, 6, 0, 69, 46, 146, 204,
145, 206, 145, 206, 145, 206, 145, 204, 147, 6,
0, 69, 49, 146, 204, 145, 206, 145, 206, 145,
206, 145, 204, 147, 6, 0, 0, 69, 43, 146,
204, 145, 206, 147, 190, 146, 199, 147, 6, 0,
0, 69, 46, 146, 204, 145, 206, 147, 191, 146,
199, 147, 6, 0, 0, 69, 49, 146, 204, 145,
206, 147, 192, 146, 199, 147, 6, 0, 0, 69,
43, 146, 204, 145, 206, 145, 206, 145, 204, 147,
193, 146, 199, 147, 6, 0, 0, 69, 46, 146,
204, 145, 206, 145, 206, 145, 204, 147, 194, 146,
199, 147, 6, 0, 0, 69, 49, 146, 204, 145,
206, 145, 206, 145, 204, 147, 195, 146, 199, 147,
6, 0, 0, 69, 43, 146, 204, 145, 206, 145,
206, 145, 206, 145, 204, 147, 196, 146, 199, 147,
6, 0, 0, 69, 46, 146, 204, 145, 206, 145,
206, 145, 206, 145, 204, 147, 197, 146, 199, 147,
6, 0, 0, 69, 49, 146, 204, 145, 206, 145,
206, 145, 206, 145, 204, 147, 198, 146, 199, 147,
6, 0, 200, 0, 199, 200, 0, 78, 146, 204,
147, 6, 0, 78, 146, 209, 145, 209, 147, 6,
0, 78, 146, 209, 145, 209, 145, 209, 147, 6,
0, 72, 6, 0, 79, 139, 204, 140, 7, 209,
61, 204, 6, 0, 58, 46, 209, 7, 204, 6,
0, 58, 46, 209, 7, 204, 61, 63, 204, 6,
0, 58, 46, 209, 7, 204, 61, 62, 204, 6,
0, 58, 49, 146, 204, 147, 7, 209, 6, 0,
58, 49, 146, 204, 147, 7, 209, 4, 6, 0,
55, 49, 146, 204, 147, 7, 209, 6, 0, 58,
51, 146, 204, 147, 7, 209, 6, 0, 72, 49,
209, 7, 204, 6, 0, 72, 49, 209, 6, 0,
43, 146, 211, 147, 96, 49, 146, 204, 147, 6,
0, 46, 146, 211, 147, 96, 49, 146, 204, 147,
6, 0, 46, 146, 211, 147, 96, 51, 146, 204,
147, 6, 0, 49, 146, 211, 147, 96, 51, 146,
204, 147, 6, 0, 74, 6, 0, 205, 0, 139,
204, 140, 0, 130, 204, 0, 129, 204, 0, 134,
204, 0, 204, 130, 204, 0, 204, 129, 204, 0,
204, 131, 204, 0, 204, 132, 204, 0, 204, 133,
204, 0, 204, 138, 204, 0, 204, 125, 204, 0,
204, 127, 204, 0, 204, 126, 204, 0, 204, 128,
204, 0, 204, 123, 204, 0, 204, 124, 204, 0,
204, 122, 204, 0, 204, 121, 204, 0, 204, 120,
204, 8, 204, 0, 14, 139, 204, 140, 0, 15,
139, 204, 140, 0, 16, 139, 204, 140, 0, 17,
139, 204, 140, 0, 18, 139, 204, 140, 0, 19,
139, 204, 140, 0, 20, 139, 204, 140, 0, 21,
139, 204, 140, 0, 22, 139, 204, 140, 0, 24,
139, 204, 140, 0, 25, 139, 204, 145, 204, 140,
0, 26, 139, 204, 140, 0, 27, 139, 204, 140,
0, 28, 139, 204, 140, 0, 29, 139, 204, 140,
0, 30, 139, 204, 140, 0, 31, 139, 204, 140,
0, 32, 139, 204, 145, 204, 140, 0, 33, 139,
204, 145, 204, 140, 0, 34, 139, 204, 145, 204,
140, 0, 23, 139, 204, 140, 0, 14, 141, 204,
142, 0, 15, 141, 204, 142, 0, 16, 141, 204,
142, 0, 17, 141, 204, 142, 0, 18, 141, 204,
142, 0, 19, 141, 204, 142, 0, 20, 141, 204,
142, 0, 21, 141, 204, 142, 0, 22, 141, 204,
142, 0, 24, 141, 204, 142, 0, 25, 141, 204,
145, 204, 142, 0, 26, 141, 204, 142, 0, 27,
141, 204, 142, 0, 28, 141, 204, 142, 0, 29,
141, 204, 142, 0, 30, 141, 204, 142, 0, 31,
141, 204, 142, 0, 32, 141, 204, 145, 204, 142,
0, 33, 141, 204, 145, 204, 142, 0, 34, 141,
204, 145, 204, 142, 0, 23, 141, 204, 142, 0,
3, 0, 9, 0, 10, 0, 11, 0, 113, 0,
114, 0, 115, 0, 4, 0, 4, 148, 146, 204,
147, 0, 4, 141, 204, 142, 0, 144, 4, 141,
142, 0, 4, 172, 0, 4, 141, 204, 142, 172,
0, 4, 143, 4, 0, 4, 141, 204, 142, 143,
4, 0, 4, 143, 4, 172, 0, 4, 141, 204,
142, 143, 4, 172, 0, 112, 139, 5, 145, 204,
140, 0, 207, 0, 130, 206, 0, 129, 206, 0,
206, 130, 206, 0, 206, 129, 206, 0, 146, 204,
145, 204, 145, 204, 145, 204, 145, 204, 147, 0,
146, 204, 145, 204, 145, 204, 145, 204, 147, 0,
146, 204, 145, 204, 145, 204, 147, 0, 139, 204,
145, 204, 145, 204, 140, 0, 209, 0, 208, 145,
209, 0, 204, 0, 210, 0, 146, 147, 0, 146,
211, 147, 0, 130, 146, 211, 147, 0, 204, 131,
146, 211, 147, 0, 130, 210, 0, 204, 131, 210,
0, 204, 8, 204, 0, 204, 8, 204, 8, 204,
0, 43, 146, 204, 147, 0, 176, 0, 184, 0,
4, 141, 142, 0, 4, 141, 146, 211, 147, 142,
0, 204, 0, 210, 0, 211, 145, 204, 0, 211,
145, 210, 0, 146, 204, 145, 204, 145, 204, 145,
204, 147, 0, 146, 204, 145, 204, 145, 204, 147,
0, 4, 0, 4, 143, 93, 143, 4, 0, 146,
214, 147, 0, 4, 141, 204, 142, 143, 94, 0,
212, 0, 214, 145, 212, 0, 216, 0, 4, 0,
5, 0, 42, 0, 37, 139, 215, 145, 215, 140,
0, 38, 139, 215, 140, 0, 39, 139, 215, 140,
0, 36, 139, 215, 140, 0, 36, 139, 215, 145,
211, 140, 0, 36, 139, 4, 143, 4, 140, 0,
36, 139, 4, 141, 204, 142, 143, 4, 140, 0
};
#endif
#if YYDEBUG != 0
static const short yyrline[] = { 0,
144, 146, 151, 153, 156, 158, 159, 160, 161, 162,
163, 164, 165, 166, 167, 168, 169, 170, 173, 178,
184, 190, 205, 218, 246, 254, 261, 266, 273, 281,
282, 283, 284, 285, 286, 289, 292, 296, 299, 303,
494, 508, 518, 524, 531, 539, 545, 551, 558, 566,
572, 578, 588, 593, 597, 606, 608, 609, 610, 611,
614, 616, 619, 654, 693, 747, 764, 782, 793, 810,
817, 831, 848, 874, 901, 915, 932, 946, 963, 983,
1006, 1016, 1030, 1035, 1044, 1070, 1086, 1107, 1114, 1125,
1140, 1155, 1162, 1174, 1208, 1244, 1266, 1284, 1302, 1320,
1346, 1364, 1390, 1410, 1428, 1446, 1472, 1489, 1508, 1526,
1564, 1568, 1572, 1577, 1599, 1621, 1637, 1657, 1674, 1691,
1711, 1717, 1722, 1727, 1732, 1743, 1749, 1757, 1759, 1762,
1767, 1771, 1794, 1817, 1840, 1867, 1877, 1887, 1903, 1921,
1935, 1942, 1948, 1957, 1970, 2021, 2036, 2051, 2071, 2081,
2103, 2107, 2112, 2117, 2127, 2144, 2160, 2186, 2213, 2245,
2252, 2257, 2263, 2267, 2275, 2284, 2292, 2300, 2304, 2312,
2316, 2324, 2328, 2336, 2340, 2347, 2351, 2363, 2370, 2377,
2384, 2391, 2398, 2405, 2412, 2419, 2426, 2430, 2437, 2441,
2448, 2452, 2459, 2463, 2470, 2474, 2481, 2485, 2492, 2496,
2503, 2507, 2514, 2518, 2528, 2532, 2537, 2547, 2569, 2593,
2597, 2620, 2639, 2657, 2675, 2704, 2739, 2744, 2771, 2785,
2803, 2810, 2816, 2819, 2827, 2837, 2839, 2840, 2841, 2842,
2843, 2844, 2845, 2846, 2853, 2854, 2855, 2856, 2857, 2858,
2859, 2860, 2861, 2862, 2863, 2864, 2865, 2866, 2867, 2868,
2869, 2870, 2871, 2872, 2873, 2874, 2875, 2876, 2877, 2878,
2879, 2880, 2881, 2882, 2883, 2884, 2886, 2887, 2888, 2889,
2890, 2891, 2892, 2893, 2894, 2895, 2896, 2897, 2898, 2899,
2900, 2901, 2902, 2903, 2904, 2905, 2906, 2911, 2916, 2917,
2918, 2919, 2920, 2921, 2925, 2941, 2956, 2976, 2990, 3003,
3026, 3044, 3062, 3080, 3098, 3105, 3110, 3114, 3118, 3122,
3128, 3133, 3137, 3141, 3147, 3153, 3160, 3166, 3170, 3175,
3179, 3187, 3197, 3206, 3214, 3220, 3231, 3251, 3261, 3271,
3288, 3314, 3320, 3324, 3328, 3340, 3345, 3357, 3364, 3385,
3390, 3404, 3410, 3416, 3421, 3427, 3432, 3440, 3448, 3462,
3476, 3480, 3499, 3521
};
#endif
#if YYDEBUG != 0 || defined (YYERROR_VERBOSE)
static const char * const yytname[] = { "$","error","$undefined.","tDOUBLE",
"tSTRING","tBIGSTR","tEND","tAFFECT","tDOTS","tPi","tMPI_Rank","tMPI_Size","tEuclidian",
"tCoordinates","tExp","tLog","tLog10","tSqrt","tSin","tAsin","tCos","tAcos",
"tTan","tRand","tAtan","tAtan2","tSinh","tCosh","tTanh","tFabs","tFloor","tCeil",
"tFmod","tModulo","tHypot","tPrintf","tSprintf","tStrCat","tStrPrefix","tStrRelative",
"tBoundingBox","tDraw","tToday","tPoint","tCircle","tEllipse","tLine","tSphere",
"tPolarSphere","tSurface","tSpline","tVolume","tCharacteristic","tLength","tParametric",
"tElliptic","tPlane","tRuled","tTransfinite","tComplex","tPhysical","tUsing",
"tBump","tProgression","tPlugin","tRotate","tTranslate","tSymmetry","tDilate",
"tExtrude","tDuplicata","tLoop","tRecombine","tDelete","tCoherence","tIntersect",
"tBoundary","tAttractor","tLayers","tHole","tAlias","tAliasWithOptions","tText2D",
"tText3D","tInterpolationScheme","tTime","tGrain","tCombine","tBSpline","tBezier",
"tNurbs","tOrder","tKnots","tColor","tColorTable","tFor","tIn","tEndFor","tIf",
"tEndIf","tExit","tField","tThreshold","tStructured","tLatLon","tGrad","tPostView",
"tReturn","tCall","tFunction","tShow","tHide","tGetValue","tGMSH_MAJOR_VERSION",
"tGMSH_MINOR_VERSION","tGMSH_PATCH_VERSION","tAFFECTPLUS","tAFFECTMINUS","tAFFECTTIMES",
"tAFFECTDIVIDE","'?'","tOR","tAND","tEQUAL","tNOTEQUAL","'<'","tLESSOREQUAL",
"'>'","tGREATEROREQUAL","'+'","'-'","'*'","'/'","'%'","'!'","tPLUSPLUS","tMINUSMINUS",
"UNARYPREC","'^'","'('","')'","'['","']'","'.'","'#'","','","'{'","'}'","'~'",
"All","GeoFormatItems","GeoFormatItem","SendToFile","Printf","View","Views",
"ElementCoords","ElementValues","Element","@1","@2","Text2DValues","Text2D",
"@3","Text3DValues","Text3D","@4","InterpolationMatrix","Time","@5","Grain",
"NumericAffectation","NumericIncrement","Affectation","PhysicalId","Shape","Transform",
"MultipleShape","ListOfShapes","Delete","Colorify","Visibility","Command","Loop",
"Extrude","@6","@7","@8","@9","@10","@11","@12","@13","@14","@15","@16","@17",
"@18","@19","ExtrudeParameters","ExtrudeParameter","Transfinite","Embedding",
"Coherence","FExpr","FExpr_Single","VExpr","VExpr_Single","RecursiveListOfListOfDouble",
"ListOfDouble","FExpr_Multi","RecursiveListOfDouble","ColorExpr","ListOfColor",
"RecursiveListOfColor","StringExprVar","StringExpr", NULL
};
#endif
static const short yyr1[] = { 0,
149, 149, 150, 150, 151, 151, 151, 151, 151, 151,
151, 151, 151, 151, 151, 151, 151, 151, 152, 152,
153, 153, 153, 153, 154, 154, 154, 154, 155, 155,
155, 155, 155, 155, 155, 156, 156, 157, 157, 159,
160, 158, 161, 161, 163, 162, 164, 164, 166, 165,
167, 167, 169, 168, 170, 171, 171, 171, 171, 171,
172, 172, 173, 173, 173, 173, 173, 173, 173, 173,
173, 173, 173, 173, 173, 173, 173, 173, 173, 173,
173, 173, 174, 174, 175, 175, 175, 175, 175, 175,
175, 175, 175, 175, 175, 175, 175, 175, 175, 175,
175, 175, 175, 175, 175, 175, 175, 175, 175, 175,
175, 175, 175, 175, 175, 175, 175, 175, 175, 175,
176, 176, 176, 176, 176, 176, 176, 177, 177, 178,
178, 178, 178, 178, 178, 179, 179, 179, 179, 180,
181, 181, 181, 181, 182, 182, 182, 182, 182, 182,
182, 182, 182, 182, 183, 183, 183, 183, 183, 183,
183, 183, 183, 183, 184, 184, 184, 185, 184, 186,
184, 187, 184, 188, 184, 189, 184, 184, 184, 184,
184, 184, 184, 184, 184, 184, 190, 184, 191, 184,
192, 184, 193, 184, 194, 184, 195, 184, 196, 184,
197, 184, 198, 184, 199, 199, 200, 200, 200, 200,
200, 201, 201, 201, 201, 201, 201, 201, 201, 201,
202, 202, 202, 202, 203, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 204, 204, 204,
204, 204, 204, 204, 204, 204, 204, 205, 205, 205,
205, 205, 205, 205, 205, 205, 205, 205, 205, 205,
205, 205, 205, 205, 205, 206, 206, 206, 206, 206,
207, 207, 207, 207, 208, 208, 209, 209, 209, 209,
209, 209, 210, 210, 210, 210, 210, 210, 210, 210,
210, 211, 211, 211, 211, 212, 212, 212, 212, 213,
213, 214, 214, 215, 215, 216, 216, 216, 216, 216,
216, 216, 216, 216
};
static const short yyr2[] = { 0,
1, 2, 0, 2, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 2,
5, 7, 7, 9, 6, 8, 6, 6, 0, 2,
2, 2, 2, 2, 2, 1, 3, 1, 3, 0,
0, 10, 1, 3, 0, 13, 1, 3, 0, 15,
8, 14, 0, 6, 6, 1, 1, 1, 1, 1,
1, 1, 4, 7, 9, 6, 6, 3, 6, 4,
6, 9, 6, 9, 5, 8, 8, 11, 6, 9,
9, 9, 1, 1, 7, 8, 9, 8, 8, 8,
9, 8, 5, 6, 6, 6, 7, 7, 7, 9,
7, 9, 17, 7, 7, 11, 8, 8, 8, 8,
3, 4, 10, 7, 7, 8, 8, 8, 7, 8,
5, 11, 5, 9, 4, 9, 4, 1, 1, 0,
2, 6, 6, 6, 6, 4, 6, 3, 4, 5,
3, 3, 4, 4, 3, 7, 7, 3, 7, 3,
2, 2, 15, 2, 6, 8, 8, 10, 1, 2,
1, 3, 4, 1, 5, 11, 13, 0, 7, 0,
13, 0, 15, 0, 6, 0, 10, 8, 8, 8,
12, 12, 12, 14, 14, 14, 0, 12, 0, 12,
0, 12, 0, 16, 0, 16, 0, 16, 0, 18,
0, 18, 0, 18, 1, 2, 5, 7, 9, 2,
9, 6, 9, 9, 8, 9, 8, 8, 6, 4,
10, 10, 10, 10, 2, 1, 3, 2, 2, 2,
3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
3, 3, 3, 3, 5, 4, 4, 4, 4, 4,
4, 4, 4, 4, 4, 6, 4, 4, 4, 4,
4, 4, 6, 6, 6, 4, 4, 4, 4, 4,
4, 4, 4, 4, 4, 4, 6, 4, 4, 4,
4, 4, 4, 6, 6, 6, 4, 1, 1, 1,
1, 1, 1, 1, 1, 5, 4, 4, 2, 5,
3, 6, 4, 7, 6, 1, 2, 2, 3, 3,
11, 9, 7, 7, 1, 3, 1, 1, 2, 3,
4, 5, 2, 3, 3, 5, 4, 1, 1, 3,
6, 1, 1, 3, 3, 9, 7, 1, 5, 3,
6, 1, 3, 1, 1, 1, 1, 6, 4, 4,
4, 6, 6, 9
};
static const short yydefact[] = { 0,
0, 1, 2, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 159, 0, 164,
0, 0, 0, 0, 0, 161, 0, 0, 0, 0,
4, 6, 5, 7, 8, 9, 10, 11, 12, 18,
17, 13, 14, 15, 16, 288, 295, 346, 56, 289,
290, 291, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 347, 0, 292,
293, 294, 57, 58, 59, 60, 0, 0, 0, 61,
62, 0, 0, 0, 0, 0, 0, 0, 226, 0,
0, 0, 0, 152, 0, 154, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
306, 0, 0, 0, 0, 0, 0, 130, 0, 130,
0, 0, 130, 225, 0, 130, 0, 0, 0, 0,
0, 0, 0, 0, 338, 0, 0, 0, 0, 0,
151, 0, 0, 0, 0, 0, 160, 0, 345, 346,
130, 0, 344, 130, 0, 0, 0, 0, 0, 299,
0, 29, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
295, 229, 228, 230, 0, 0, 0, 0, 0, 0,
0, 0, 0, 68, 148, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
145, 111, 0, 0, 0, 0, 295, 0, 0, 328,
329, 332, 333, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 317, 0,
318, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 308, 307, 0, 0,
0, 0, 130, 130, 0, 0, 0, 0, 0, 0,
0, 0, 174, 0, 130, 129, 0, 128, 0, 0,
138, 0, 0, 0, 0, 0, 0, 0, 0, 0,
150, 0, 0, 0, 0, 0, 130, 0, 0, 0,
0, 0, 0, 0, 162, 0, 0, 141, 0, 142,
0, 0, 301, 0, 0, 0, 70, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 345,
0, 0, 0, 0, 0, 0, 227, 0, 0, 0,
0, 56, 0, 0, 0, 0, 0, 63, 0, 244,
243, 241, 242, 237, 239, 238, 240, 232, 231, 233,
234, 235, 236, 112, 0, 0, 0, 0, 0, 0,
228, 323, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 319,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 83, 84, 0, 0, 0, 0, 0,
0, 0, 310, 309, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 131, 0, 0,
168, 125, 220, 0, 139, 0, 136, 0, 127, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 163, 0, 0, 0, 0, 0, 143, 144,
0, 297, 303, 0, 29, 40, 0, 0, 0, 53,
0, 0, 30, 31, 32, 33, 34, 35, 246, 267,
247, 268, 248, 269, 249, 270, 250, 271, 251, 272,
252, 273, 253, 274, 254, 275, 266, 287, 255, 276,
0, 0, 257, 278, 258, 279, 259, 280, 260, 281,
261, 282, 262, 283, 0, 0, 0, 0, 0, 0,
0, 0, 351, 0, 0, 349, 350, 0, 0, 0,
0, 0, 56, 0, 0, 0, 0, 0, 75, 0,
0, 0, 0, 298, 0, 21, 19, 0, 0, 0,
0, 330, 0, 0, 325, 233, 324, 334, 335, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 93, 0, 320, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 121, 123, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 205, 0,
165, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 140, 0, 0, 0, 0,
0, 0, 0, 0, 0, 300, 0, 296, 0, 0,
0, 0, 0, 0, 0, 25, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 297,
66, 67, 0, 0, 0, 0, 0, 69, 71, 73,
0, 0, 342, 0, 79, 245, 20, 0, 0, 0,
0, 0, 327, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 321, 0, 96,
0, 0, 0, 0, 0, 212, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 130,
0, 0, 0, 0, 0, 0, 0, 210, 0, 0,
175, 206, 0, 0, 219, 137, 0, 0, 94, 95,
27, 28, 0, 0, 0, 339, 0, 0, 0, 155,
0, 0, 0, 0, 0, 147, 302, 146, 0, 0,
0, 0, 0, 315, 0, 0, 256, 277, 263, 284,
264, 285, 265, 286, 0, 353, 352, 348, 305, 0,
56, 0, 0, 0, 0, 64, 0, 0, 0, 340,
22, 23, 0, 0, 85, 0, 326, 0, 99, 0,
101, 0, 0, 97, 0, 0, 114, 115, 0, 0,
98, 119, 322, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 149, 0, 0,
0, 0, 130, 176, 0, 187, 0, 189, 0, 191,
0, 0, 0, 0, 317, 0, 0, 0, 0, 169,
0, 0, 104, 105, 0, 0, 0, 0, 0, 0,
0, 0, 0, 304, 26, 0, 36, 0, 0, 0,
0, 0, 38, 0, 0, 0, 0, 0, 76, 0,
0, 77, 0, 343, 0, 0, 331, 0, 0, 0,
107, 0, 0, 116, 0, 0, 0, 217, 109, 110,
0, 0, 0, 215, 218, 118, 86, 108, 117, 120,
0, 0, 0, 314, 0, 313, 0, 0, 0, 178,
0, 0, 179, 0, 0, 180, 0, 132, 133, 134,
135, 0, 0, 0, 0, 0, 0, 0, 0, 0,
337, 0, 157, 156, 90, 92, 88, 89, 0, 41,
0, 0, 0, 316, 0, 0, 0, 0, 0, 65,
72, 74, 0, 80, 0, 24, 0, 0, 100, 102,
0, 0, 0, 0, 0, 214, 213, 216, 81, 82,
130, 0, 124, 0, 0, 0, 0, 0, 0, 0,
207, 0, 0, 130, 0, 126, 87, 0, 0, 0,
91, 0, 37, 0, 0, 0, 39, 54, 55, 354,
0, 341, 0, 221, 222, 223, 224, 113, 0, 0,
0, 312, 177, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 170, 0, 0, 336, 158,
0, 0, 0, 0, 78, 0, 0, 122, 0, 193,
0, 0, 195, 0, 0, 197, 0, 0, 0, 208,
0, 166, 0, 130, 106, 0, 45, 0, 51, 0,
0, 0, 311, 181, 0, 0, 188, 182, 0, 0,
190, 183, 0, 0, 192, 0, 0, 0, 172, 0,
0, 0, 0, 0, 0, 0, 199, 0, 201, 0,
203, 209, 211, 171, 167, 0, 42, 0, 49, 0,
0, 0, 0, 184, 0, 0, 185, 0, 0, 186,
0, 0, 0, 43, 0, 0, 153, 0, 0, 0,
0, 0, 0, 0, 173, 0, 0, 0, 0, 0,
194, 0, 196, 0, 198, 0, 44, 46, 0, 47,
0, 103, 0, 0, 0, 0, 0, 52, 200, 202,
204, 48, 50, 0, 0, 0
};
static const short yydefgoto[] = { 1284,
2, 61, 668, 62, 63, 406, 986, 992, 593, 760,
1122, 1243, 594, 1211, 1269, 595, 1245, 596, 597, 764,
598, 126, 220, 64, 523, 548, 310, 367, 368, 67,
68, 69, 70, 71, 311, 732, 1183, 1226, 549, 1038,
1041, 1044, 1047, 1195, 1199, 1203, 1235, 1238, 1241, 728,
729, 73, 74, 75, 329, 129, 347, 171, 883, 884,
331, 314, 197, 663, 794, 212, 213
};
static const short yypact[] = { 2947,
25, 3026,-32768, 2143, 6, 80, -86, 26, 68, -110,
-38, 39, -28, 45, 77, -33, 140, 144, 95, -44,
108, 227, 259, 315, 284, 772, 211, 216, 75, 75,
223, 367, 240, 324, 5, 373, 359, 250, 137, 428,
446, 454, 351, 361, 364, 13, 38,-32768, 384,-32768,
526, 388, 450, 453, 467,-32768, 582, 21, 10, 18,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768, 17, 22, 264,-32768,
-32768,-32768, -77, -71, -27, 256, 301, 360, 422, 443,
464, 483, 487, 515, 527, 540, 546, 547, 576, 577,
623, 626, 637, 456, 457, 465, 468,-32768, 484,-32768,
-32768,-32768,-32768,-32768,-32768,-32768, 2368, 2368, 2368,-32768,
-32768, 2368, 1861, 69, 628, 2368, 621, 1193,-32768, 639,
642, 2368, 650,-32768, 2368,-32768, 2368, 2199, 2368, 2368,
530, 2368, 2199, 2368, 2368, 537, 2199, 2368, 2368, 1234,
543, 2368, 578, 553, 619, 1517, 598, 615, 629, 667,
673, 677, 678, 747, 75, 75, 75, 2368, 2368, 278,
-32768, 430, 75, 634, 676, 679, 686, 2005, 469, 864,
1517, 33,-32768,-32768, 687, 864, 1373, 1517, 705, 708,
775, 2368, 2368, 2368, 726, 2368, 709, 784, 2368, 2368,
-32768, 745, 759, 760, 766, 908,-32768, 778,-32768,-32768,
-32768, 913,-32768,-32768, 916, 785, 2368, 932, 799,-32768,
75,-32768, 936, 2368, 2368, 2368, 2368, 2368, 2368, 2368,
2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368,
2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368,
2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368,
2368, 2368, 2368, 2368, 2368, 636, 735, 735, 735, 944,
405, 815, 815, 815, 5281, 9, 2199, 4568, 408, 807,
955, 823, 1338,-32768,-32768, 2368, 2368, 2368, 2368, 2368,
2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368, 2368,
-32768,-32768, 1441, -105, 3814, 5302, 648, 819, 2199,-32768,
-32768, 1297,-32768, 635, 5323, 5344, 2368, 5365, 640, 5386,
5407, 2368, 652, 5428, 5449, 1517, 1655, 680, 1580, 959,
-32768, 2368, 5470, 2368, 2368, 2368, 960, 2368, 2368, 2368,
2331, 2331, 2331, 2331, 828, -63,-32768,-32768, 3840, 3866,
75, 75, 864, 864, -43, 2368, 2368, 2368, 2368, 2005,
2005, 2368, 3096, -22,-32768,-32768, 824, 3096, 82, 964,
-32768, 2368, 993, 2199, 841, 850, 984, 985, 2368, 2368,
-32768, 5491, 5512, 5533, 900, 3892,-32768, 848, 1718, 5554,
2368, 2368, 2368, 2368,-32768, 2368, 2472,-32768, 2496,-32768,
2368, 4591, 84, 2368, 471, 8,-32768, 5575, 4614, 5596,
4637, 5617, 4660, 5638, 4683, 5659, 4706, 5680, 4729, 5701,
4752, 5722, 4775, 5743, 4798, 5764, 4821, 5785, 4844, 3918,
3944, 5806, 4867, 5827, 4890, 5848, 4913, 5869, 4936, 5890,
4959, 5911, 4982, 3970, 3996, 4022, 4048, 4074, 4100, 473,
-95, 851, 855, 857, 853, 2368,-32768, 1517, 1517, 656,
312, 264, 2368, 994, 997, 23, 860,-32768, 2774, 763,
1227, 712, 712, 744, 744, 744, 744, 139, 139, 815,
815, 815, 815,-32768, 1, 2199, 2368, 996, 1931, 2368,
815,-32768, 2368, 2199, 2199, 911, 1001, 1002, 5932, 1003,
915, 1005, 1006, 5953, 920, 1010, 1011, 1013, 2199,-32768,
660, 1793, 2368, 5974, 1014, 2842, 5995, 6016, 2368, 3170,
3198, 6037, 880, 6415,-32768, 882, 885, 886, 884, 75,
2368, 2368,-32768,-32768, 881, 883, 2368, 5005, 4126, 4152,
4178, 3037, -7, -12, -20, 72, 928,-32768, 493, 75,
2577,-32768,-32768, 2368,-32768, 5028,-32768, 666,-32768, 2368,
1517, 1517, 5051, 5074, 1024, 1025, 1027, 892, 2368, 2601,
2368, 2368,-32768, 6058, 6079, 6100, 6121, 6142,-32768,-32768,
5097, 67,-32768, 3226,-32768,-32768, 907, 909, 905,-32768,
917, 1049,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
2368, 2368,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768, 2368, 2368, 2368, 2368, 2368, 2368,
2368, 1053,-32768, 2199, 735,-32768,-32768, 2368, 5120, 1055,
1056, 921,-32768, 106, 2368, 1058, 1059, 1474,-32768, 1052,
925, 13, 1061,-32768, 2368,-32768, 941, 735, 56, 4204,
75,-32768, 2199, 3254, 2793, 815,-32768, 1297,-32768, 1022,
1517, 1517, 1065, 1517, 777, 1517, 1517, 1066, 1026, 1517,
1517,-32768, 684,-32768, 2199, 1612, 1068, 930, 1071, 1072,
1073, 345, 1077, 1078, 1079, 1080, 1081, 1083, 1084, 1088,
255, 4230, 4256,-32768,-32768, 3282, 947, 75, 75, 75,
2199, 2199, 2199, 2199, 1092, 948, 962, -3,-32768, 350,
-32768, 493, 1633, 1098, 1057, 6163, 1102, 1104, 1105, 1106,
1517, 1517, 1517, 1109, 4282,-32768, 2812, 1101, 1107, 1108,
1110, 1111, 1112, 1114, 1117,-32768, 1118,-32768, 14, 986,
2368, 2368, 1517, 980, 2368,-32768, 6184, 5143, 6205, 5166,
6226, 5189, 6247, 5212, 5235, 987, 164, 988, 6268, -58,
-32768,-32768, 205, 475, 989, 1122, 1960,-32768,-32768,-32768,
13, 2368,-32768, 707,-32768, 6415,-32768, 1124, 4, 2368,
52, 716,-32768, 2368, 990, 24, 28, 1517, 1127, 991,
992, 1128, 1129, 1517, 995, 1136, 1139,-32768, 717,-32768,
1142, 2368, 1517, 1517, 1517,-32768, 265, 1517, 1517, 1517,
1517, 1517, 1517, 1517, 571, 2368, 2368, 2368, 1004,-32768,
184, 218, 291, 723, 734, 757, 761,-32768, 1517, 2368,
-32768,-32768, 2005, 202,-32768,-32768, 1008, 1144,-32768,-32768,
-32768,-32768, 1149, 1151, 1069,-32768, 2368, 2368, 2368,-32768,
1517, 1155, 2368, 2368, 1157,-32768, 84,-32768, 1158, 2368,
4308, 4334, 764,-32768, 2368, 6289,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768, 1020,-32768,-32768,-32768,-32768, 1517,
264, 2368, 1159, 1162, 23,-32768, 1161, 5258, 13,-32768,
-32768,-32768, 735, 4360,-32768, 1028, 6415, 2368,-32768, 75,
-32768, 75, 1165,-32768, 2368, 2368,-32768,-32768, 1167, 2368,
-32768,-32768,-32768, 1169, 4386, 1170, 1171, 1172, 2368, 2368,
906, 1174, 1175, 1176, 1177, 1178, 1179,-32768, 2331, 3310,
6310, 3086, 864, 3096, 75, 1181, 75, 1182, 75, 1184,
1186, 1188, 1191, 1194, 605, 1062, 6331, 3338, 389,-32768,
2368, 1517,-32768,-32768, 1517, 3114, 852, 6352, 1195, 1196,
1983, 2066, 1517,-32768,-32768, 253, 6415, 2368, 2368, 1517,
1060, 768, 6415, 1517, 1204, 1203, 1205, 2172,-32768, 1206,
1208,-32768, 1067,-32768, 1209, 2368,-32768, 3366, 57, 59,
-32768, 3394, 3422,-32768, 3450, 1207, 2368,-32768,-32768,-32768,
2283, 2302, 1211,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
2710, 1212, 1074,-32768, 2368,-32768, 1089, 493, 445,-32768,
1094, 522,-32768, 1096, 532,-32768, 1100,-32768,-32768,-32768,
-32768, 1213, 1517, 1228, 1123, 2368, 3478, 1241, 1180, 2368,
-32768, 2368,-32768,-32768,-32768,-32768,-32768,-32768, 1266,-32768,
2368, 4412, 4438,-32768, 1517, 2368, 1267, 1268, 1135,-32768,
-32768,-32768, 13,-32768, 1185,-32768, 4464, 1272,-32768,-32768,
1274, 1275, 1276, 1277, 4490,-32768,-32768,-32768,-32768,-32768,
864, 3142,-32768, 233, 2005, 493, 2005, 493, 2005, 493,
-32768, 780, 1517,-32768, 3506,-32768,-32768, 2368, 3534, 3562,
-32768, 1138, 6415, 2368, 2368, 788, 6415,-32768,-32768,-32768,
1282,-32768, 2368,-32768,-32768,-32768,-32768,-32768, 1284, 1150,
2368,-32768,-32768, 3590, 535, 296, 3618, 612, 304, 3646,
624, 309, 1517, 1292, 1245, 2682, 1166, 2734,-32768,-32768,
2368, 6373, 4516, 27,-32768, 4542, 1163,-32768, 3674, 1301,
2368, 1321, 1322, 2368, 1323, 1324, 2368, 1326, 1187,-32768,
2368,-32768, 493,-32768,-32768, 796,-32768, 2368,-32768, 1517,
2368, 1331,-32768,-32768, 1192, 3702,-32768,-32768, 1215, 3730,
-32768,-32768, 1220, 3758,-32768, 1333, 2755, 339, 2706, 1334,
1221, 6394, 801, 3786, 1197, 493, 1363, 493, 1364, 493,
1365,-32768,-32768,-32768,-32768, 493,-32768, 735,-32768, 1226,
1368, 1332, 347,-32768, 1229, 355,-32768, 1233, 381,-32768,
1235, 426, 812,-32768, 1239, 1517,-32768, 1261, 1380, 493,
1403, 493, 1404, 493,-32768, 735, 1405, 735, 813, 1406,
-32768, 442,-32768, 459,-32768, 478,-32768,-32768, 816,-32768,
1407,-32768, 1408, 1409, 1425, 735, 1426,-32768,-32768,-32768,
-32768,-32768,-32768, 1433, 1436,-32768
};
static const short yypgoto[] = {-32768,
-32768,-32768, 645,-32768,-32768, 861,-32768, 289,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,
-32768, -268, 20,-32768, -26, 1449, -1, -183, -170,-32768,
-32768,-32768,-32768,-32768, 1451,-32768,-32768,-32768,-32768,-32768,
-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768,-32768, -671,
-700,-32768,-32768,-32768, -2,-32768, 236,-32768, -1071, 462,
135, -64, -642, 549,-32768, -60, 2
};
#define YYLAST 6553
static const short yytable[] = { 215,
66, 128, 375, 1126, 151, 130, 666, 363, 182, 912,
463, 586, 373, 209, 210, 458, 195, 586, 131, 793,
216, 209, 210, 127, 207, 221, 661, 852, 137, 919,
3, 134, 1189, 921, 485, 138, 370, 146, 371, 486,
397, 198, 141, 399, 643, 104, 105, 106, 107, 644,
146, 108, 133, 104, 105, 106, 107, 915, 141, 108,
854, 224, 1089, 225, 1090, 351, 352, 226, 725, 227,
209, 210, 279, 136, 726, 727, 120, 121, 319, 920,
223, 530, 323, 922, 755, 351, 352, 553, 554, 587,
588, 589, 590, 591, 152, 587, 588, 589, 590, 591,
139, 537, 104, 105, 106, 107, 351, 352, 108, 784,
142, 228, 147, 229, 272, 273, 274, 143, 1213, 275,
278, 208, 550, 283, 459, 723, 142, 667, 132, 303,
667, 137, 305, 722, 306, 312, 315, 316, 721, 318,
312, 320, 321, 851, 312, 324, 325, 150, 907, 333,
183, 120, 121, 852, 592, 211, 153, 217, 196, 218,
879, 280, 281, 214, 219, 349, 350, 222, 662, 535,
536, 135, 1190, 372, 1259, 350, 199, 140, 366, 187,
351, 352, 188, 144, 366, 351, 352, 351, 352, 382,
383, 384, 655, 386, 551, 799, 389, 390, 785, 786,
495, 120, 121, 166, 167, 451, 452, 453, 454, 755,
149, 653, 460, 168, 402, 145, 570, 724, 120, 121,
169, 408, 409, 410, 411, 412, 413, 414, 415, 416,
417, 418, 419, 420, 421, 422, 423, 424, 425, 426,
427, 428, 429, 430, 431, 432, 433, 434, 435, 436,
437, 438, 439, 440, 441, 442, 443, 444, 445, 446,
447, 448, 449, 511, 170, 172, 1004, 179, 210, 297,
298, 299, 313, 725, 312, 154, 300, 313, 148, 726,
727, 313, 149, 469, 470, 471, 472, 473, 474, 475,
476, 477, 478, 479, 480, 481, 482, 483, 464, 104,
105, 106, 107, 897, 725, 108, 491, 155, 495, 558,
726, 727, 351, 352, 499, 526, 527, 528, 653, 504,
113, 114, 115, 116, 491, 312, 939, 940, 955, 514,
956, 516, 517, 518, 159, 520, 521, 522, 524, 524,
524, 524, 525, 525, 525, 525, 351, 352, 970, 164,
826, 366, 366, 538, 539, 540, 541, 272, 273, 542,
156, 165, 957, 157, 958, 158, 1104, 725, 173, 556,
174, 312, 181, 726, 727, 725, 563, 564, 184, 1143,
725, 726, 727, 351, 352, 180, 726, 727, 574, 575,
576, 577, 1070, 578, 230, 186, 231, 1071, 581, 836,
346, 584, 348, 852, 185, 827, 351, 352, 355, 175,
725, 313, 176, 364, 462, 177, 726, 727, 725, 351,
352, 669, 583, 353, 726, 727, 725, 113, 114, 115,
116, 189, 726, 727, 1146, 959, 1149, 960, 1152, 232,
1131, 233, 1172, 492, 693, 852, 120, 121, 852, 190,
1175, 852, 725, 649, 654, 1178, 405, 191, 726, 727,
658, 492, 313, 657, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 351, 352,
656, 901, 300, 312, 670, 1224, 649, 674, 202, 192,
675, 676, 678, 1249, 853, 166, 167, 725, 234, 193,
235, 1251, 194, 726, 727, 168, 312, 852, 313, 676,
696, 1208, 178, 725, 900, 902, 702, 351, 352, 726,
727, 757, 200, 113, 114, 115, 116, 1253, 712, 713,
725, 201, 852, 1056, 716, 852, 726, 727, 852, 120,
121, 852, 120, 121, 1233, 456, 1236, 218, 1239, 725,
203, 733, 219, 204, 1242, 726, 727, 736, 351, 352,
236, 852, 237, 852, 725, 852, 745, 205, 747, 748,
726, 727, 1255, 351, 352, 354, 948, 949, 1262, 777,
1264, 238, 1266, 239, 778, 206, 533, 534, 1273, 1105,
113, 114, 115, 116, 266, 267, 348, 351, 352, 351,
352, 756, 240, 268, 241, 1274, 269, 798, 802, 120,
121, 330, 493, 641, 365, 642, 585, 337, 767, 768,
313, 242, 270, 243, 1275, 244, 284, 245, 677, 679,
819, 282, 769, 770, 771, 772, 773, 774, 775, 450,
210, 312, 369, 313, 301, 779, 677, 302, 377, 378,
351, 352, 787, 246, 304, 247, 844, 845, 846, 847,
351, 352, 796, 351, 352, 248, 1107, 249, 317, 954,
312, 104, 105, 106, 107, 322, 1109, 108, 250, 1171,
251, 332, 76, 307, 252, 254, 253, 255, 80, 81,
82, 335, 312, 83, 84, 85, 86, 87, 88, 89,
90, 91, 92, 93, 94, 95, 96, 97, 98, 99,
100, 101, 102, 103, 256, 258, 257, 259, 312, 312,
312, 312, 308, 334, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 512, 298, 299, 209, 210,
351, 352, 300, 338, 28, 29, 30, 31, 32, 33,
345, 1052, 351, 352, 37, 38, 1174, 336, 881, 882,
339, 260, 886, 261, 262, 711, 263, 340, 1177, 1037,
104, 105, 106, 107, 356, 264, 108, 265, 313, 495,
381, 496, 120, 121, 495, 730, 501, 508, 489, 908,
218, 109, 110, 111, 112, 219, 495, 914, 505, 756,
495, 917, 652, 903, 495, 341, 694, 313, 117, 309,
495, 342, 735, 119, 160, 343, 344, 161, 122, 935,
162, 357, 163, 125, 358, 810, 510, 811, 495, 313,
818, 359, 374, 950, 951, 952, 291, 292, 293, 294,
295, 296, 297, 298, 299, 379, 965, 967, 380, 300,
968, 909, 1005, 910, 387, 313, 313, 313, 313, 1062,
495, 495, 916, 933, 976, 977, 978, 495, 385, 961,
981, 982, 295, 296, 297, 298, 299, 987, 495, 388,
962, 300, 993, 391, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 984, 392, 393, 998,
300, 495, 997, 963, 394, 495, 801, 964, 990, 1023,
991, 1024, 1076, 395, 1077, 1008, 396, 1140, 398, 650,
651, 400, 1012, 1013, 1153, 401, 1154, 1015, 28, 29,
30, 31, 990, 33, 1164, 403, 1021, 1022, 37, 38,
1076, 407, 1210, 1156, 404, 990, 1031, 1230, 455, 465,
1032, 366, 300, 841, 842, 843, 1256, 990, 1257, 1271,
1276, 466, 1277, 467, 490, 513, 519, 529, 1057, 555,
552, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 1072, 1073, 559, 560, 300,
561, 562, 568, 571, 646, 645, 647, 648, 1063, 659,
660, 664, 671, 1087, 5, 6, 680, 681, 682, 684,
685, 686, 687, 1209, 1095, 689, 690, 691, 692, 706,
698, 707, 737, 738, 708, 709, 710, 714, 208, 715,
741, 742, 1102, 743, 744, 543, 11, 12, 544, 14,
15, 545, 17, 546, 19, 761, 20, 762, 22, 23,
763, 25, 26, 1115, 766, 765, 776, 1119, 791, 1120,
781, 782, 783, 788, 789, 792, 795, 797, 1123, 39,
805, 808, 814, 1127, 821, 822, 815, 823, 824, 825,
43, 44, 45, 828, 829, 830, 831, 832, 969, 833,
834, 835, 840, 849, 52, 53, 54, 848, 55, 366,
850, 547, 1144, 856, 1147, 857, 1150, 859, 869, 860,
861, 862, 866, 871, 872, 1158, 873, 874, 875, 876,
877, 1162, 1163, 878, 880, 885, 896, 898, 905, 911,
1166, 904, 924, 927, 928, 918, 925, 926, 1169, 557,
930, 931, 806, 807, 932, 809, 934, 812, 813, 953,
972, 816, 817, 971, 973, 1009, 974, 1010, 993, 980,
975, 983, 995, 985, 999, 1000, 1002, 1244, 1196, 1007,
1011, 1200, 1014, 1016, 1204, 1018, 1019, 1020, 1207, 1025,
1026, 1027, 1028, 1029, 1030, 1212, 1040, 1043, 1214, 1046,
1039, 1048, 1042, 1049, 1045, 1267, 1050, 1270, 285, 1051,
1065, 1066, 863, 864, 865, 1075, 1053, 1079, 1080, 1085,
1081, 1094, 1083, 1084, 1086, 1282, 1098, 1100, 1111, 1101,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 1113, 1103, 76, 307, 300, 1106,
870, 1108, 80, 81, 82, 1110, 1117, 83, 84, 85,
86, 87, 88, 89, 90, 91, 92, 93, 94, 95,
96, 97, 98, 99, 100, 101, 102, 103, 1114, 923,
1118, 1121, 1128, 1129, 1130, 929, 308, 1134, 1132, 1135,
1136, 1137, 1138, 1161, 936, 937, 938, 1165, 1167, 941,
942, 943, 944, 945, 946, 947, 1168, 1180, 28, 29,
30, 31, 32, 33, 493, 1181, 1194, 1192, 37, 38,
966, 1184, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 1197, 1198, 1201, 1202,
300, 1205, 979, 1206, 326, 1215, 1248, 1216, 1222, 1227,
1145, 1232, 1148, 468, 1151, 109, 110, 111, 112, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
1218, 996, 117, 327, 300, 1220, 1228, 119, 1234, 1237,
1240, 1246, 122, 1247, 1250, 76, 307, 125, 1252, 328,
1254, 80, 81, 82, 1258, 1261, 83, 84, 85, 86,
87, 88, 89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100, 101, 102, 103, 1260, 1263, 1265,
1268, 1272, 1278, 1279, 1280, 308, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 494, 298, 299,
1281, 1283, 1285, 1058, 300, 1286, 1059, 28, 29, 30,
31, 32, 33, 913, 1069, 759, 484, 37, 38, 1186,
65, 1074, 72, 1001, 0, 1078, 0, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 376, 0, 300, 0, 0, 0, 790,
0, 0, 0, 0, 109, 110, 111, 112, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 117, 327, 0, 0, 0, 119, 0, 0, 0,
0, 122, 0, 0, 1112, 0, 125, 0, 328, 76,
307, 0, 0, 0, 0, 80, 81, 82, 0, 0,
83, 84, 85, 86, 87, 88, 89, 90, 91, 92,
93, 94, 95, 96, 97, 98, 99, 100, 101, 102,
103, 0, 0, 0, 0, 0, 0, 0, 0, 308,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 1155, 0, 0, 0, 300, 0,
0, 28, 29, 30, 31, 32, 33, 493, 0, 0,
0, 37, 38, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 1179, 0, 0, 820, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 109, 110,
111, 112, 0, 0, 0, 0, 0, 0, 855, 0,
0, 0, 0, 0, 0, 117, 327, 0, 0, 0,
119, 0, 0, 0, 0, 122, 0, 76, 307, 0,
125, 0, 328, 80, 81, 82, 0, 0, 83, 84,
85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
95, 96, 97, 98, 99, 100, 101, 102, 103, 0,
0, 0, 0, 0, 0, 0, 0, 308, 0, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
512, 298, 299, 0, 0, 0, 0, 300, 0, 28,
29, 30, 31, 32, 33, 572, 0, 0, 0, 37,
38, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 109, 110, 111, 112,
300, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 117, 309, 0, 0, 0, 119, 0,
0, 0, 0, 122, 0, 76, 307, 0, 125, 0,
509, 80, 81, 82, 0, 0, 83, 84, 85, 86,
87, 88, 89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100, 101, 102, 103, 0, 0, 0,
0, 0, 0, 0, 0, 308, 0, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 28, 29, 30,
31, 32, 33, 76, 271, 0, 0, 37, 38, 80,
81, 82, 0, 0, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, 0, 0, 0, 0, 0,
0, 0, 0, 0, 109, 110, 111, 112, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 117, 309, 0, 0, 0, 119, 0, 0, 0,
0, 122, 0, 76, 271, 0, 125, 0, 695, 80,
81, 82, 0, 0, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, 906, 0, 0, 0, 0,
0, 0, 109, 110, 111, 112, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1067, 117,
118, 0, 0, 0, 119, 0, 0, 0, 0, 122,
0, 0, 276, 0, 125, 0, 277, 76, 271, 0,
0, 0, 0, 80, 81, 82, 0, 0, 83, 84,
85, 86, 87, 88, 89, 90, 91, 92, 93, 94,
95, 96, 97, 98, 99, 100, 101, 102, 103, 0,
0, 0, 109, 110, 111, 112, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 117,
118, 0, 0, 0, 119, 0, 0, 0, 0, 122,
0, 1068, 672, 0, 125, 0, 673, 0, 0, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 109, 110, 111, 112,
300, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 360, 361, 0, 0, 0, 119, 0,
0, 0, 0, 362, 0, 76, 77, 78, 125, 79,
169, 80, 81, 82, 0, 0, 83, 84, 85, 86,
87, 88, 89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100, 101, 102, 103, 1082, 104, 105,
106, 107, 0, 0, 108, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 76, 307, 300, 0, 0, 0, 80, 81, 82,
0, 0, 83, 84, 85, 86, 87, 88, 89, 90,
91, 92, 93, 94, 95, 96, 97, 98, 99, 100,
101, 102, 103, 0, 0, 0, 0, 0, 0, 0,
0, 308, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 109, 110, 111, 112, 113, 114,
115, 116, 0, 28, 29, 30, 31, 32, 33, 0,
0, 117, 118, 37, 38, 0, 119, 120, 121, 0,
0, 122, 0, 123, 0, 124, 125, 0, 1096, 0,
0, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 1097, 0, 300,
109, 110, 111, 112, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 117, 309, 0,
0, 0, 119, 76, 271, 210, 0, 122, 0, 80,
81, 82, 125, 0, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96, 97, 98,
99, 100, 101, 102, 103, 0, 104, 105, 106, 107,
76, 271, 108, 0, 0, 0, 80, 81, 82, 0,
0, 83, 84, 85, 86, 87, 88, 89, 90, 91,
92, 93, 94, 95, 96, 97, 98, 99, 100, 101,
102, 103, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 109, 110, 111, 112, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 117,
118, 0, 0, 0, 119, 0, 0, 0, 0, 122,
0, 0, 0, 0, 125, 0, 0, 0, 0, 109,
110, 111, 112, 5, 6, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 117, 118, 0, 0,
0, 119, 0, 0, 0, 0, 122, 5, 6, 0,
0, 125, 0, 0, 543, 11, 12, 544, 14, 15,
545, 17, 546, 19, 0, 20, 0, 22, 23, 0,
25, 26, 0, 0, 0, 0, 0, 0, 543, 11,
12, 544, 14, 15, 545, 17, 546, 19, 39, 20,
0, 22, 23, 0, 25, 26, 0, 0, 0, 43,
44, 45, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 39, 52, 53, 54, 0, 55, 0, 0,
547, 0, 0, 43, 44, 45, 0, 0, 5, 6,
0, 0, 0, 0, 0, 0, 0, 52, 53, 54,
0, 55, 0, 0, 547, 0, 0, 0, 0, 0,
0, 0, 5, 6, 0, 0, 0, 0, 579, 543,
11, 12, 544, 14, 15, 545, 17, 546, 19, 0,
20, 0, 22, 23, 0, 25, 26, 0, 0, 0,
0, 0, 580, 543, 11, 12, 544, 14, 15, 545,
17, 546, 19, 39, 20, 0, 22, 23, 0, 25,
26, 0, 0, 0, 43, 44, 45, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 39, 52, 53,
54, 0, 55, 0, 0, 547, 0, 0, 43, 44,
45, 0, 0, 5, 6, 0, 0, 0, 0, 0,
0, 0, 52, 53, 54, 0, 55, 0, 0, 547,
0, 0, 0, 0, 0, 1099, 0, 5, 6, 0,
0, 0, 0, 731, 543, 11, 12, 544, 14, 15,
545, 17, 546, 19, 0, 20, 0, 22, 23, 1185,
25, 26, 0, 0, 0, 0, 0, 746, 543, 11,
12, 544, 14, 15, 545, 17, 546, 19, 39, 20,
1223, 22, 23, 0, 25, 26, 0, 0, 0, 43,
44, 45, 0, 0, 0, 0, 0, 0, 0, 0,
0, 665, 39, 52, 53, 54, 0, 55, 0, 0,
547, 0, 0, 43, 44, 45, 0, 0, 0, 0,
804, 0, 0, 0, 0, 0, 0, 52, 53, 54,
0, 55, 0, 0, 547, 0, 0, 0, 0, 868,
0, 0, 0, 0, 0, 0, 0, 0, 1182, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 1225, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, -3, 1, 0, 300,
-3, 0, 0, 0, 0, 0, 0, 0, -3, -3,
0, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, -3, 0, 0, 0, 0, -3, -3, 699, -3,
-3, -3, -3, -3, -3, -3, -3, -3, -3, 0,
-3, -3, -3, -3, -3, -3, -3, 0, 0, 0,
-3, -3, -3, -3, -3, -3, -3, 0, -3, -3,
-3, -3, -3, -3, 0, 0, -3, -3, 0, 4,
0, 0, 0, -3, -3, -3, -3, 5, 6, -3,
0, -3, 0, -3, -3, -3, -3, 0, -3, -3,
-3, 0, -3, -3, -3, -3, -3, -3, 0, 0,
7, 0, 0, 0, 0, 8, 9, 0, 10, 11,
12, 13, 14, 15, 16, 17, 18, 19, 0, 20,
21, 22, 23, 24, 25, 26, 0, 0, 0, 27,
28, 29, 30, 31, 32, 33, 0, 34, 35, 36,
37, 38, 39, 0, 0, 40, 41, 5, 6, 0,
0, 0, 42, 43, 44, 45, 0, 0, 46, 0,
47, 0, 48, 49, 50, 51, 0, 52, 53, 54,
0, 55, 56, 57, 58, 59, 60, 0, 543, 11,
12, 544, 14, 15, 545, 17, 546, 19, 0, 20,
0, 22, 23, 0, 25, 26, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 39, 0, 300, 0, 457, 0, 0, 0,
0, 531, 0, 43, 44, 45, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 52, 53, 54,
0, 55, 0, 0, 547, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
1035, 0, 1036, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 1060, 0,
1061, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 1141, 0, 1142, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 0, 0, 703, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 0, 0, 704, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
0, 0, 758, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 0, 0,
803, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 0, 0, 839, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 0, 0, 1033, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 0, 0, 1055, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
0, 0, 1088, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 0, 0,
1091, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 0, 0, 1092, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 0, 0, 1093, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 0, 0, 1116, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
0, 0, 1157, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 0, 0,
1159, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 0, 0, 1160, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 0, 0, 1170, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 0, 0, 1173, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
0, 0, 1176, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 0, 0,
1193, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 0, 0, 1217, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 0, 0, 1219, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 0, 0, 1221, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
0, 0, 1231, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 487, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 531, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
532, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 569, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 621, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 622, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 635, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
636, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 637, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 638, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 639, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 640, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
718, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 719, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 720, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 800, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 837, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
838, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 867, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 988, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 989, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 1006, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
1017, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 1124, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 0,
0, 0, 1125, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 0, 0, 0, 1133, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 0, 0, 0, 1139, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 0, 0, 0,
1188, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 0, 0, 0, 1191, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 461,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
0, 0, 582, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 600, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 0, 0, 602, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 604, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 0, 0, 606, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 608, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 0, 0,
610, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 612, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 0, 0, 614, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 616,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
0, 0, 618, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 620, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 0, 0, 624, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 626, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 0, 0, 628, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 630, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 0, 0,
632, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 634, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 0, 0, 717, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 734,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
0, 0, 739, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 0, 0, 740, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 0, 0, 754, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 0,
0, 780, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 0, 0, 888, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 0, 0, 890, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 0, 0,
892, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 0, 0, 894, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 0, 0, 895, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 0, 0, 1003,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
457, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 488, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 497, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 498, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 500, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 502, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 503, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 506, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 507, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 515,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
565, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 566, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 567, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 573, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 599, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 601, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 603, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 605, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 607, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 609,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
611, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 613, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 615, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 617, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 619, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 623, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 625, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 627, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 629, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 631,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
633, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 683, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 688, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 697, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 700, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 701, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 705, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 749, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 750, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 751,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
752, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 753, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 858, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 887, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300, 0, 889, 286, 287, 288, 289, 290,
291, 292, 293, 294, 295, 296, 297, 298, 299, 0,
0, 0, 0, 300, 0, 891, 286, 287, 288, 289,
290, 291, 292, 293, 294, 295, 296, 297, 298, 299,
0, 0, 0, 0, 300, 0, 893, 286, 287, 288,
289, 290, 291, 292, 293, 294, 295, 296, 297, 298,
299, 0, 0, 0, 0, 300, 0, 899, 286, 287,
288, 289, 290, 291, 292, 293, 294, 295, 296, 297,
298, 299, 0, 0, 0, 0, 300, 0, 994, 286,
287, 288, 289, 290, 291, 292, 293, 294, 295, 296,
297, 298, 299, 0, 0, 0, 0, 300, 0, 1034,
286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
296, 297, 298, 299, 0, 0, 0, 0, 300, 0,
1054, 286, 287, 288, 289, 290, 291, 292, 293, 294,
295, 296, 297, 298, 299, 0, 0, 0, 0, 300,
0, 1064, 286, 287, 288, 289, 290, 291, 292, 293,
294, 295, 296, 297, 298, 299, 0, 0, 0, 0,
300, 0, 1187, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 0, 0, 0,
0, 300, 0, 1229, 286, 287, 288, 289, 290, 291,
292, 293, 294, 295, 296, 297, 298, 299, 0, 0,
0, 0, 300
};
static const short yycheck[] = { 60,
2, 4, 186, 1075, 49, 4, 6, 178, 4, 6,
279, 4, 183, 4, 5, 7, 4, 4, 13, 662,
4, 4, 5, 4, 4, 4, 4, 728, 139, 6,
6, 6, 6, 6, 140, 146, 4, 71, 6, 145,
211, 4, 71, 214, 140, 36, 37, 38, 39, 145,
71, 42, 139, 36, 37, 38, 39, 6, 71, 42,
732, 139, 6, 141, 6, 129, 130, 139, 72, 141,
4, 5, 4, 6, 78, 79, 135, 136, 143, 56,
79, 145, 147, 56, 143, 129, 130, 6, 7, 82,
83, 84, 85, 86, 139, 82, 83, 84, 85, 86,
139, 145, 36, 37, 38, 39, 129, 130, 42, 4,
139, 139, 146, 141, 117, 118, 119, 146, 1190, 122,
123, 101, 145, 126, 116, 146, 139, 127, 49, 132,
127, 139, 135, 146, 137, 138, 139, 140, 146, 142,
143, 144, 145, 147, 147, 148, 149, 53, 791, 152,
146, 135, 136, 854, 147, 146, 49, 141, 146, 143,
147, 93, 94, 146, 148, 168, 169, 146, 146, 353,
354, 146, 146, 141, 1246, 178, 139, 139, 180, 43,
129, 130, 46, 139, 186, 129, 130, 129, 130, 192,
193, 194, 461, 196, 365, 140, 199, 200, 93, 94,
145, 135, 136, 129, 130, 266, 267, 268, 269, 143,
139, 7, 277, 139, 217, 139, 387, 146, 135, 136,
146, 224, 225, 226, 227, 228, 229, 230, 231, 232,
233, 234, 235, 236, 237, 238, 239, 240, 241, 242,
243, 244, 245, 246, 247, 248, 249, 250, 251, 252,
253, 254, 255, 256, 257, 258, 259, 260, 261, 262,
263, 264, 265, 328, 29, 30, 909, 32, 5, 131,
132, 133, 138, 72, 277, 49, 138, 143, 139, 78,
79, 147, 139, 286, 287, 288, 289, 290, 291, 292,
293, 294, 295, 296, 297, 298, 299, 300, 279, 36,
37, 38, 39, 140, 72, 42, 309, 49, 145, 374,
78, 79, 129, 130, 317, 342, 343, 344, 7, 322,
116, 117, 118, 119, 327, 328, 62, 63, 145, 332,
147, 334, 335, 336, 51, 338, 339, 340, 341, 342,
343, 344, 341, 342, 343, 344, 129, 130, 147, 139,
6, 353, 354, 356, 357, 358, 359, 360, 361, 362,
46, 146, 145, 49, 147, 51, 1038, 72, 146, 372,
4, 374, 49, 78, 79, 72, 379, 380, 6, 147,
72, 78, 79, 129, 130, 146, 78, 79, 391, 392,
393, 394, 140, 396, 139, 146, 141, 145, 401, 145,
165, 404, 167, 1104, 46, 61, 129, 130, 173, 43,
72, 277, 46, 178, 7, 49, 78, 79, 72, 129,
130, 486, 403, 146, 78, 79, 72, 116, 117, 118,
119, 4, 78, 79, 1106, 145, 1108, 147, 1110, 139,
1083, 141, 147, 309, 509, 1146, 135, 136, 1149, 4,
147, 1152, 72, 456, 143, 147, 221, 4, 78, 79,
463, 327, 328, 462, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, 129, 130,
461, 7, 138, 486, 487, 147, 489, 490, 101, 139,
493, 494, 495, 147, 145, 129, 130, 72, 139, 139,
141, 147, 139, 78, 79, 139, 509, 1208, 374, 512,
513, 1183, 146, 72, 783, 784, 519, 129, 130, 78,
79, 582, 139, 116, 117, 118, 119, 147, 531, 532,
72, 6, 1233, 145, 537, 1236, 78, 79, 1239, 135,
136, 1242, 135, 136, 1216, 141, 1218, 143, 1220, 72,
101, 554, 148, 101, 1226, 78, 79, 560, 129, 130,
139, 1262, 141, 1264, 72, 1266, 569, 101, 571, 572,
78, 79, 147, 129, 130, 146, 6, 7, 1250, 644,
1252, 139, 1254, 141, 645, 4, 351, 352, 147, 145,
116, 117, 118, 119, 139, 139, 361, 129, 130, 129,
130, 582, 139, 139, 141, 147, 139, 668, 673, 135,
136, 150, 8, 141, 146, 143, 146, 156, 621, 622,
486, 139, 139, 141, 147, 139, 6, 141, 494, 495,
695, 4, 635, 636, 637, 638, 639, 640, 641, 4,
5, 644, 181, 509, 6, 648, 512, 6, 187, 188,
129, 130, 655, 139, 5, 141, 721, 722, 723, 724,
129, 130, 665, 129, 130, 139, 145, 141, 139, 840,
673, 36, 37, 38, 39, 139, 145, 42, 139, 145,
141, 139, 3, 4, 139, 139, 141, 141, 9, 10,
11, 139, 695, 14, 15, 16, 17, 18, 19, 20,
21, 22, 23, 24, 25, 26, 27, 28, 29, 30,
31, 32, 33, 34, 139, 139, 141, 141, 721, 722,
723, 724, 43, 146, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, 4, 5,
129, 130, 138, 146, 65, 66, 67, 68, 69, 70,
4, 147, 129, 130, 75, 76, 145, 139, 761, 762,
146, 139, 765, 141, 139, 530, 141, 139, 145, 953,
36, 37, 38, 39, 141, 139, 42, 141, 644, 145,
6, 147, 135, 136, 145, 550, 147, 326, 141, 792,
143, 112, 113, 114, 115, 148, 145, 800, 147, 780,
145, 804, 147, 784, 145, 139, 147, 673, 129, 130,
145, 139, 147, 134, 43, 139, 139, 46, 139, 822,
49, 146, 51, 144, 146, 49, 147, 51, 145, 695,
147, 146, 146, 836, 837, 838, 125, 126, 127, 128,
129, 130, 131, 132, 133, 141, 849, 850, 141, 138,
853, 145, 913, 147, 146, 721, 722, 723, 724, 8,
145, 145, 147, 147, 867, 868, 869, 145, 143, 147,
873, 874, 129, 130, 131, 132, 133, 880, 145, 96,
147, 138, 885, 139, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, 877, 139, 139, 902,
138, 145, 901, 147, 139, 145, 671, 147, 145, 4,
147, 6, 145, 6, 147, 918, 139, 1101, 6, 458,
459, 6, 925, 926, 145, 141, 147, 930, 65, 66,
67, 68, 145, 70, 147, 4, 939, 940, 75, 76,
145, 6, 147, 1114, 146, 145, 949, 147, 5, 143,
949, 953, 138, 718, 719, 720, 145, 145, 147, 147,
145, 7, 147, 141, 146, 7, 7, 140, 971, 6,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, 988, 989, 147, 139, 138,
7, 7, 93, 146, 140, 145, 140, 145, 147, 6,
4, 142, 7, 1006, 12, 13, 96, 7, 7, 7,
96, 7, 7, 1184, 1017, 96, 7, 7, 6, 140,
7, 140, 561, 562, 140, 140, 143, 147, 101, 147,
7, 7, 1035, 7, 143, 43, 44, 45, 46, 47,
48, 49, 50, 51, 52, 139, 54, 139, 56, 57,
146, 59, 60, 1056, 6, 139, 4, 1060, 7, 1062,
6, 6, 142, 6, 6, 141, 6, 127, 1071, 77,
49, 7, 7, 1076, 7, 146, 51, 7, 7, 7,
88, 89, 90, 7, 7, 7, 7, 7, 853, 7,
7, 4, 146, 146, 102, 103, 104, 6, 106, 1101,
139, 109, 1105, 6, 1107, 49, 1109, 6, 8, 6,
6, 6, 4, 7, 7, 1118, 7, 7, 7, 6,
4, 1124, 1125, 6, 139, 146, 140, 140, 7, 6,
1133, 143, 6, 6, 6, 146, 146, 146, 1141, 147,
146, 6, 681, 682, 6, 684, 5, 686, 687, 146,
7, 690, 691, 146, 6, 920, 6, 922, 1161, 5,
92, 5, 143, 6, 6, 4, 6, 1228, 1171, 142,
6, 1174, 6, 5, 1177, 6, 6, 6, 1181, 6,
6, 6, 6, 6, 6, 1188, 6, 6, 1191, 6,
955, 6, 957, 6, 959, 1256, 6, 1258, 6, 6,
6, 6, 741, 742, 743, 146, 145, 4, 6, 143,
6, 5, 7, 6, 6, 1276, 6, 6, 6, 146,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, 7, 147, 3, 4, 138, 146,
140, 146, 9, 10, 11, 146, 6, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26,
27, 28, 29, 30, 31, 32, 33, 34, 146, 808,
91, 6, 6, 6, 140, 814, 43, 6, 94, 6,
6, 6, 6, 146, 823, 824, 825, 6, 5, 828,
829, 830, 831, 832, 833, 834, 147, 6, 65, 66,
67, 68, 69, 70, 8, 61, 6, 145, 75, 76,
849, 146, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, 6, 6, 6, 6,
138, 6, 871, 147, 101, 5, 5, 146, 6, 6,
1105, 145, 1107, 6, 1109, 112, 113, 114, 115, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
146, 900, 129, 130, 138, 146, 146, 134, 6, 6,
6, 146, 139, 6, 146, 3, 4, 144, 146, 146,
146, 9, 10, 11, 146, 6, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, 27,
28, 29, 30, 31, 32, 33, 34, 147, 6, 6,
6, 6, 6, 6, 6, 43, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
6, 6, 0, 972, 138, 0, 975, 65, 66, 67,
68, 69, 70, 799, 983, 585, 6, 75, 76, 1161,
2, 990, 2, 905, -1, 994, -1, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, 101, -1, 138, -1, -1, -1, 6,
-1, -1, -1, -1, 112, 113, 114, 115, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 129, 130, -1, -1, -1, 134, -1, -1, -1,
-1, 139, -1, -1, 1053, -1, 144, -1, 146, 3,
4, -1, -1, -1, -1, 9, 10, 11, -1, -1,
14, 15, 16, 17, 18, 19, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31, 32, 33,
34, -1, -1, -1, -1, -1, -1, -1, -1, 43,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, 1113, -1, -1, -1, 138, -1,
-1, 65, 66, 67, 68, 69, 70, 8, -1, -1,
-1, 75, 76, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, 1153, -1, -1, 6, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 112, 113,
114, 115, -1, -1, -1, -1, -1, -1, 6, -1,
-1, -1, -1, -1, -1, 129, 130, -1, -1, -1,
134, -1, -1, -1, -1, 139, -1, 3, 4, -1,
144, -1, 146, 9, 10, 11, -1, -1, 14, 15,
16, 17, 18, 19, 20, 21, 22, 23, 24, 25,
26, 27, 28, 29, 30, 31, 32, 33, 34, -1,
-1, -1, -1, -1, -1, -1, -1, 43, -1, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 65,
66, 67, 68, 69, 70, 8, -1, -1, -1, 75,
76, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, 112, 113, 114, 115,
138, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 129, 130, -1, -1, -1, 134, -1,
-1, -1, -1, 139, -1, 3, 4, -1, 144, -1,
146, 9, 10, 11, -1, -1, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, 27,
28, 29, 30, 31, 32, 33, 34, -1, -1, -1,
-1, -1, -1, -1, -1, 43, -1, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 65, 66, 67,
68, 69, 70, 3, 4, -1, -1, 75, 76, 9,
10, 11, -1, -1, 14, 15, 16, 17, 18, 19,
20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
30, 31, 32, 33, 34, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 112, 113, 114, 115, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 129, 130, -1, -1, -1, 134, -1, -1, -1,
-1, 139, -1, 3, 4, -1, 144, -1, 146, 9,
10, 11, -1, -1, 14, 15, 16, 17, 18, 19,
20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
30, 31, 32, 33, 34, 6, -1, -1, -1, -1,
-1, -1, 112, 113, 114, 115, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, 6, 129,
130, -1, -1, -1, 134, -1, -1, -1, -1, 139,
-1, -1, 142, -1, 144, -1, 146, 3, 4, -1,
-1, -1, -1, 9, 10, 11, -1, -1, 14, 15,
16, 17, 18, 19, 20, 21, 22, 23, 24, 25,
26, 27, 28, 29, 30, 31, 32, 33, 34, -1,
-1, -1, 112, 113, 114, 115, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 129,
130, -1, -1, -1, 134, -1, -1, -1, -1, 139,
-1, 6, 142, -1, 144, -1, 146, -1, -1, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, 112, 113, 114, 115,
138, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, 129, 130, -1, -1, -1, 134, -1,
-1, -1, -1, 139, -1, 3, 4, 5, 144, 7,
146, 9, 10, 11, -1, -1, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, 27,
28, 29, 30, 31, 32, 33, 34, 6, 36, 37,
38, 39, -1, -1, 42, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, 3, 4, 138, -1, -1, -1, 9, 10, 11,
-1, -1, 14, 15, 16, 17, 18, 19, 20, 21,
22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
32, 33, 34, -1, -1, -1, -1, -1, -1, -1,
-1, 43, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, 112, 113, 114, 115, 116, 117,
118, 119, -1, 65, 66, 67, 68, 69, 70, -1,
-1, 129, 130, 75, 76, -1, 134, 135, 136, -1,
-1, 139, -1, 141, -1, 143, 144, -1, 6, -1,
-1, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, 6, -1, 138,
112, 113, 114, 115, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 129, 130, -1,
-1, -1, 134, 3, 4, 5, -1, 139, -1, 9,
10, 11, 144, -1, 14, 15, 16, 17, 18, 19,
20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
30, 31, 32, 33, 34, -1, 36, 37, 38, 39,
3, 4, 42, -1, -1, -1, 9, 10, 11, -1,
-1, 14, 15, 16, 17, 18, 19, 20, 21, 22,
23, 24, 25, 26, 27, 28, 29, 30, 31, 32,
33, 34, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, 112, 113, 114, 115, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, 129,
130, -1, -1, -1, 134, -1, -1, -1, -1, 139,
-1, -1, -1, -1, 144, -1, -1, -1, -1, 112,
113, 114, 115, 12, 13, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, 129, 130, -1, -1,
-1, 134, -1, -1, -1, -1, 139, 12, 13, -1,
-1, 144, -1, -1, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, -1, 54, -1, 56, 57, -1,
59, 60, -1, -1, -1, -1, -1, -1, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, 77, 54,
-1, 56, 57, -1, 59, 60, -1, -1, -1, 88,
89, 90, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, 77, 102, 103, 104, -1, 106, -1, -1,
109, -1, -1, 88, 89, 90, -1, -1, 12, 13,
-1, -1, -1, -1, -1, -1, -1, 102, 103, 104,
-1, 106, -1, -1, 109, -1, -1, -1, -1, -1,
-1, -1, 12, 13, -1, -1, -1, -1, 147, 43,
44, 45, 46, 47, 48, 49, 50, 51, 52, -1,
54, -1, 56, 57, -1, 59, 60, -1, -1, -1,
-1, -1, 147, 43, 44, 45, 46, 47, 48, 49,
50, 51, 52, 77, 54, -1, 56, 57, -1, 59,
60, -1, -1, -1, 88, 89, 90, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 77, 102, 103,
104, -1, 106, -1, -1, 109, -1, -1, 88, 89,
90, -1, -1, 12, 13, -1, -1, -1, -1, -1,
-1, -1, 102, 103, 104, -1, 106, -1, -1, 109,
-1, -1, -1, -1, -1, 6, -1, 12, 13, -1,
-1, -1, -1, 147, 43, 44, 45, 46, 47, 48,
49, 50, 51, 52, -1, 54, -1, 56, 57, 6,
59, 60, -1, -1, -1, -1, -1, 147, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, 77, 54,
6, 56, 57, -1, 59, 60, -1, -1, -1, 88,
89, 90, -1, -1, -1, -1, -1, -1, -1, -1,
-1, 8, 77, 102, 103, 104, -1, 106, -1, -1,
109, -1, -1, 88, 89, 90, -1, -1, -1, -1,
8, -1, -1, -1, -1, -1, -1, 102, 103, 104,
-1, 106, -1, -1, 109, -1, -1, -1, -1, 8,
-1, -1, -1, -1, -1, -1, -1, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, 0, 1, -1, 138,
4, -1, -1, -1, -1, -1, -1, -1, 12, 13,
-1, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 35, -1, -1, -1, -1, 40, 41, 147, 43,
44, 45, 46, 47, 48, 49, 50, 51, 52, -1,
54, 55, 56, 57, 58, 59, 60, -1, -1, -1,
64, 65, 66, 67, 68, 69, 70, -1, 72, 73,
74, 75, 76, 77, -1, -1, 80, 81, -1, 4,
-1, -1, -1, 87, 88, 89, 90, 12, 13, 93,
-1, 95, -1, 97, 98, 99, 100, -1, 102, 103,
104, -1, 106, 107, 108, 109, 110, 111, -1, -1,
35, -1, -1, -1, -1, 40, 41, -1, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, -1, 54,
55, 56, 57, 58, 59, 60, -1, -1, -1, 64,
65, 66, 67, 68, 69, 70, -1, 72, 73, 74,
75, 76, 77, -1, -1, 80, 81, 12, 13, -1,
-1, -1, 87, 88, 89, 90, -1, -1, 93, -1,
95, -1, 97, 98, 99, 100, -1, 102, 103, 104,
-1, 106, 107, 108, 109, 110, 111, -1, 43, 44,
45, 46, 47, 48, 49, 50, 51, 52, -1, 54,
-1, 56, 57, -1, 59, 60, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, 77, -1, 138, -1, 140, -1, -1, -1,
-1, 145, -1, 88, 89, 90, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, 102, 103, 104,
-1, 106, -1, -1, 109, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, -1,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, -1, -1, 147, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, -1, -1, 147, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, -1, -1,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, -1, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, -1, -1, 147, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, -1, -1, 147, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, -1, -1,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, -1, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, -1, -1, 147, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, -1, -1, 147, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, -1, -1,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, -1, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, -1, -1, 147, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, -1, -1, 147, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, -1, -1,
147, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, -1, -1, 147, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, -1, -1, 147, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, -1, -1, 147, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
-1, -1, 147, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, 145, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, 145, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, 145, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, 145, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, -1,
-1, -1, 145, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, -1, -1, -1, 145, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, -1, -1, -1, 145, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, -1, -1, -1,
145, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, -1, -1, -1, 145, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, 142,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
-1, -1, 142, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, 142, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, -1, -1, 142, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, 142, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, -1, -1, 142, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, 142, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, -1, -1,
142, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, 142, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, -1, -1, 142, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, 142,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
-1, -1, 142, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, 142, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, -1, -1, 142, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, 142, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, -1, -1, 142, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, 142, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, -1, -1,
142, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, 142, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, -1, -1, 142, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, 142,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
-1, -1, 142, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, -1, -1, 142, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, -1, -1, 142, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, -1,
-1, 142, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, -1, -1, 142, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, -1, -1, 142, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, -1, -1,
142, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, -1, -1, 142, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, -1, -1, 142, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, -1, -1, 142,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, 140, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, 140, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, 140, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 140, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, 140, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 140,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, 140, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, 140, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, 140, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 140, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, 140, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 140,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, 140, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, 140, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, 140, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 140, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, 140, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 140,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, 140, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, 140, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, 140, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 140, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, 140, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 140,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138, -1, 140, 120, 121, 122, 123, 124,
125, 126, 127, 128, 129, 130, 131, 132, 133, -1,
-1, -1, -1, 138, -1, 140, 120, 121, 122, 123,
124, 125, 126, 127, 128, 129, 130, 131, 132, 133,
-1, -1, -1, -1, 138, -1, 140, 120, 121, 122,
123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
133, -1, -1, -1, -1, 138, -1, 140, 120, 121,
122, 123, 124, 125, 126, 127, 128, 129, 130, 131,
132, 133, -1, -1, -1, -1, 138, -1, 140, 120,
121, 122, 123, 124, 125, 126, 127, 128, 129, 130,
131, 132, 133, -1, -1, -1, -1, 138, -1, 140,
120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
130, 131, 132, 133, -1, -1, -1, -1, 138, -1,
140, 120, 121, 122, 123, 124, 125, 126, 127, 128,
129, 130, 131, 132, 133, -1, -1, -1, -1, 138,
-1, 140, 120, 121, 122, 123, 124, 125, 126, 127,
128, 129, 130, 131, 132, 133, -1, -1, -1, -1,
138, -1, 140, 120, 121, 122, 123, 124, 125, 126,
127, 128, 129, 130, 131, 132, 133, -1, -1, -1,
-1, 138, -1, 140, 120, 121, 122, 123, 124, 125,
126, 127, 128, 129, 130, 131, 132, 133, -1, -1,
-1, -1, 138
};
/* -*-C-*- Note some compilers choke on comments on `#line' lines. */
#line 3 "/usr/share/bison.simple"
/* This file comes from bison-1.28. */
/* Skeleton output parser for bison,
Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA. */
/* As a special exception, when this file is copied by Bison into a
Bison output file, you may use that output file without restriction.
This special exception was added by the Free Software Foundation
in version 1.24 of Bison. */
/* This is the parser code that is written into each bison parser
when the %semantic_parser declaration is not specified in the grammar.
It was written by Richard Stallman by simplifying the hairy parser
used when %semantic_parser is specified. */
#ifndef YYSTACK_USE_ALLOCA
#ifdef alloca
#define YYSTACK_USE_ALLOCA
#else /* alloca not defined */
#ifdef __GNUC__
#define YYSTACK_USE_ALLOCA
#define alloca __builtin_alloca
#else /* not GNU C. */
#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386))
#define YYSTACK_USE_ALLOCA
#include <alloca.h>
#else /* not sparc */
/* We think this test detects Watcom and Microsoft C. */
/* This used to test MSDOS, but that is a bad idea
since that symbol is in the user namespace. */
#if (defined (_MSDOS) || defined (_MSDOS_)) && !defined (__TURBOC__)
#if 0 /* No need for malloc.h, which pollutes the namespace;
instead, just don't use alloca. */
#include <malloc.h>
#endif
#else /* not MSDOS, or __TURBOC__ */
#if defined(_AIX)
/* I don't know what this was needed for, but it pollutes the namespace.
So I turned it off. rms, 2 May 1997. */
/* #include <malloc.h> */
#pragma alloca
#define YYSTACK_USE_ALLOCA
#else /* not MSDOS, or __TURBOC__, or _AIX */
#if 0
#ifdef __hpux /* haible@ilog.fr says this works for HPUX 9.05 and up,
and on HPUX 10. Eventually we can turn this on. */
#define YYSTACK_USE_ALLOCA
#define alloca __builtin_alloca
#endif /* __hpux */
#endif
#endif /* not _AIX */
#endif /* not MSDOS, or __TURBOC__ */
#endif /* not sparc */
#endif /* not GNU C */
#endif /* alloca not defined */
#endif /* YYSTACK_USE_ALLOCA not defined */
#ifdef YYSTACK_USE_ALLOCA
#define YYSTACK_ALLOC alloca
#else
#define YYSTACK_ALLOC malloc
#endif
/* Note: there must be only one dollar sign in this file.
It is replaced by the list of actions, each action
as one case of the switch. */
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#define YYEMPTY -2
#define YYEOF 0
#define YYACCEPT goto yyacceptlab
#define YYABORT goto yyabortlab
#define YYERROR goto yyerrlab1
/* Like YYERROR except do call yyerror.
This remains here temporarily to ease the
transition to the new meaning of YYERROR, for GCC.
Once GCC version 2 has supplanted version 1, this can go. */
#define YYFAIL goto yyerrlab
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(token, value) \
do \
if (yychar == YYEMPTY && yylen == 1) \
{ yychar = (token), yylval = (value); \
yychar1 = YYTRANSLATE (yychar); \
YYPOPSTACK; \
goto yybackup; \
} \
else \
{ yyerror ("syntax error: cannot back up"); YYERROR; } \
while (0)
#define YYTERROR 1
#define YYERRCODE 256
#ifndef YYPURE
#define YYLEX yylex()
#endif
#ifdef YYPURE
#ifdef YYLSP_NEEDED
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval, &yylloc)
#endif
#else /* not YYLSP_NEEDED */
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval)
#endif
#endif /* not YYLSP_NEEDED */
#endif
/* If nonreentrant, generate the variables here */
#ifndef YYPURE
int yychar; /* the lookahead symbol */
YYSTYPE yylval; /* the semantic value of the */
/* lookahead symbol */
#ifdef YYLSP_NEEDED
YYLTYPE yylloc; /* location data for the lookahead */
/* symbol */
#endif
int yynerrs; /* number of parse errors so far */
#endif /* not YYPURE */
#if YYDEBUG != 0
int yydebug; /* nonzero means print parse trace */
/* Since this is uninitialized, it does not stop multiple parsers
from coexisting. */
#endif
/* YYINITDEPTH indicates the initial size of the parser's stacks */
#ifndef YYINITDEPTH
#define YYINITDEPTH 200
#endif
/* YYMAXDEPTH is the maximum size the stacks can grow to
(effective only if the built-in stack extension method is used). */
#if YYMAXDEPTH == 0
#undef YYMAXDEPTH
#endif
#ifndef YYMAXDEPTH
#define YYMAXDEPTH 10000
#endif
/* Define __yy_memcpy. Note that the size argument
should be passed with type unsigned int, because that is what the non-GCC
definitions require. With GCC, __builtin_memcpy takes an arg
of type size_t, but it can handle unsigned int. */
#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */
#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT)
#else /* not GNU C or C++ */
#ifndef __cplusplus
/* This is the most reliable way to avoid incompatibilities
in available built-in functions on various systems. */
static void
__yy_memcpy (to, from, count)
char *to;
char *from;
unsigned int count;
{
register char *f = from;
register char *t = to;
register int i = count;
while (i-- > 0)
*t++ = *f++;
}
#else /* __cplusplus */
/* This is the most reliable way to avoid incompatibilities
in available built-in functions on various systems. */
static void
__yy_memcpy (char *to, char *from, unsigned int count)
{
register char *t = to;
register char *f = from;
register int i = count;
while (i-- > 0)
*t++ = *f++;
}
#endif
#endif
#line 217 "/usr/share/bison.simple"
/* The user can define YYPARSE_PARAM as the name of an argument to be passed
into yyparse. The argument should have type void *.
It should actually point to an object.
Grammar actions can access the variable by casting it
to the proper pointer type. */
#ifdef YYPARSE_PARAM
#ifdef __cplusplus
#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM
#define YYPARSE_PARAM_DECL
#else /* not __cplusplus */
#define YYPARSE_PARAM_ARG YYPARSE_PARAM
#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM;
#endif /* not __cplusplus */
#else /* not YYPARSE_PARAM */
#define YYPARSE_PARAM_ARG
#define YYPARSE_PARAM_DECL
#endif /* not YYPARSE_PARAM */
/* Prevent warning if -Wstrict-prototypes. */
#ifdef __GNUC__
#ifdef YYPARSE_PARAM
int yyparse (void *);
#else
int yyparse (void);
#endif
#endif
int
yyparse(YYPARSE_PARAM_ARG)
YYPARSE_PARAM_DECL
{
register int yystate;
register int yyn;
register short *yyssp;
register YYSTYPE *yyvsp;
int yyerrstatus; /* number of tokens to shift before error messages enabled */
int yychar1 = 0; /* lookahead token as an internal (translated) token number */
short yyssa[YYINITDEPTH]; /* the state stack */
YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */
short *yyss = yyssa; /* refer to the stacks thru separate pointers */
YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */
#ifdef YYLSP_NEEDED
YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */
YYLTYPE *yyls = yylsa;
YYLTYPE *yylsp;
#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--)
#else
#define YYPOPSTACK (yyvsp--, yyssp--)
#endif
int yystacksize = YYINITDEPTH;
int yyfree_stacks = 0;
#ifdef YYPURE
int yychar;
YYSTYPE yylval;
int yynerrs;
#ifdef YYLSP_NEEDED
YYLTYPE yylloc;
#endif
#endif
YYSTYPE yyval; /* the variable used to return */
/* semantic values from the action */
/* routines */
int yylen;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Starting parse\n");
#endif
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
yychar = YYEMPTY; /* Cause a token to be read. */
/* Initialize stack pointers.
Waste one element of value and location stack
so that they stay on the same level as the state stack.
The wasted elements are never initialized. */
yyssp = yyss - 1;
yyvsp = yyvs;
#ifdef YYLSP_NEEDED
yylsp = yyls;
#endif
/* Push a new state, which is found in yystate . */
/* In all cases, when you get here, the value and location stacks
have just been pushed. so pushing a state here evens the stacks. */
yynewstate:
*++yyssp = yystate;
if (yyssp >= yyss + yystacksize - 1)
{
/* Give user a chance to reallocate the stack */
/* Use copies of these so that the &'s don't force the real ones into memory. */
YYSTYPE *yyvs1 = yyvs;
short *yyss1 = yyss;
#ifdef YYLSP_NEEDED
YYLTYPE *yyls1 = yyls;
#endif
/* Get the current used size of the three stacks, in elements. */
int size = yyssp - yyss + 1;
#ifdef yyoverflow
/* Each stack pointer address is followed by the size of
the data in use in that stack, in bytes. */
#ifdef YYLSP_NEEDED
/* This used to be a conditional around just the two extra args,
but that might be undefined if yyoverflow is a macro. */
yyoverflow("parser stack overflow",
&yyss1, size * sizeof (*yyssp),
&yyvs1, size * sizeof (*yyvsp),
&yyls1, size * sizeof (*yylsp),
&yystacksize);
#else
yyoverflow("parser stack overflow",
&yyss1, size * sizeof (*yyssp),
&yyvs1, size * sizeof (*yyvsp),
&yystacksize);
#endif
yyss = yyss1; yyvs = yyvs1;
#ifdef YYLSP_NEEDED
yyls = yyls1;
#endif
#else /* no yyoverflow */
/* Extend the stack our own way. */
if (yystacksize >= YYMAXDEPTH)
{
yyerror("parser stack overflow");
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 2;
}
yystacksize *= 2;
if (yystacksize > YYMAXDEPTH)
yystacksize = YYMAXDEPTH;
#ifndef YYSTACK_USE_ALLOCA
yyfree_stacks = 1;
#endif
yyss = (short *) YYSTACK_ALLOC (yystacksize * sizeof (*yyssp));
__yy_memcpy ((char *)yyss, (char *)yyss1,
size * (unsigned int) sizeof (*yyssp));
yyvs = (YYSTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yyvsp));
__yy_memcpy ((char *)yyvs, (char *)yyvs1,
size * (unsigned int) sizeof (*yyvsp));
#ifdef YYLSP_NEEDED
yyls = (YYLTYPE *) YYSTACK_ALLOC (yystacksize * sizeof (*yylsp));
__yy_memcpy ((char *)yyls, (char *)yyls1,
size * (unsigned int) sizeof (*yylsp));
#endif
#endif /* no yyoverflow */
yyssp = yyss + size - 1;
yyvsp = yyvs + size - 1;
#ifdef YYLSP_NEEDED
yylsp = yyls + size - 1;
#endif
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Stack size increased to %d\n", yystacksize);
#endif
if (yyssp >= yyss + yystacksize - 1)
YYABORT;
}
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Entering state %d\n", yystate);
#endif
goto yybackup;
yybackup:
/* Do appropriate processing given the current state. */
/* Read a lookahead token if we need one and don't already have one. */
/* yyresume: */
/* First try to decide what to do without reference to lookahead token. */
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yydefault;
/* Not known => get a lookahead token if don't already have one. */
/* yychar is either YYEMPTY or YYEOF
or a valid token in external form. */
if (yychar == YYEMPTY)
{
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Reading a token: ");
#endif
yychar = YYLEX;
}
/* Convert token to internal form (in yychar1) for indexing tables with */
if (yychar <= 0) /* This means end of input. */
{
yychar1 = 0;
yychar = YYEOF; /* Don't call YYLEX any more */
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Now at end of input.\n");
#endif
}
else
{
yychar1 = YYTRANSLATE(yychar);
#if YYDEBUG != 0
if (yydebug)
{
fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]);
/* Give the individual parser a way to print the precise meaning
of a token, for further debugging info. */
#ifdef YYPRINT
YYPRINT (stderr, yychar, yylval);
#endif
fprintf (stderr, ")\n");
}
#endif
}
yyn += yychar1;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1)
goto yydefault;
yyn = yytable[yyn];
/* yyn is what to do for this token type in this state.
Negative => reduce, -yyn is rule number.
Positive => shift, yyn is new state.
New state is final state => don't bother to shift,
just return success.
0, or most negative number => error. */
if (yyn < 0)
{
if (yyn == YYFLAG)
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
}
else if (yyn == 0)
goto yyerrlab;
if (yyn == YYFINAL)
YYACCEPT;
/* Shift the lookahead token. */
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]);
#endif
/* Discard the token being shifted unless it is eof. */
if (yychar != YYEOF)
yychar = YYEMPTY;
*++yyvsp = yylval;
#ifdef YYLSP_NEEDED
*++yylsp = yylloc;
#endif
/* count tokens shifted since error; after three, turn off error status. */
if (yyerrstatus) yyerrstatus--;
yystate = yyn;
goto yynewstate;
/* Do the default action for the current state. */
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
/* Do a reduction. yyn is the number of a rule to reduce with. */
yyreduce:
yylen = yyr2[yyn];
if (yylen > 0)
yyval = yyvsp[1-yylen]; /* implement default value of the action */
#if YYDEBUG != 0
if (yydebug)
{
int i;
fprintf (stderr, "Reducing via rule %d (line %d), ",
yyn, yyrline[yyn]);
/* Print the symbols being reduced, and their result. */
for (i = yyprhs[yyn]; yyrhs[i] > 0; i++)
fprintf (stderr, "%s ", yytname[yyrhs[i]]);
fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]);
}
#endif
switch (yyn) {
case 2:
#line 146 "Gmsh.y"
{ yyerrok; return 1; ;
break;}
case 5:
#line 157 "Gmsh.y"
{ return 1; ;
break;}
case 6:
#line 158 "Gmsh.y"
{ return 1; ;
break;}
case 7:
#line 159 "Gmsh.y"
{ return 1; ;
break;}
case 8:
#line 160 "Gmsh.y"
{ return 1; ;
break;}
case 9:
#line 161 "Gmsh.y"
{ List_Delete(yyvsp[0].l); return 1; ;
break;}
case 10:
#line 162 "Gmsh.y"
{ return 1; ;
break;}
case 11:
#line 163 "Gmsh.y"
{ return 1; ;
break;}
case 12:
#line 164 "Gmsh.y"
{ return 1; ;
break;}
case 13:
#line 165 "Gmsh.y"
{ List_Delete(yyvsp[0].l); return 1; ;
break;}
case 14:
#line 166 "Gmsh.y"
{ return 1; ;
break;}
case 15:
#line 167 "Gmsh.y"
{ return 1; ;
break;}
case 16:
#line 168 "Gmsh.y"
{ return 1; ;
break;}
case 17:
#line 169 "Gmsh.y"
{ return 1; ;
break;}
case 18:
#line 170 "Gmsh.y"
{ return 1; ;
break;}
case 19:
#line 175 "Gmsh.y"
{
yyval.c = "w";
;
break;}
case 20:
#line 179 "Gmsh.y"
{
yyval.c = "a";
;
break;}
case 21:
#line 186 "Gmsh.y"
{
Msg(DIRECT, yyvsp[-2].c);
Free(yyvsp[-2].c);
;
break;}
case 22:
#line 191 "Gmsh.y"
{
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
FILE *fp = fopen(tmpstring, yyvsp[-2].c);
if(!fp){
yymsg(GERROR, "Unable to open file '%s'", tmpstring);
}
else{
fprintf(fp, "%s\n", yyvsp[-4].c);
fclose(fp);
}
Free(yyvsp[-4].c);
Free(yyvsp[-1].c);
;
break;}
case 23:
#line 206 "Gmsh.y"
{
char tmpstring[1024];
int i = PrintListOfDouble(yyvsp[-4].c, yyvsp[-2].l, tmpstring);
if(i < 0)
yymsg(GERROR, "Too few arguments in Printf");
else if(i > 0)
yymsg(GERROR, "%d extra argument%s in Printf", i, (i>1)?"s":"");
else
Msg(DIRECT, tmpstring);
Free(yyvsp[-4].c);
List_Delete(yyvsp[-2].l);
;
break;}
case 24:
#line 219 "Gmsh.y"
{
char tmpstring[1024];
int i = PrintListOfDouble(yyvsp[-6].c, yyvsp[-4].l, tmpstring);
if(i < 0)
yymsg(GERROR, "Too few arguments in Printf");
else if(i > 0)
yymsg(GERROR, "%d extra argument%s in Printf", i, (i>1)?"s":"");
else{
char tmpstring2[1024];
FixRelativePath(yyvsp[-1].c, tmpstring2);
FILE *fp = fopen(tmpstring2, yyvsp[-2].c);
if(!fp){
yymsg(GERROR, "Unable to open file '%s'", tmpstring2);
}
else{
fprintf(fp, "%s\n", tmpstring);
fclose(fp);
}
}
Free(yyvsp[-6].c);
Free(yyvsp[-1].c);
List_Delete(yyvsp[-4].l);
;
break;}
case 25:
#line 248 "Gmsh.y"
{
if(!strcmp(yyvsp[-5].c, "View") && !CheckViewErrorFlags(View)){
EndView(View, 0, yyname, yyvsp[-4].c);
}
Free(yyvsp[-5].c); Free(yyvsp[-4].c);
;
break;}
case 26:
#line 255 "Gmsh.y"
{
if(!strcmp(yyvsp[-7].c, "View") && !CheckViewErrorFlags(View)){
EndView(View, 0, yyname, yyvsp[-6].c);
}
Free(yyvsp[-7].c); Free(yyvsp[-6].c); Free(yyvsp[-5].c);
;
break;}
case 27:
#line 262 "Gmsh.y"
{
if(!strcmp(yyvsp[-4].c, "View")) AliasView((int)yyvsp[-2].d, 0);
Free(yyvsp[-4].c);
;
break;}
case 28:
#line 267 "Gmsh.y"
{
if(!strcmp(yyvsp[-4].c, "View")) AliasView((int)yyvsp[-2].d, 1);
Free(yyvsp[-4].c);
;
break;}
case 29:
#line 275 "Gmsh.y"
{
View = BeginView(1);
for(int i = 0; i < VIEW_NB_ELEMENT_TYPES; i++){
ViewErrorFlags[i] = 0;
}
;
break;}
case 36:
#line 291 "Gmsh.y"
{ ViewCoord[ViewCoordIdx] = yyvsp[0].d; ViewCoordIdx++; ;
break;}
case 37:
#line 293 "Gmsh.y"
{ ViewCoord[ViewCoordIdx] = yyvsp[0].d; ViewCoordIdx++; ;
break;}
case 38:
#line 298 "Gmsh.y"
{ if(ViewValueList) List_Add(ViewValueList, &yyvsp[0].d); ;
break;}
case 39:
#line 300 "Gmsh.y"
{ if(ViewValueList) List_Add(ViewValueList, &yyvsp[0].d); ;
break;}
case 40:
#line 305 "Gmsh.y"
{
if(!strcmp(yyvsp[0].c, "SP")){
ViewElementIdx = 0; ViewNumNodes = 1; ViewNumComp = 1;
ViewValueList = View->SP; ViewNumList = &View->NbSP;
}
else if(!strcmp(yyvsp[0].c, "VP")){
ViewElementIdx = 1; ViewNumNodes = 1; ViewNumComp = 3;
ViewValueList = View->VP; ViewNumList = &View->NbVP;
}
else if(!strcmp(yyvsp[0].c, "TP")){
ViewElementIdx = 2; ViewNumNodes = 1; ViewNumComp = 9;
ViewValueList = View->TP; ViewNumList = &View->NbTP;
}
else if(!strcmp(yyvsp[0].c, "SL")){
ViewElementIdx = 3; ViewNumNodes = 2; ViewNumComp = 1;
ViewValueList = View->SL; ViewNumList = &View->NbSL;
}
else if(!strcmp(yyvsp[0].c, "VL")){
ViewElementIdx = 4; ViewNumNodes = 2; ViewNumComp = 3;
ViewValueList = View->VL; ViewNumList = &View->NbVL;
}
else if(!strcmp(yyvsp[0].c, "TL")){
ViewElementIdx = 5; ViewNumNodes = 2; ViewNumComp = 9;
ViewValueList = View->TL; ViewNumList = &View->NbTL;
}
else if(!strcmp(yyvsp[0].c, "ST")){
ViewElementIdx = 6; ViewNumNodes = 3; ViewNumComp = 1;
ViewValueList = View->ST; ViewNumList = &View->NbST;
}
else if(!strcmp(yyvsp[0].c, "VT")){
ViewElementIdx = 7; ViewNumNodes = 3; ViewNumComp = 3;
ViewValueList = View->VT; ViewNumList = &View->NbVT;
}
else if(!strcmp(yyvsp[0].c, "TT")){
ViewElementIdx = 8; ViewNumNodes = 3; ViewNumComp = 9;
ViewValueList = View->TT; ViewNumList = &View->NbTT;
}
else if(!strcmp(yyvsp[0].c, "SQ")){
ViewElementIdx = 9; ViewNumNodes = 4; ViewNumComp = 1;
ViewValueList = View->SQ; ViewNumList = &View->NbSQ;
}
else if(!strcmp(yyvsp[0].c, "VQ")){
ViewElementIdx = 10; ViewNumNodes = 4; ViewNumComp = 3;
ViewValueList = View->VQ; ViewNumList = &View->NbVQ;
}
else if(!strcmp(yyvsp[0].c, "TQ")){
ViewElementIdx = 11; ViewNumNodes = 4; ViewNumComp = 9;
ViewValueList = View->TQ; ViewNumList = &View->NbTQ;
}
else if(!strcmp(yyvsp[0].c, "SS")){
ViewElementIdx = 12; ViewNumNodes = 4; ViewNumComp = 1;
ViewValueList = View->SS; ViewNumList = &View->NbSS;
}
else if(!strcmp(yyvsp[0].c, "VS")){
ViewElementIdx = 13; ViewNumNodes = 4; ViewNumComp = 3;
ViewValueList = View->VS; ViewNumList = &View->NbVS;
}
else if(!strcmp(yyvsp[0].c, "TS")){
ViewElementIdx = 14; ViewNumNodes = 4; ViewNumComp = 9;
ViewValueList = View->TS; ViewNumList = &View->NbTS;
}
else if(!strcmp(yyvsp[0].c, "SH")){
ViewElementIdx = 15; ViewNumNodes = 8; ViewNumComp = 1;
ViewValueList = View->SH; ViewNumList = &View->NbSH;
}
else if(!strcmp(yyvsp[0].c, "VH")){
ViewElementIdx = 16; ViewNumNodes = 8; ViewNumComp = 3;
ViewValueList = View->VH; ViewNumList = &View->NbVH;
}
else if(!strcmp(yyvsp[0].c, "TH")){
ViewElementIdx = 17; ViewNumNodes = 8; ViewNumComp = 9;
ViewValueList = View->TH; ViewNumList = &View->NbTH;
}
else if(!strcmp(yyvsp[0].c, "SI")){
ViewElementIdx = 18; ViewNumNodes = 6; ViewNumComp = 1;
ViewValueList = View->SI; ViewNumList = &View->NbSI;
}
else if(!strcmp(yyvsp[0].c, "VI")){
ViewElementIdx = 19; ViewNumNodes = 6; ViewNumComp = 3;
ViewValueList = View->VI; ViewNumList = &View->NbVI;
}
else if(!strcmp(yyvsp[0].c, "TI")){
ViewElementIdx = 20; ViewNumNodes = 6; ViewNumComp = 9;
ViewValueList = View->TI; ViewNumList = &View->NbTI;
}
else if(!strcmp(yyvsp[0].c, "SY")){
ViewElementIdx = 21; ViewNumNodes = 5; ViewNumComp = 1;
ViewValueList = View->SY; ViewNumList = &View->NbSY;
}
else if(!strcmp(yyvsp[0].c, "VY")){
ViewElementIdx = 22; ViewNumNodes = 5; ViewNumComp = 3;
ViewValueList = View->VY; ViewNumList = &View->NbVY;
}
else if(!strcmp(yyvsp[0].c, "TY")){
ViewElementIdx = 23; ViewNumNodes = 5; ViewNumComp = 9;
ViewValueList = View->TY; ViewNumList = &View->NbTY;
}
else if(!strcmp(yyvsp[0].c, "SL2")){
ViewElementIdx = 3; ViewNumNodes = 3; ViewNumComp = 1;
ViewValueList = View->SL2; ViewNumList = &View->NbSL2;
}
else if(!strcmp(yyvsp[0].c, "VL2")){
ViewElementIdx = 4; ViewNumNodes = 3; ViewNumComp = 3;
ViewValueList = View->VL2; ViewNumList = &View->NbVL2;
}
else if(!strcmp(yyvsp[0].c, "TL2")){
ViewElementIdx = 5; ViewNumNodes = 3; ViewNumComp = 9;
ViewValueList = View->TL2; ViewNumList = &View->NbTL2;
}
else if(!strcmp(yyvsp[0].c, "ST2")){
ViewElementIdx = 6; ViewNumNodes = 6; ViewNumComp = 1;
ViewValueList = View->ST2; ViewNumList = &View->NbST2;
}
else if(!strcmp(yyvsp[0].c, "VT2")){
ViewElementIdx = 7; ViewNumNodes = 6; ViewNumComp = 3;
ViewValueList = View->VT2; ViewNumList = &View->NbVT2;
}
else if(!strcmp(yyvsp[0].c, "TT2")){
ViewElementIdx = 8; ViewNumNodes = 6; ViewNumComp = 9;
ViewValueList = View->TT2; ViewNumList = &View->NbTT2;
}
else if(!strcmp(yyvsp[0].c, "SQ2")){
ViewElementIdx = 9; ViewNumNodes = 9; ViewNumComp = 1;
ViewValueList = View->SQ2; ViewNumList = &View->NbSQ2;
}
else if(!strcmp(yyvsp[0].c, "VQ2")){
ViewElementIdx = 10; ViewNumNodes = 9; ViewNumComp = 3;
ViewValueList = View->VQ2; ViewNumList = &View->NbVQ2;
}
else if(!strcmp(yyvsp[0].c, "TQ2")){
ViewElementIdx = 11; ViewNumNodes = 9; ViewNumComp = 9;
ViewValueList = View->TQ2; ViewNumList = &View->NbTQ2;
}
else if(!strcmp(yyvsp[0].c, "SS2")){
ViewElementIdx = 12; ViewNumNodes = 10; ViewNumComp = 1;
ViewValueList = View->SS2; ViewNumList = &View->NbSS2;
}
else if(!strcmp(yyvsp[0].c, "VS2")){
ViewElementIdx = 13; ViewNumNodes = 10; ViewNumComp = 3;
ViewValueList = View->VS2; ViewNumList = &View->NbVS2;
}
else if(!strcmp(yyvsp[0].c, "TS2")){
ViewElementIdx = 14; ViewNumNodes = 10; ViewNumComp = 9;
ViewValueList = View->TS2; ViewNumList = &View->NbTS2;
}
else if(!strcmp(yyvsp[0].c, "SH2")){
ViewElementIdx = 15; ViewNumNodes = 27; ViewNumComp = 1;
ViewValueList = View->SH2; ViewNumList = &View->NbSH2;
}
else if(!strcmp(yyvsp[0].c, "VH2")){
ViewElementIdx = 16; ViewNumNodes = 27; ViewNumComp = 3;
ViewValueList = View->VH2; ViewNumList = &View->NbVH2;
}
else if(!strcmp(yyvsp[0].c, "TH2")){
ViewElementIdx = 17; ViewNumNodes = 27; ViewNumComp = 9;
ViewValueList = View->TH2; ViewNumList = &View->NbTH2;
}
else if(!strcmp(yyvsp[0].c, "SI2")){
ViewElementIdx = 18; ViewNumNodes = 18; ViewNumComp = 1;
ViewValueList = View->SI2; ViewNumList = &View->NbSI2;
}
else if(!strcmp(yyvsp[0].c, "VI2")){
ViewElementIdx = 19; ViewNumNodes = 18; ViewNumComp = 3;
ViewValueList = View->VI2; ViewNumList = &View->NbVI2;
}
else if(!strcmp(yyvsp[0].c, "TI2")){
ViewElementIdx = 20; ViewNumNodes = 18; ViewNumComp = 9;
ViewValueList = View->TI2; ViewNumList = &View->NbTI2;
}
else if(!strcmp(yyvsp[0].c, "SY2")){
ViewElementIdx = 21; ViewNumNodes = 14; ViewNumComp = 1;
ViewValueList = View->SY2; ViewNumList = &View->NbSY2;
}
else if(!strcmp(yyvsp[0].c, "VY2")){
ViewElementIdx = 22; ViewNumNodes = 14; ViewNumComp = 3;
ViewValueList = View->VY2; ViewNumList = &View->NbVY2;
}
else if(!strcmp(yyvsp[0].c, "TY2")){
ViewElementIdx = 23; ViewNumNodes = 14; ViewNumComp = 9;
ViewValueList = View->TY2; ViewNumList = &View->NbTY2;
}
else{
yymsg(GERROR, "Unknown element type '%s'", yyvsp[0].c);
ViewElementIdx = -1; ViewNumNodes = 0; ViewNumComp = 0;
ViewValueList = NULL; ViewNumList = NULL;
}
Free(yyvsp[0].c);
ViewCoordIdx = 0;
;
break;}
case 41:
#line 495 "Gmsh.y"
{
if(ViewValueList){
if(ViewCoordIdx != 3 * ViewNumNodes){
// yymsg(GERROR, "Wrong number of node coordinates (%d != %d)",
// ViewCoordIdx, 3 * ViewNumNodes);
ViewNumNodes = ViewCoordIdx/3;
}
for(int i = 0; i < 3; i++)
for(int j = 0; j < ViewNumNodes; j++)
List_Add(ViewValueList, &ViewCoord[3*j+i]);
ViewNumListTmp = List_Nbr(ViewValueList);
}
;
break;}
case 42:
#line 509 "Gmsh.y"
{
if(ViewValueList){
if((List_Nbr(ViewValueList) - ViewNumListTmp) % (ViewNumComp * ViewCoordIdx/3))
ViewErrorFlags[ViewElementIdx]++;
(*ViewNumList)++;
}
;
break;}
case 43:
#line 520 "Gmsh.y"
{
for(int i = 0; i < (int)strlen(yyvsp[0].c)+1; i++) List_Add(View->T2C, &yyvsp[0].c[i]);
Free(yyvsp[0].c);
;
break;}
case 44:
#line 525 "Gmsh.y"
{
for(int i = 0; i < (int)strlen(yyvsp[0].c)+1; i++) List_Add(View->T2C, &yyvsp[0].c[i]);
Free(yyvsp[0].c);
;
break;}
case 45:
#line 533 "Gmsh.y"
{
List_Add(View->T2D, &yyvsp[-5].d); List_Add(View->T2D, &yyvsp[-3].d);
List_Add(View->T2D, &yyvsp[-1].d);
double d = List_Nbr(View->T2C);
List_Add(View->T2D, &d);
;
break;}
case 46:
#line 540 "Gmsh.y"
{
View->NbT2++;
;
break;}
case 47:
#line 547 "Gmsh.y"
{
for(int i = 0; i < (int)strlen(yyvsp[0].c)+1; i++) List_Add(View->T3C, &yyvsp[0].c[i]);
Free(yyvsp[0].c);
;
break;}
case 48:
#line 552 "Gmsh.y"
{
for(int i = 0; i < (int)strlen(yyvsp[0].c)+1; i++) List_Add(View->T3C, &yyvsp[0].c[i]);
Free(yyvsp[0].c);
;
break;}
case 49:
#line 560 "Gmsh.y"
{
List_Add(View->T3D, &yyvsp[-7].d); List_Add(View->T3D, &yyvsp[-5].d);
List_Add(View->T3D, &yyvsp[-3].d); List_Add(View->T3D, &yyvsp[-1].d);
double d = List_Nbr(View->T3C);
List_Add(View->T3D, &d);
;
break;}
case 50:
#line 567 "Gmsh.y"
{
View->NbT3++;
;
break;}
case 51:
#line 575 "Gmsh.y"
{
View->adaptive = new Adaptive_Post_View(View, yyvsp[-5].l, yyvsp[-2].l);
;
break;}
case 52:
#line 583 "Gmsh.y"
{
View->adaptive = new Adaptive_Post_View(View, yyvsp[-11].l, yyvsp[-8].l, yyvsp[-5].l, yyvsp[-2].l);
;
break;}
case 53:
#line 590 "Gmsh.y"
{
ViewValueList = View->Time;
;
break;}
case 54:
#line 594 "Gmsh.y"
{
;
break;}
case 55:
#line 599 "Gmsh.y"
{
(*View->Grains) [(int)yyvsp[-3].d] = yyvsp[-1].l;
;
break;}
case 56:
#line 607 "Gmsh.y"
{ yyval.i = 0; ;
break;}
case 57:
#line 608 "Gmsh.y"
{ yyval.i = 1; ;
break;}
case 58:
#line 609 "Gmsh.y"
{ yyval.i = 2; ;
break;}
case 59:
#line 610 "Gmsh.y"
{ yyval.i = 3; ;
break;}
case 60:
#line 611 "Gmsh.y"
{ yyval.i = 4; ;
break;}
case 61:
#line 615 "Gmsh.y"
{ yyval.i = 1; ;
break;}
case 62:
#line 616 "Gmsh.y"
{ yyval.i = -1; ;
break;}
case 63:
#line 624 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-3].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
if(!yyvsp[-2].i){
TheSymbol.val = List_Create(1, 1, sizeof(double));
List_Put(TheSymbol.val, 0, &yyvsp[-1].d);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-3].c);
Free(yyvsp[-3].c);
}
}
else{
double *pd = (double*)List_Pointer_Fast(pSymbol->val, 0);
switch(yyvsp[-2].i){
case 0 : *pd = yyvsp[-1].d; break;
case 1 : *pd += yyvsp[-1].d; break;
case 2 : *pd -= yyvsp[-1].d; break;
case 3 : *pd *= yyvsp[-1].d; break;
case 4 :
if(yyvsp[-1].d) *pd /= yyvsp[-1].d;
else yymsg(GERROR, "Division by zero in '%s /= %g'", yyvsp[-3].c, yyvsp[-1].d);
break;
}
Free(yyvsp[-3].c);
}
;
break;}
case 64:
#line 655 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-6].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
if(!yyvsp[-2].i){
TheSymbol.val = List_Create(5, 5, sizeof(double));
List_Put(TheSymbol.val, (int)yyvsp[-4].d, &yyvsp[-1].d);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-6].c);
Free(yyvsp[-6].c);
}
}
else{
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-4].d))){
switch(yyvsp[-2].i){
case 0 : *pd = yyvsp[-1].d; break;
case 1 : *pd += yyvsp[-1].d; break;
case 2 : *pd -= yyvsp[-1].d; break;
case 3 : *pd *= yyvsp[-1].d; break;
case 4 :
if(yyvsp[-1].d) *pd /= yyvsp[-1].d;
else yymsg(GERROR, "Division by zero in '%s[%d] /= %g'", yyvsp[-6].c, (int)yyvsp[-4].d, yyvsp[-1].d);
break;
}
}
else{
if(!yyvsp[-2].i)
List_Put(pSymbol->val, (int)yyvsp[-4].d, &yyvsp[-1].d);
else
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-6].c, (int)yyvsp[-4].d);
}
Free(yyvsp[-6].c);
}
;
break;}
case 65:
#line 694 "Gmsh.y"
{
if(List_Nbr(yyvsp[-5].l) != List_Nbr(yyvsp[-1].l)){
yymsg(GERROR, "Incompatible array dimensions in affectation");
Free(yyvsp[-8].c);
}
else{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-8].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
if(!yyvsp[-2].i){
TheSymbol.val = List_Create(5, 5, sizeof(double));
for(int i = 0; i < List_Nbr(yyvsp[-5].l); i++){
List_Put(TheSymbol.val, (int)(*(double*)List_Pointer(yyvsp[-5].l, i)),
(double*)List_Pointer(yyvsp[-1].l, i));
}
Tree_Add(Symbol_T, &TheSymbol);
}
else{
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-8].c);
Free(yyvsp[-8].c);
}
}
else{
for(int i = 0; i < List_Nbr(yyvsp[-5].l); i++){
int j = (int)(*(double*)List_Pointer(yyvsp[-5].l, i));
double d = *(double*)List_Pointer(yyvsp[-1].l, i);
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, j))){
switch(yyvsp[-2].i){
case 0 : *pd = d; break;
case 1 : *pd += d; break;
case 2 : *pd -= d; break;
case 3 : *pd *= d; break;
case 4 :
if(yyvsp[-1].l) *pd /= d;
else yymsg(GERROR, "Division by zero in '%s[%d] /= %g'", yyvsp[-8].c, j, d);
break;
}
}
else{
if(!yyvsp[-2].i)
List_Put(pSymbol->val, j, &d);
else
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-8].c, j);
}
}
Free(yyvsp[-8].c);
}
}
List_Delete(yyvsp[-5].l);
List_Delete(yyvsp[-1].l);
;
break;}
case 66:
#line 748 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-5].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
TheSymbol.val = List_Create(5, 5, sizeof(double));
List_Copy(yyvsp[-1].l, TheSymbol.val);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
List_Reset(pSymbol->val);
List_Copy(yyvsp[-1].l, pSymbol->val);
Free(yyvsp[-5].c);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 67:
#line 765 "Gmsh.y"
{
// appends to the list
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-5].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
TheSymbol.val = List_Create(5, 5, sizeof(double));
List_Copy(yyvsp[-1].l, TheSymbol.val);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++)
List_Add(pSymbol->val, List_Pointer(yyvsp[-1].l, i));
Free(yyvsp[-5].c);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 68:
#line 783 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-2].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol)))
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-2].c);
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) += yyvsp[-1].i;
Free(yyvsp[-2].c);
;
break;}
case 69:
#line 794 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-5].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol)))
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-5].c);
else{
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-3].d)))
*pd += yyvsp[-1].i;
else
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-5].c, (int)yyvsp[-3].d);
}
Free(yyvsp[-5].c);
;
break;}
case 70:
#line 811 "Gmsh.y"
{
Msg(WARNING, "Named string expressions not implemented yet");
;
break;}
case 71:
#line 818 "Gmsh.y"
{
char* (*pStrOpt)(int num, int action, char *value);
StringXString *pStrCat;
if(!(pStrCat = Get_StringOptionCategory(yyvsp[-5].c)))
yymsg(GERROR, "Unknown string option class '%s'", yyvsp[-5].c);
else{
if(!(pStrOpt = (char *(*) (int, int, char *))Get_StringOption(yyvsp[-3].c, pStrCat)))
yymsg(GERROR, "Unknown string option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else
pStrOpt(0, GMSH_SET|GMSH_GUI, yyvsp[-1].c);
}
Free(yyvsp[-5].c); Free(yyvsp[-3].c); //FIXME: somtimes leak $5
;
break;}
case 72:
#line 832 "Gmsh.y"
{
char* (*pStrOpt)(int num, int action, char *value);
StringXString *pStrCat;
if(!(pStrCat = Get_StringOptionCategory(yyvsp[-8].c)))
yymsg(GERROR, "Unknown string option class '%s'", yyvsp[-8].c);
else{
if(!(pStrOpt = (char *(*) (int, int, char *))Get_StringOption(yyvsp[-3].c, pStrCat)))
yymsg(GERROR, "Unknown string option '%s[%d].%s'", yyvsp[-8].c, (int)yyvsp[-6].d, yyvsp[-3].c);
else
pStrOpt((int)yyvsp[-6].d, GMSH_SET|GMSH_GUI, yyvsp[-1].c);
}
Free(yyvsp[-8].c); Free(yyvsp[-3].c); //FIXME: somtimes leak $8
;
break;}
case 73:
#line 849 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-5].c)))
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-5].c);
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-3].c, pNumCat)))
yymsg(GERROR, "Unknown numeric option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else{
double d = 0;
switch(yyvsp[-2].i){
case 0 : d = yyvsp[-1].d; break;
case 1 : d = pNumOpt(0, GMSH_GET, 0) + yyvsp[-1].d; break;
case 2 : d = pNumOpt(0, GMSH_GET, 0) - yyvsp[-1].d; break;
case 3 : d = pNumOpt(0, GMSH_GET, 0) * yyvsp[-1].d; break;
case 4 :
if(yyvsp[-1].d) d = pNumOpt(0, GMSH_GET, 0) / yyvsp[-1].d;
else yymsg(GERROR, "Division by zero in '%s.%s /= %g'", yyvsp[-5].c, yyvsp[-3].c, yyvsp[-1].d);
break;
}
pNumOpt(0, GMSH_SET|GMSH_GUI, d);
}
}
Free(yyvsp[-5].c); Free(yyvsp[-3].c);
;
break;}
case 74:
#line 875 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-8].c)))
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-8].c);
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-3].c, pNumCat)))
yymsg(GERROR, "Unknown numeric option '%s[%d].%s'", yyvsp[-8].c, (int)yyvsp[-6].d, yyvsp[-3].c);
else{
double d = 0;
switch(yyvsp[-2].i){
case 0 : d = yyvsp[-1].d; break;
case 1 : d = pNumOpt((int)yyvsp[-6].d, GMSH_GET, 0) + yyvsp[-1].d; break;
case 2 : d = pNumOpt((int)yyvsp[-6].d, GMSH_GET, 0) - yyvsp[-1].d; break;
case 3 : d = pNumOpt((int)yyvsp[-6].d, GMSH_GET, 0) * yyvsp[-1].d; break;
case 4 :
if(yyvsp[-1].d) d = pNumOpt((int)yyvsp[-6].d, GMSH_GET, 0) / yyvsp[-1].d;
else yymsg(GERROR, "Division by zero in '%s[%d].%s /= %g'",
yyvsp[-8].c, (int)yyvsp[-6].d, yyvsp[-3].c, yyvsp[-1].d);
break;
}
pNumOpt((int)yyvsp[-6].d, GMSH_SET|GMSH_GUI, d);
}
}
Free(yyvsp[-8].c); Free(yyvsp[-3].c);
;
break;}
case 75:
#line 902 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-4].c)))
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-4].c);
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-2].c, pNumCat)))
yymsg(GERROR, "Unknown numeric option '%s.%s'", yyvsp[-4].c, yyvsp[-2].c);
else
pNumOpt(0, GMSH_SET|GMSH_GUI, pNumOpt(0, GMSH_GET, 0)+yyvsp[-1].i);
}
Free(yyvsp[-4].c); Free(yyvsp[-2].c);
;
break;}
case 76:
#line 916 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-7].c)))
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-7].c);
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-2].c, pNumCat)))
yymsg(GERROR, "Unknown numeric option '%s[%d].%s'", yyvsp[-7].c, (int)yyvsp[-5].d, yyvsp[-2].c);
else
pNumOpt((int)yyvsp[-5].d, GMSH_SET|GMSH_GUI, pNumOpt((int)yyvsp[-5].d, GMSH_GET, 0)+yyvsp[-1].i);
}
Free(yyvsp[-7].c); Free(yyvsp[-2].c);
;
break;}
case 77:
#line 933 "Gmsh.y"
{
unsigned int (*pColOpt)(int num, int action, unsigned int value);
StringXColor *pColCat;
if(!(pColCat = Get_ColorOptionCategory(yyvsp[-7].c)))
yymsg(GERROR, "Unknown color option class '%s'", yyvsp[-7].c);
else{
if(!(pColOpt = (unsigned int (*) (int, int, unsigned int))Get_ColorOption(yyvsp[-3].c, pColCat)))
yymsg(GERROR, "Unknown color option '%s.Color.%s'", yyvsp[-7].c, yyvsp[-3].c);
else
pColOpt(0, GMSH_SET|GMSH_GUI, yyvsp[-1].u);
}
Free(yyvsp[-7].c); Free(yyvsp[-3].c);
;
break;}
case 78:
#line 947 "Gmsh.y"
{
unsigned int (*pColOpt)(int num, int action, unsigned int value);
StringXColor *pColCat;
if(!(pColCat = Get_ColorOptionCategory(yyvsp[-10].c)))
yymsg(GERROR, "Unknown color option class '%s'", yyvsp[-10].c);
else{
if(!(pColOpt = (unsigned int (*) (int, int, unsigned int))Get_ColorOption(yyvsp[-3].c, pColCat)))
yymsg(GERROR, "Unknown color option '%s[%d].Color.%s'", yyvsp[-10].c, (int)yyvsp[-8].d, yyvsp[-3].c);
else
pColOpt((int)yyvsp[-8].d, GMSH_SET|GMSH_GUI, yyvsp[-1].u);
}
Free(yyvsp[-10].c); Free(yyvsp[-3].c);
;
break;}
case 79:
#line 964 "Gmsh.y"
{
GmshColorTable *ct = Get_ColorTable(0);
if(!ct)
yymsg(GERROR, "View[%d] does not exist", 0);
else{
ct->size = List_Nbr(yyvsp[-1].l);
if(ct->size > COLORTABLE_NBMAX_COLOR)
yymsg(GERROR, "Too many (%d>%d) colors in View[%d].ColorTable",
ct->size, COLORTABLE_NBMAX_COLOR, 0);
else
for(int i = 0; i < ct->size; i++) List_Read(yyvsp[-1].l, i, &ct->table[i]);
if(ct->size == 1){
ct->size = 2;
ct->table[1] = ct->table[0];
}
}
Free(yyvsp[-5].c);
List_Delete(yyvsp[-1].l);
;
break;}
case 80:
#line 984 "Gmsh.y"
{
GmshColorTable *ct = Get_ColorTable((int)yyvsp[-6].d);
if(!ct)
yymsg(GERROR, "View[%d] does not exist", (int)yyvsp[-6].d);
else{
ct->size = List_Nbr(yyvsp[-1].l);
if(ct->size > COLORTABLE_NBMAX_COLOR)
yymsg(GERROR, "Too many (%d>%d) colors in View[%d].ColorTable",
ct->size, COLORTABLE_NBMAX_COLOR, (int)yyvsp[-6].d);
else
for(int i = 0; i < ct->size; i++) List_Read(yyvsp[-1].l, i, &ct->table[i]);
if(ct->size == 1){
ct->size = 2;
ct->table[1] = ct->table[0];
}
}
Free(yyvsp[-8].c);
List_Delete(yyvsp[-1].l);
;
break;}
case 81:
#line 1007 "Gmsh.y"
{
try {
GMSH_PluginManager::instance()->setPluginOption(yyvsp[-6].c, yyvsp[-3].c, yyvsp[-1].d);
}
catch (...) {
yymsg(GERROR, "Unknown option '%s' or plugin '%s'", yyvsp[-3].c, yyvsp[-6].c);
}
Free(yyvsp[-6].c); Free(yyvsp[-3].c);
;
break;}
case 82:
#line 1017 "Gmsh.y"
{
try {
GMSH_PluginManager::instance()->setPluginOption(yyvsp[-6].c, yyvsp[-3].c, yyvsp[-1].c);
}
catch (...) {
yymsg(GERROR, "Unknown option '%s' or plugin '%s'", yyvsp[-3].c, yyvsp[-6].c);
}
Free(yyvsp[-6].c); Free(yyvsp[-3].c); // FIXME: sometimes leak $8
;
break;}
case 83:
#line 1032 "Gmsh.y"
{
yyval.i = (int)yyvsp[0].d;
;
break;}
case 84:
#line 1036 "Gmsh.y"
{
yyval.i = GModel::current()->setPhysicalName(std::string(yyvsp[0].c),
++THEM->MaxPhysicalNum);
Free(yyvsp[0].c);
;
break;}
case 85:
#line 1049 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindPoint(num)){
yymsg(GERROR, "Point %d already exists", num);
}
else{
double x = CTX.geom.scaling_factor * yyvsp[-1].v[0];
double y = CTX.geom.scaling_factor * yyvsp[-1].v[1];
double z = CTX.geom.scaling_factor * yyvsp[-1].v[2];
double lc = CTX.geom.scaling_factor * yyvsp[-1].v[3];
Vertex *v;
if(!myGmshSurface)
v = Create_Vertex(num, x, y, z, lc, 1.0);
else
v = Create_Vertex(num, x, y, myGmshSurface, lc);
Tree_Add(THEM->Points, &v);
AddToTemporaryBoundingBox(v->Pos.X, v->Pos.Y, v->Pos.Z);
}
yyval.s.Type = MSH_POINT;
yyval.s.Num = num;
;
break;}
case 86:
#line 1071 "Gmsh.y"
{
int num = (int)yyvsp[-4].i;
if(FindPhysicalGroup(num, MSH_PHYSICAL_POINT)){
yymsg(GERROR, "Physical point %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
PhysicalGroup *p = Create_PhysicalGroup(num, MSH_PHYSICAL_POINT, temp);
List_Delete(temp);
List_Add(THEM->PhysicalGroups, &p);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_PHYSICAL_POINT;
yyval.s.Num = num;
;
break;}
case 87:
#line 1087 "Gmsh.y"
{
AttractorField *att = new AttractorField();
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
double d;
List_Read(yyvsp[-1].l, i, &d);
Vertex *v = FindPoint((int)d);
if(v)
att->addPoint(v->Pos.X, v->Pos.Y, v->Pos.Z);
else{
GVertex *gv = GModel::current()->vertexByTag((int)d);
if(gv)
att->addPoint(gv->x(), gv->y(), gv->z());
}
}
att->buildFastSearchStructures();
fields.insert(att, (int)yyvsp[-4].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 88:
#line 1108 "Gmsh.y"
{
fields.insert(new LatLonField(fields.get((int)yyvsp[-1].d)), (int)yyvsp[-4].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 89:
#line 1115 "Gmsh.y"
{
Post_View **vv = (Post_View **)List_Pointer_Test(CTX.post.list, (int)yyvsp[-1].d);
if(vv)
fields.insert(new PostViewField(*vv), (int)yyvsp[-4].d);
else
yymsg(GERROR, "Field %i error, view %i does not exist",(int)yyvsp[-4].d,(int)yyvsp[-1].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 90:
#line 1126 "Gmsh.y"
{
double pars[] = {0, CTX.lc/10, CTX.lc, CTX.lc/100, CTX.lc/20};
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
if(i > 4)
yymsg(GERROR, "Too many parameters for Thresold Field (max=5)");
else
List_Read(yyvsp[-1].l, i, &pars[i]);
}
fields.insert(new ThresholdField(fields.get((int)pars[0]), pars[1],
pars[2], pars[3], pars[4]), (int)yyvsp[-4].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 91:
#line 1141 "Gmsh.y"
{
std::list<Field*> *flist = new std::list<Field*>;
flist->resize(0);
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
double id;
List_Read(yyvsp[-1].l, i, &id);
Field *pfield = fields.get((int)id);
if(pfield)flist->push_front(pfield);
}
fields.insert(new FunctionField(flist,yyvsp[-2].c),(int)yyvsp[-5].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 92:
#line 1156 "Gmsh.y"
{
fields.insert(new StructuredField(yyvsp[-1].c), (int)yyvsp[-4].d);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 93:
#line 1163 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
double id;
List_Read(yyvsp[-1].l, i, &id);
BGMAddField(fields.get((int)id));
}
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 94:
#line 1175 "Gmsh.y"
{
double pars[] = { CTX.lc/10, CTX.lc/100., CTX.lc/20, 1, 3 };
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
if(i > 4)
yymsg(GERROR, "Too many paramaters for attractor line (max = 5)");
else
List_Read(yyvsp[-1].l, i, &pars[i]);
}
// treshold attractor: first parameter is the treshold, next two
// are the in and out size fields, last is transition factor
AttractorField *attractor = new AttractorField();
fields.insert(attractor);
Field *threshold = new ThresholdField(attractor, pars[0], pars[0] * pars[4],
pars[1], pars[2]);
fields.insert(threshold);
BGMAddField(threshold);
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
Vertex *v = FindPoint((int)d);
if(v)
attractor->addPoint(v->Pos.X, v->Pos.Y, v->Pos.Z);
else{
GVertex *gv = GModel::current()->vertexByTag((int)d);
if(gv)
attractor->addPoint(gv->x(), gv->y(), gv->z());
}
}
attractor->buildFastSearchStructures();
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 95:
#line 1209 "Gmsh.y"
{
double pars[] = { CTX.lc/10, CTX.lc/100., CTX.lc/20, 10, 3 };
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
if(i > 4)
yymsg(GERROR, "Too many paramaters for attractor line (max = 5)");
else
List_Read(yyvsp[-1].l, i, &pars[i]);
}
// treshold attractor: first parameter is the treshold, next two
// are the in and out size fields, last is transition factor
AttractorField *att = new AttractorField();
fields.insert(att);
Field *threshold = new ThresholdField(att, pars[0], pars[0] * pars[4],
pars[1], pars[2]);
fields.insert(threshold);
BGMAddField(threshold);
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
Curve *c = FindCurve((int)d);
if(c){
att->addCurve(c, (int)pars[3]);
}
else{
GEdge *ge = GModel::current()->edgeByTag((int)d);
if(ge){
att->addGEdge(ge, (int)pars[3]);
}
}
}
att->buildFastSearchStructures();
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 96:
#line 1245 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
Vertex *v = FindPoint((int)d);
if(v)
v->lc = yyvsp[-1].d;
else{
GVertex *gv = GModel::current()->vertexByTag((int)d);
if(gv)
gv->setPrescribedMeshSizeAtVertex(yyvsp[-1].d);
}
}
List_Delete(yyvsp[-3].l);
// dummy values
yyval.s.Type = 0;
yyval.s.Num = 0;
;
break;}
case 97:
#line 1267 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_LINE, 1, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_LINE;
yyval.s.Num = num;
;
break;}
case 98:
#line 1285 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_SPLN, 3, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_SPLN;
yyval.s.Num = num;
;
break;}
case 99:
#line 1303 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_CIRC, 2, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_CIRC;
yyval.s.Num = num;
;
break;}
case 100:
#line 1321 "Gmsh.y"
{
int num = (int)yyvsp[-6].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-3].l);
Curve *c = Create_Curve(num, MSH_SEGM_CIRC, 2, temp, NULL,
-1, -1, 0., 1.);
c->Circle.n[0] = yyvsp[-1].v[0];
c->Circle.n[1] = yyvsp[-1].v[1];
c->Circle.n[2] = yyvsp[-1].v[2];
End_Curve(c);
Tree_Add(THEM->Curves, &c);
Curve *rc = CreateReversedCurve(c);
rc->Circle.n[0] = yyvsp[-1].v[0];
rc->Circle.n[1] = yyvsp[-1].v[1];
rc->Circle.n[2] = yyvsp[-1].v[2];
End_Curve(rc);
List_Delete(temp);
}
List_Delete(yyvsp[-3].l);
yyval.s.Type = MSH_SEGM_CIRC;
yyval.s.Num = num;
;
break;}
case 101:
#line 1347 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_ELLI, 2, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_ELLI;
yyval.s.Num = num;
;
break;}
case 102:
#line 1365 "Gmsh.y"
{
int num = (int)yyvsp[-6].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-3].l);
Curve *c = Create_Curve(num, MSH_SEGM_ELLI, 2, temp, NULL,
-1, -1, 0., 1.);
c->Circle.n[0] = yyvsp[-1].v[0];
c->Circle.n[1] = yyvsp[-1].v[1];
c->Circle.n[2] = yyvsp[-1].v[2];
End_Curve(c);
Tree_Add(THEM->Curves, &c);
Curve *rc = CreateReversedCurve(c);
rc->Circle.n[0] = yyvsp[-1].v[0];
rc->Circle.n[1] = yyvsp[-1].v[1];
rc->Circle.n[2] = yyvsp[-1].v[2];
End_Curve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-3].l);
yyval.s.Type = MSH_SEGM_ELLI;
yyval.s.Num = num;
;
break;}
case 103:
#line 1392 "Gmsh.y"
{
int num = (int)yyvsp[-14].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
Curve *c = Create_Curve(num, MSH_SEGM_PARAMETRIC, 2, NULL, NULL,
-1, -1, yyvsp[-10].d, yyvsp[-8].d);
strcpy(c->functu, yyvsp[-6].c);
strcpy(c->functv, yyvsp[-4].c);
strcpy(c->functw, yyvsp[-2].c);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
}
Free(yyvsp[-6].c); Free(yyvsp[-4].c); Free(yyvsp[-2].c);
yyval.s.Type = MSH_SEGM_PARAMETRIC;
yyval.s.Num = num;
;
break;}
case 104:
#line 1411 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_BSPLN, 2, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_BSPLN;
yyval.s.Num = num;
;
break;}
case 105:
#line 1429 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
Curve *c = Create_Curve(num, MSH_SEGM_BEZIER, 2, temp, NULL,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_BEZIER;
yyval.s.Num = num;
;
break;}
case 106:
#line 1447 "Gmsh.y"
{
int num = (int)yyvsp[-8].d;
if(List_Nbr(yyvsp[-5].l) + (int)yyvsp[-1].d + 1 != List_Nbr(yyvsp[-3].l)){
yymsg(GERROR, "Wrong definition of Nurbs Curve %d: "
"got %d knots, need N + D + 1 = %d + %d + 1 = %d",
(int)yyvsp[-8].d, List_Nbr(yyvsp[-3].l), List_Nbr(yyvsp[-5].l), (int)yyvsp[-1].d, List_Nbr(yyvsp[-5].l) + (int)yyvsp[-1].d + 1);
}
else{
if(FindCurve(num)){
yymsg(GERROR, "Curve %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-5].l);
Curve *c = Create_Curve(num, MSH_SEGM_NURBS, (int)yyvsp[-1].d, temp, yyvsp[-3].l,
-1, -1, 0., 1.);
Tree_Add(THEM->Curves, &c);
CreateReversedCurve(c);
List_Delete(temp);
}
}
List_Delete(yyvsp[-5].l);
List_Delete(yyvsp[-3].l);
yyval.s.Type = MSH_SEGM_NURBS;
yyval.s.Num = num;
;
break;}
case 107:
#line 1473 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindEdgeLoop(num)){
yymsg(GERROR, "Line loop %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
sortEdgesInLoop(num, temp);
EdgeLoop *l = Create_EdgeLoop(num, temp);
Tree_Add(THEM->EdgeLoops, &l);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SEGM_LOOP;
yyval.s.Num = num;
;
break;}
case 108:
#line 1490 "Gmsh.y"
{
int num = (int)yyvsp[-4].i;
if(FindPhysicalGroup(num, MSH_PHYSICAL_LINE)){
yymsg(GERROR, "Physical line %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
PhysicalGroup *p = Create_PhysicalGroup(num, MSH_PHYSICAL_LINE, temp);
List_Delete(temp);
List_Add(THEM->PhysicalGroups, &p);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_PHYSICAL_LINE;
yyval.s.Num = num;
;
break;}
case 109:
#line 1509 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindSurface(num)){
yymsg(GERROR, "Surface %d already exists", num);
}
else{
Surface *s = Create_Surface(num, MSH_SURF_PLAN);
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
setSurfaceGeneratrices(s, temp);
List_Delete(temp);
End_Surface(s);
Tree_Add(THEM->Surfaces, &s);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SURF_PLAN;
yyval.s.Num = num;
;
break;}
case 110:
#line 1527 "Gmsh.y"
{
int num = (int)yyvsp[-4].d, type = 0;
if(FindSurface(num)){
yymsg(GERROR, "Surface %d already exists", num);
}
else{
double d;
List_Read(yyvsp[-1].l, 0, &d);
EdgeLoop *el = FindEdgeLoop((int)fabs(d));
if(!el){
yymsg(GERROR, "Unknown line loop %d", (int)d);
}
else{
int j = List_Nbr(el->Curves);
if(j == 4){
type = MSH_SURF_REGL;
}
else if(j == 3){
type = MSH_SURF_TRIC;
}
else{
yymsg(GERROR, "Wrong definition of Ruled Surface %d: "
"%d borders instead of 3 or 4", num, j);
type = MSH_SURF_PLAN;
}
Surface *s = Create_Surface(num, type);
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
setSurfaceGeneratrices(s, temp);
List_Delete(temp);
End_Surface(s);
Tree_Add(THEM->Surfaces, &s);
}
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = type;
yyval.s.Num = num;
;
break;}
case 111:
#line 1565 "Gmsh.y"
{
myGmshSurface = 0;
;
break;}
case 112:
#line 1569 "Gmsh.y"
{
myGmshSurface = gmshSurface :: surfaceByTag ( (int) yyvsp[-1].d);
;
break;}
case 113:
#line 1573 "Gmsh.y"
{
int num = (int)yyvsp[-6].d, type = 0;
myGmshSurface = gmshParametricSurface::NewParametricSurface ((int)yyvsp[-6].d,yyvsp[-3].c,yyvsp[-2].c,yyvsp[-1].c);
;
break;}
case 114:
#line 1578 "Gmsh.y"
{
int num = (int)yyvsp[-4].d, type = 0;
if (List_Nbr(yyvsp[-1].l) != 2){
yymsg(GERROR, "Sphere %d has to be defined using 2 points (center + "
"any point) and not %d", num, List_Nbr(yyvsp[-1].l));
}
else{
double p1,p2;
List_Read(yyvsp[-1].l, 0, &p1);
List_Read(yyvsp[-1].l, 1, &p2);
Vertex *v1 = FindPoint((int)p1);
Vertex *v2 = FindPoint((int)p2);
if(!v1) yymsg(GERROR, "Sphere %d : unknown point %d", num, (int)p1);
if(!v2) yymsg(GERROR, "Sphere %d : unknown point %d", num, (int)p2);
myGmshSurface = gmshSphere::NewSphere
(num, v1->Pos.X, v1->Pos.Y, v1->Pos.Z,
sqrt((v2->Pos.X - v1->Pos.X) * (v2->Pos.X - v1->Pos.X) +
(v2->Pos.Y - v1->Pos.Y) * (v2->Pos.Y - v1->Pos.Y) +
(v2->Pos.Z - v1->Pos.Z) * (v2->Pos.Z - v1->Pos.Z)));
}
;
break;}
case 115:
#line 1600 "Gmsh.y"
{
int num = (int)yyvsp[-4].d, type = 0;
if (List_Nbr(yyvsp[-1].l) != 2){
yymsg(GERROR, "PolarSphere %d has to be defined using 2 points (center + "
"any point) and not %d", num, List_Nbr(yyvsp[-1].l));
}
else{
double p1,p2;
List_Read(yyvsp[-1].l, 0, &p1);
List_Read(yyvsp[-1].l, 1, &p2);
Vertex *v1 = FindPoint((int)p1);
Vertex *v2 = FindPoint((int)p2);
if(!v1) yymsg(GERROR, "PolarSphere %d : unknown point %d", num, (int)p1);
if(!v2) yymsg(GERROR, "PolarSphere %d : unknown point %d", num, (int)p2);
myGmshSurface = gmshPolarSphere::NewPolarSphere
(num, v1->Pos.X, v1->Pos.Y, v1->Pos.Z,
sqrt((v2->Pos.X - v1->Pos.X) * (v2->Pos.X - v1->Pos.X) +
(v2->Pos.Y - v1->Pos.Y) * (v2->Pos.Y - v1->Pos.Y) +
(v2->Pos.Z - v1->Pos.Z) * (v2->Pos.Z - v1->Pos.Z)));
}
;
break;}
case 116:
#line 1622 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindSurfaceLoop(num)){
yymsg(GERROR, "Surface loop %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
SurfaceLoop *l = Create_SurfaceLoop(num, temp);
Tree_Add(THEM->SurfaceLoops, &l);
List_Delete(temp);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_SURF_LOOP;
yyval.s.Num = num;
;
break;}
case 117:
#line 1638 "Gmsh.y"
{
int num = (int)yyvsp[-4].i;
if(FindPhysicalGroup(num, MSH_PHYSICAL_SURFACE)){
yymsg(GERROR, "Physical surface %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
PhysicalGroup *p = Create_PhysicalGroup(num, MSH_PHYSICAL_SURFACE, temp);
List_Delete(temp);
List_Add(THEM->PhysicalGroups, &p);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_PHYSICAL_SURFACE;
yyval.s.Num = num;
;
break;}
case 118:
#line 1658 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindVolume(num)){
yymsg(GERROR, "Volume %d already exists", num);
}
else{
Volume *v = Create_Volume(num, MSH_VOLUME);
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
setVolumeSurfaces(v, temp);
List_Delete(temp);
Tree_Add(THEM->Volumes, &v);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_VOLUME;
yyval.s.Num = num;
;
break;}
case 119:
#line 1675 "Gmsh.y"
{
int num = (int)yyvsp[-4].d;
if(FindVolume(num)){
yymsg(GERROR, "Volume %d already exists", num);
}
else{
Volume *v = Create_Volume(num, MSH_VOLUME);
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
setVolumeSurfaces(v, temp);
List_Delete(temp);
Tree_Add(THEM->Volumes, &v);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_VOLUME;
yyval.s.Num = num;
;
break;}
case 120:
#line 1692 "Gmsh.y"
{
int num = (int)yyvsp[-4].i;
if(FindPhysicalGroup(num, MSH_PHYSICAL_VOLUME)){
yymsg(GERROR, "Physical volume %d already exists", num);
}
else{
List_T *temp = ListOfDouble2ListOfInt(yyvsp[-1].l);
PhysicalGroup *p = Create_PhysicalGroup(num, MSH_PHYSICAL_VOLUME, temp);
List_Delete(temp);
List_Add(THEM->PhysicalGroups, &p);
}
List_Delete(yyvsp[-1].l);
yyval.s.Type = MSH_PHYSICAL_VOLUME;
yyval.s.Num = num;
;
break;}
case 121:
#line 1713 "Gmsh.y"
{
TranslateShapes(yyvsp[-3].v[0], yyvsp[-3].v[1], yyvsp[-3].v[2], yyvsp[-1].l);
yyval.l = yyvsp[-1].l;
;
break;}
case 122:
#line 1718 "Gmsh.y"
{
RotateShapes(yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].d, yyvsp[-1].l);
yyval.l = yyvsp[-1].l;
;
break;}
case 123:
#line 1723 "Gmsh.y"
{
SymmetryShapes(yyvsp[-3].v[0], yyvsp[-3].v[1], yyvsp[-3].v[2], yyvsp[-3].v[3], yyvsp[-1].l);
yyval.l = yyvsp[-1].l;
;
break;}
case 124:
#line 1728 "Gmsh.y"
{
DilatShapes(yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].d, yyvsp[-1].l);
yyval.l = yyvsp[-1].l;
;
break;}
case 125:
#line 1733 "Gmsh.y"
{
yyval.l = List_Create(3, 3, sizeof(Shape));
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
Shape TheShape;
List_Read(yyvsp[-1].l, i, &TheShape);
CopyShape(TheShape.Type, TheShape.Num, &TheShape.Num);
List_Add(yyval.l, &TheShape);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 126:
#line 1744 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
IntersectCurvesWithSurface(yyvsp[-5].l, (int)yyvsp[-1].d, yyval.l);
List_Delete(yyvsp[-5].l);
;
break;}
case 127:
#line 1750 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
BoundaryShapes(yyvsp[-1].l, yyval.l);
List_Delete(yyvsp[-1].l);
;
break;}
case 128:
#line 1758 "Gmsh.y"
{ yyval.l = yyvsp[0].l; ;
break;}
case 129:
#line 1759 "Gmsh.y"
{ yyval.l = yyvsp[0].l; ;
break;}
case 130:
#line 1764 "Gmsh.y"
{
yyval.l = List_Create(3, 3, sizeof(Shape));
;
break;}
case 131:
#line 1768 "Gmsh.y"
{
List_Add(yyval.l, &yyvsp[0].s);
;
break;}
case 132:
#line 1772 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-2].l); i++){
double d;
List_Read(yyvsp[-2].l, i, &d);
Shape TheShape;
TheShape.Num = (int)d;
Vertex *v = FindPoint(TheShape.Num);
if(v){
TheShape.Type = MSH_POINT;
List_Add(yyval.l, &TheShape);
}
else{
GVertex *gv = GModel::current()->vertexByTag(TheShape.Num);
if(gv){
TheShape.Type = MSH_POINT_FROM_GMODEL;
List_Add(yyval.l, &TheShape);
}
else
yymsg(WARNING, "Unknown point %d", TheShape.Num);
}
}
;
break;}
case 133:
#line 1795 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-2].l); i++){
double d;
List_Read(yyvsp[-2].l, i, &d);
Shape TheShape;
TheShape.Num = (int)d;
Curve *c = FindCurve(TheShape.Num);
if(c){
TheShape.Type = c->Typ;
List_Add(yyval.l, &TheShape);
}
else{
GEdge *ge = GModel::current()->edgeByTag(TheShape.Num);
if(ge){
TheShape.Type = MSH_SEGM_FROM_GMODEL;
List_Add(yyval.l, &TheShape);
}
else
yymsg(WARNING, "Unknown curve %d", TheShape.Num);
}
}
;
break;}
case 134:
#line 1818 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-2].l); i++){
double d;
List_Read(yyvsp[-2].l, i, &d);
Shape TheShape;
TheShape.Num = (int)d;
Surface *s = FindSurface(TheShape.Num);
if(s){
TheShape.Type = s->Typ;
List_Add(yyval.l, &TheShape);
}
else{
GFace *gf = GModel::current()->faceByTag(TheShape.Num);
if(gf){
TheShape.Type = MSH_SURF_FROM_GMODEL;
List_Add(yyval.l, &TheShape);
}
else
yymsg(WARNING, "Unknown surface %d", TheShape.Num);
}
}
;
break;}
case 135:
#line 1841 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-2].l); i++){
double d;
List_Read(yyvsp[-2].l, i, &d);
Shape TheShape;
TheShape.Num = (int)d;
Volume *v = FindVolume(TheShape.Num);
if(v){
TheShape.Type = v->Typ;
List_Add(yyval.l, &TheShape);
}
else{
GRegion *gr = GModel::current()->regionByTag(TheShape.Num);
if(gr){
TheShape.Type = MSH_VOLUME_FROM_GMODEL;
List_Add(yyval.l, &TheShape);
}
else
yymsg(WARNING, "Unknown volume %d", TheShape.Num);
}
}
;
break;}
case 136:
#line 1869 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
Shape TheShape;
List_Read(yyvsp[-1].l, i, &TheShape);
DeleteShape(TheShape.Type, TheShape.Num);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 137:
#line 1878 "Gmsh.y"
{
if(!strcmp(yyvsp[-4].c, "View")){
RemoveViewByIndex((int)yyvsp[-2].d);
}
else{
yymsg(GERROR, "Unknown command 'Delete %s'", yyvsp[-4].c);
}
Free(yyvsp[-4].c);
;
break;}
case 138:
#line 1888 "Gmsh.y"
{
if(!strcmp(yyvsp[-1].c, "Meshes") || !strcmp(yyvsp[-1].c, "All")){
GModel::current()->destroy();
THEM->destroy();
}
else if(!strcmp(yyvsp[-1].c, "Physicals")){
List_Action(THEM->PhysicalGroups, Free_PhysicalGroup);
List_Reset(THEM->PhysicalGroups);
GModel::current()->deletePhysicalGroups();
}
else{
yymsg(GERROR, "Unknown command 'Delete %s'", yyvsp[-1].c);
}
Free(yyvsp[-1].c);
;
break;}
case 139:
#line 1904 "Gmsh.y"
{
if(!strcmp(yyvsp[-2].c, "Empty") && !strcmp(yyvsp[-1].c, "Views")){
for(int i = List_Nbr(CTX.post.list) - 1; i >= 0; i--){
Post_View *v = *(Post_View **) List_Pointer(CTX.post.list, i);
if(v->empty())
RemoveViewByIndex(i);
}
}
else{
yymsg(GERROR, "Unknown command 'Delete %s %s'", yyvsp[-2].c, yyvsp[-1].c);
}
Free(yyvsp[-2].c); Free(yyvsp[-1].c);
;
break;}
case 140:
#line 1923 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
Shape TheShape;
List_Read(yyvsp[-1].l, i, &TheShape);
ColorShape(TheShape.Type, TheShape.Num, yyvsp[-3].u);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 141:
#line 1937 "Gmsh.y"
{
for(int i = 0; i < 4; i++)
VisibilityShape(yyvsp[-1].c, i, 1);
Free(yyvsp[-1].c);
;
break;}
case 142:
#line 1943 "Gmsh.y"
{
for(int i = 0; i < 4; i++)
VisibilityShape(yyvsp[-1].c, i, 0);
Free(yyvsp[-1].c);
;
break;}
case 143:
#line 1949 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
Shape TheShape;
List_Read(yyvsp[-1].l, i, &TheShape);
VisibilityShape(TheShape.Type, TheShape.Num, 1);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 144:
#line 1958 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
Shape TheShape;
List_Read(yyvsp[-1].l, i, &TheShape);
VisibilityShape(TheShape.Type, TheShape.Num, 0);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 145:
#line 1972 "Gmsh.y"
{
if(!strcmp(yyvsp[-2].c, "Include")){
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
// Warning: we *don't* close included files (to allow user
// functions in these files). If you need to include many many
// files and don't have functions in the files, use "Merge"
// instead: some OSes limit the number of files a process can
// open simultaneously. The right solution would be of course
// to modify FunctionManager to reopen the files instead of
// using the FILE pointer, but hey, I'm lazy...
Msg(STATUS2, "Reading '%s'", tmpstring);
ParseFile(tmpstring, 0, 1);
SetBoundingBox();
Msg(STATUS2, "Read '%s'", tmpstring);
}
else if(!strcmp(yyvsp[-2].c, "Print")){
#if defined(HAVE_FLTK)
// make sure we have the latest data from THEM in GModel
// (fixes bug where we would have no geometry in the picture if
// the print command is in the same file as the geometry)
GModel::current()->importTHEM();
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
CreateOutputFile(tmpstring, CTX.print.format);
#endif
}
else if(!strcmp(yyvsp[-2].c, "Save")){
#if defined(HAVE_FLTK)
GModel::current()->importTHEM();
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
CreateOutputFile(tmpstring, CTX.mesh.format);
#endif
}
else if(!strcmp(yyvsp[-2].c, "Merge") || !strcmp(yyvsp[-2].c, "MergeWithBoundingBox")){
// MergeWithBoundingBox is deprecated
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
MergeFile(tmpstring, 1);
}
else if(!strcmp(yyvsp[-2].c, "System")){
SystemCall(yyvsp[-1].c);
}
else{
yymsg(GERROR, "Unknown command '%s'", yyvsp[-2].c);
}
Free(yyvsp[-2].c); Free(yyvsp[-1].c);
;
break;}
case 146:
#line 2022 "Gmsh.y"
{
if(!strcmp(yyvsp[-6].c, "Save") && !strcmp(yyvsp[-5].c, "View")){
Post_View **vv = (Post_View **)List_Pointer_Test(CTX.post.list, (int)yyvsp[-3].d);
if(vv){
char tmpstring[1024];
FixRelativePath(yyvsp[-1].c, tmpstring);
WriteView(*vv, tmpstring, CTX.post.file_format, 0);
}
}
else{
yymsg(GERROR, "Unknown command '%s'", yyvsp[-6].c);
}
Free(yyvsp[-6].c); Free(yyvsp[-5].c); Free(yyvsp[-1].c);
;
break;}
case 147:
#line 2037 "Gmsh.y"
{
if(!strcmp(yyvsp[-6].c, "Background") && !strcmp(yyvsp[-5].c, "Mesh") && !strcmp(yyvsp[-4].c, "View")){
Post_View **vv = (Post_View **)List_Pointer_Test(CTX.post.list, (int)yyvsp[-2].d);
if(vv) {
Field *field=new PostViewField(*vv);
fields.insert(field);
BGMAddField(field);
}
}
else{
yymsg(GERROR, "Unknown command '%s'", yyvsp[-6].c);
}
Free(yyvsp[-6].c); Free(yyvsp[-5].c); Free(yyvsp[-4].c);
;
break;}
case 148:
#line 2052 "Gmsh.y"
{
if(!strcmp(yyvsp[-2].c, "Sleep")){
SleepInSeconds(yyvsp[-1].d);
}
else if(!strcmp(yyvsp[-2].c, "Remesh")){
Msg(GERROR, "Surface ReMeshing must be reinterfaced");
// ReMesh();
}
else if(!strcmp(yyvsp[-2].c, "Mesh")){
yymsg(GERROR, "Mesh directives are not (yet) allowed in scripts");
}
else if(!strcmp(yyvsp[-2].c, "Status")){
yymsg(GERROR, "Mesh directives are not (yet) allowed in scripts");
}
else{
yymsg(GERROR, "Unknown command '%s'", yyvsp[-2].c);
}
Free(yyvsp[-2].c);
;
break;}
case 149:
#line 2072 "Gmsh.y"
{
try {
GMSH_PluginManager::instance()->action(yyvsp[-4].c, yyvsp[-1].c, 0);
}
catch(...) {
yymsg(GERROR, "Unknown action '%s' or plugin '%s'", yyvsp[-1].c, yyvsp[-4].c);
}
Free(yyvsp[-4].c); Free(yyvsp[-1].c);
;
break;}
case 150:
#line 2082 "Gmsh.y"
{
if(!strcmp(yyvsp[-1].c, "ElementsFromAllViews"))
CombineViews(0, 1, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "ElementsFromVisibleViews"))
CombineViews(0, 0, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "ElementsByViewName"))
CombineViews(0, 2, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "TimeStepsFromAllViews"))
CombineViews(1, 1, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "TimeStepsFromVisibleViews"))
CombineViews(1, 0, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "TimeStepsByViewName"))
CombineViews(1, 2, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "Views"))
CombineViews(0, 1, CTX.post.combine_remove_orig);
else if(!strcmp(yyvsp[-1].c, "TimeSteps"))
CombineViews(1, 2, CTX.post.combine_remove_orig);
else
yymsg(GERROR, "Unknown 'Combine' command");
Free(yyvsp[-1].c);
;
break;}
case 151:
#line 2104 "Gmsh.y"
{
exit(0);
;
break;}
case 152:
#line 2108 "Gmsh.y"
{
CTX.forced_bbox = 0;
SetBoundingBox();
;
break;}
case 153:
#line 2113 "Gmsh.y"
{
CTX.forced_bbox = 1;
SetBoundingBox(yyvsp[-12].d, yyvsp[-10].d, yyvsp[-8].d, yyvsp[-6].d, yyvsp[-4].d, yyvsp[-2].d);
;
break;}
case 154:
#line 2118 "Gmsh.y"
{
#if defined(HAVE_FLTK)
Draw();
#endif
;
break;}
case 155:
#line 2130 "Gmsh.y"
{
LoopControlVariablesTab[ImbricatedLoop][0] = yyvsp[-3].d;
LoopControlVariablesTab[ImbricatedLoop][1] = yyvsp[-1].d;
LoopControlVariablesTab[ImbricatedLoop][2] = 1.0;
LoopControlVariablesNameTab[ImbricatedLoop] = NULL;
fgetpos(yyin, &yyposImbricatedLoopsTab[ImbricatedLoop]);
yylinenoImbricatedLoopsTab[ImbricatedLoop] = yylineno;
ImbricatedLoop++;
if(ImbricatedLoop > MAX_RECUR_LOOPS-1){
yymsg(GERROR, "Reached maximum number of imbricated loops");
ImbricatedLoop = MAX_RECUR_LOOPS-1;
}
if(yyvsp[-3].d > yyvsp[-1].d) skip_until("For", "EndFor");
;
break;}
case 156:
#line 2145 "Gmsh.y"
{
LoopControlVariablesTab[ImbricatedLoop][0] = yyvsp[-5].d;
LoopControlVariablesTab[ImbricatedLoop][1] = yyvsp[-3].d;
LoopControlVariablesTab[ImbricatedLoop][2] = yyvsp[-1].d;
LoopControlVariablesNameTab[ImbricatedLoop] = NULL;
fgetpos(yyin, &yyposImbricatedLoopsTab[ImbricatedLoop]);
yylinenoImbricatedLoopsTab[ImbricatedLoop] = yylineno;
ImbricatedLoop++;
if(ImbricatedLoop > MAX_RECUR_LOOPS-1){
yymsg(GERROR, "Reached maximum number of imbricated loops");
ImbricatedLoop = MAX_RECUR_LOOPS-1;
}
if((yyvsp[-1].d > 0. && yyvsp[-5].d > yyvsp[-3].d) || (yyvsp[-1].d < 0. && yyvsp[-5].d < yyvsp[-3].d))
skip_until("For", "EndFor");
;
break;}
case 157:
#line 2161 "Gmsh.y"
{
LoopControlVariablesTab[ImbricatedLoop][0] = yyvsp[-3].d;
LoopControlVariablesTab[ImbricatedLoop][1] = yyvsp[-1].d;
LoopControlVariablesTab[ImbricatedLoop][2] = 1.0;
LoopControlVariablesNameTab[ImbricatedLoop] = yyvsp[-6].c;
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-6].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
TheSymbol.val = List_Create(1, 1, sizeof(double));
List_Put(TheSymbol.val, 0, &yyvsp[-3].d);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
List_Write(pSymbol->val, 0, &yyvsp[-3].d);
}
fgetpos(yyin, &yyposImbricatedLoopsTab[ImbricatedLoop]);
yylinenoImbricatedLoopsTab[ImbricatedLoop] = yylineno;
ImbricatedLoop++;
if(ImbricatedLoop > MAX_RECUR_LOOPS-1){
yymsg(GERROR, "Reached maximum number of imbricated loops");
ImbricatedLoop = MAX_RECUR_LOOPS-1;
}
if(yyvsp[-3].d > yyvsp[-1].d) skip_until("For", "EndFor");
;
break;}
case 158:
#line 2187 "Gmsh.y"
{
LoopControlVariablesTab[ImbricatedLoop][0] = yyvsp[-5].d;
LoopControlVariablesTab[ImbricatedLoop][1] = yyvsp[-3].d;
LoopControlVariablesTab[ImbricatedLoop][2] = yyvsp[-1].d;
LoopControlVariablesNameTab[ImbricatedLoop] = yyvsp[-8].c;
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-8].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))){
TheSymbol.val = List_Create(1, 1, sizeof(double));
List_Put(TheSymbol.val, 0, &yyvsp[-5].d);
Tree_Add(Symbol_T, &TheSymbol);
}
else{
List_Write(pSymbol->val, 0, &yyvsp[-5].d);
}
fgetpos(yyin, &yyposImbricatedLoopsTab[ImbricatedLoop]);
yylinenoImbricatedLoopsTab[ImbricatedLoop] = yylineno;
ImbricatedLoop++;
if(ImbricatedLoop > MAX_RECUR_LOOPS-1){
yymsg(GERROR, "Reached maximum number of imbricated loops");
ImbricatedLoop = MAX_RECUR_LOOPS-1;
}
if((yyvsp[-1].d > 0. && yyvsp[-5].d > yyvsp[-3].d) || (yyvsp[-1].d < 0. && yyvsp[-5].d < yyvsp[-3].d))
skip_until("For", "EndFor");
;
break;}
case 159:
#line 2214 "Gmsh.y"
{
if(ImbricatedLoop <= 0){
yymsg(GERROR, "Invalid For/EndFor loop");
ImbricatedLoop = 0;
}
else{
double x0 = LoopControlVariablesTab[ImbricatedLoop-1][0];
double x1 = LoopControlVariablesTab[ImbricatedLoop-1][1];
double step = LoopControlVariablesTab[ImbricatedLoop-1][2];
int do_next = (step > 0.) ? (x0+step <= x1) : (x0+step >= x1);
if(do_next){
LoopControlVariablesTab[ImbricatedLoop-1][0] +=
LoopControlVariablesTab[ImbricatedLoop-1][2];
if(LoopControlVariablesNameTab[ImbricatedLoop-1]){
Symbol TheSymbol;
TheSymbol.Name = LoopControlVariablesNameTab[ImbricatedLoop-1];
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol)))
yymsg(GERROR, "Unknown loop variable");
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) +=
LoopControlVariablesTab[ImbricatedLoop-1][2];
}
fsetpos(yyin, &yyposImbricatedLoopsTab[ImbricatedLoop-1]);
yylineno = yylinenoImbricatedLoopsTab[ImbricatedLoop-1];
}
else{
ImbricatedLoop--;
}
}
;
break;}
case 160:
#line 2246 "Gmsh.y"
{
if(!FunctionManager::Instance()->createFunction(yyvsp[0].c, yyin, yyname, yylineno))
yymsg(GERROR, "Redefinition of function %s", yyvsp[0].c);
skip_until(NULL, "Return");
//FIXME: wee leak $2
;
break;}
case 161:
#line 2253 "Gmsh.y"
{
if(!FunctionManager::Instance()->leaveFunction(&yyin, yyname, yylineno))
yymsg(GERROR, "Error while exiting function");
;
break;}
case 162:
#line 2258 "Gmsh.y"
{
if(!FunctionManager::Instance()->enterFunction(yyvsp[-1].c, &yyin, yyname, yylineno))
yymsg(GERROR, "Unknown function %s", yyvsp[-1].c);
//FIXME: wee leak $2
;
break;}
case 163:
#line 2264 "Gmsh.y"
{
if(!yyvsp[-1].d) skip_until("If", "EndIf");
;
break;}
case 164:
#line 2268 "Gmsh.y"
{
;
break;}
case 165:
#line 2277 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(TRANSLATE, yyvsp[-1].l,
yyvsp[-3].v[0], yyvsp[-3].v[1], yyvsp[-3].v[2], 0., 0., 0., 0., 0., 0., 0.,
NULL, yyval.l);
List_Delete(yyvsp[-1].l);
;
break;}
case 166:
#line 2285 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(ROTATE, yyvsp[-1].l,
0., 0., 0., yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].d,
NULL, yyval.l);
List_Delete(yyvsp[-1].l);
;
break;}
case 167:
#line 2293 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(TRANSLATE_ROTATE, yyvsp[-1].l,
yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].d,
NULL, yyval.l);
List_Delete(yyvsp[-1].l);
;
break;}
case 168:
#line 2301 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 169:
#line 2305 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(TRANSLATE, yyvsp[-3].l,
yyvsp[-5].v[0], yyvsp[-5].v[1], yyvsp[-5].v[2], 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
List_Delete(yyvsp[-3].l);
;
break;}
case 170:
#line 2313 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 171:
#line 2317 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(ROTATE, yyvsp[-3].l,
0., 0., 0., yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
List_Delete(yyvsp[-3].l);
;
break;}
case 172:
#line 2325 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 173:
#line 2329 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(TRANSLATE_ROTATE, yyvsp[-3].l,
yyvsp[-12].v[0], yyvsp[-12].v[1], yyvsp[-12].v[2], yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
List_Delete(yyvsp[-3].l);
;
break;}
case 174:
#line 2337 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 175:
#line 2341 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShapes(BOUNDARY_LAYER, yyvsp[-3].l, 0., 0., 0., 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
List_Delete(yyvsp[-3].l);
;
break;}
case 176:
#line 2348 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 177:
#line 2352 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
extr.mesh.ViewIndex = (int)yyvsp[-6].d;
ExtrudeShapes(BOUNDARY_LAYER, yyvsp[-3].l, 0., 0., 0., 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
extr.mesh.ViewIndex = -1;
Free(yyvsp[-8].c);
List_Delete(yyvsp[-3].l);
;
break;}
case 178:
#line 2364 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_POINT, (int)yyvsp[-4].d,
yyvsp[-2].v[0], yyvsp[-2].v[1], yyvsp[-2].v[2], 0., 0., 0., 0., 0., 0., 0.,
NULL, yyval.l);
;
break;}
case 179:
#line 2371 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_SEGM_LINE, (int)yyvsp[-4].d,
yyvsp[-2].v[0], yyvsp[-2].v[1], yyvsp[-2].v[2], 0., 0., 0., 0., 0., 0., 0.,
NULL, yyval.l);
;
break;}
case 180:
#line 2378 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_SURF_PLAN, (int)yyvsp[-4].d,
yyvsp[-2].v[0], yyvsp[-2].v[1], yyvsp[-2].v[2], 0., 0., 0., 0., 0., 0., 0.,
NULL, yyval.l);
;
break;}
case 181:
#line 2385 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_POINT, (int)yyvsp[-8].d,
0., 0., 0., yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 182:
#line 2392 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_SEGM_LINE, (int)yyvsp[-8].d,
0., 0., 0., yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 183:
#line 2399 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_SURF_PLAN, (int)yyvsp[-8].d,
0., 0., 0., yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 184:
#line 2406 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_POINT, (int)yyvsp[-10].d,
yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 185:
#line 2413 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_SEGM_LINE, (int)yyvsp[-10].d,
yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 186:
#line 2420 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_SURF_PLAN, (int)yyvsp[-10].d,
yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], yyvsp[-4].v[0], yyvsp[-4].v[1], yyvsp[-4].v[2], yyvsp[-2].d,
NULL, yyval.l);
;
break;}
case 187:
#line 2427 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 188:
#line 2431 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_POINT, (int)yyvsp[-8].d,
yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
;
break;}
case 189:
#line 2438 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 190:
#line 2442 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_SEGM_LINE, (int)yyvsp[-8].d,
yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
;
break;}
case 191:
#line 2449 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 192:
#line 2453 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE, MSH_SURF_PLAN, (int)yyvsp[-8].d,
yyvsp[-6].v[0], yyvsp[-6].v[1], yyvsp[-6].v[2], 0., 0., 0., 0., 0., 0., 0.,
&extr, yyval.l);
;
break;}
case 193:
#line 2460 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 194:
#line 2464 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_POINT, (int)yyvsp[-12].d,
0., 0., 0., yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 195:
#line 2471 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 196:
#line 2475 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_SEGM_LINE, (int)yyvsp[-12].d,
0., 0., 0., yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 197:
#line 2482 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 198:
#line 2486 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(ROTATE, MSH_SURF_PLAN, (int)yyvsp[-12].d,
0., 0., 0., yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 199:
#line 2493 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 200:
#line 2497 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_POINT, (int)yyvsp[-14].d,
yyvsp[-12].v[0], yyvsp[-12].v[1], yyvsp[-12].v[2], yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 201:
#line 2504 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 202:
#line 2508 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_SEGM_LINE, (int)yyvsp[-14].d,
yyvsp[-12].v[0], yyvsp[-12].v[1], yyvsp[-12].v[2], yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 203:
#line 2515 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = extr.mesh.Recombine = false;
;
break;}
case 204:
#line 2519 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(Shape));
ExtrudeShape(TRANSLATE_ROTATE, MSH_SURF_PLAN, (int)yyvsp[-14].d,
yyvsp[-12].v[0], yyvsp[-12].v[1], yyvsp[-12].v[2], yyvsp[-10].v[0], yyvsp[-10].v[1], yyvsp[-10].v[2], yyvsp[-8].v[0], yyvsp[-8].v[1], yyvsp[-8].v[2], yyvsp[-6].d,
&extr, yyval.l);
;
break;}
case 205:
#line 2530 "Gmsh.y"
{
;
break;}
case 206:
#line 2533 "Gmsh.y"
{
;
break;}
case 207:
#line 2539 "Gmsh.y"
{
extr.mesh.ExtrudeMesh = true;
extr.mesh.NbLayer = 1;
extr.mesh.NbElmLayer.clear();
extr.mesh.hLayer.clear();
extr.mesh.NbElmLayer.push_back((int)fabs(yyvsp[-2].d));
extr.mesh.hLayer.push_back(1.);
;
break;}
case 208:
#line 2548 "Gmsh.y"
{
double d;
extr.mesh.ExtrudeMesh = true;
extr.mesh.NbLayer = List_Nbr(yyvsp[-4].l);
if(List_Nbr(yyvsp[-4].l) == List_Nbr(yyvsp[-2].l)){
extr.mesh.NbElmLayer.clear();
extr.mesh.hLayer.clear();
for(int i = 0; i < List_Nbr(yyvsp[-4].l); i++){
List_Read(yyvsp[-4].l, i, &d);
extr.mesh.NbElmLayer.push_back((d > 0) ? (int)d : 1);
List_Read(yyvsp[-2].l, i, &d);
extr.mesh.hLayer.push_back(d);
}
}
else{
yymsg(GERROR, "Wrong layer definition {%d, %d}",
List_Nbr(yyvsp[-4].l), List_Nbr(yyvsp[-2].l));
}
List_Delete(yyvsp[-4].l);
List_Delete(yyvsp[-2].l);
;
break;}
case 209:
#line 2570 "Gmsh.y"
{
yymsg(GERROR, "Explicit region numbers in layers are deprecated");
double d;
extr.mesh.ExtrudeMesh = true;
extr.mesh.NbLayer = List_Nbr(yyvsp[-6].l);
if(List_Nbr(yyvsp[-6].l) == List_Nbr(yyvsp[-4].l) && List_Nbr(yyvsp[-6].l) == List_Nbr(yyvsp[-2].l)){
extr.mesh.NbElmLayer.clear();
extr.mesh.hLayer.clear();
for(int i = 0; i < List_Nbr(yyvsp[-6].l); i++){
List_Read(yyvsp[-6].l, i, &d);
extr.mesh.NbElmLayer.push_back((d > 0) ? (int)d : 1);
List_Read(yyvsp[-2].l, i, &d);
extr.mesh.hLayer.push_back(d);
}
}
else{
yymsg(GERROR, "Wrong layer definition {%d, %d, %d}",
List_Nbr(yyvsp[-6].l), List_Nbr(yyvsp[-4].l), List_Nbr(yyvsp[-2].l));
}
List_Delete(yyvsp[-6].l);
List_Delete(yyvsp[-4].l);
List_Delete(yyvsp[-2].l);
;
break;}
case 210:
#line 2594 "Gmsh.y"
{
extr.mesh.Recombine = true;
;
break;}
case 211:
#line 2598 "Gmsh.y"
{
int num = (int)yyvsp[-6].d;
if(FindSurface(num)){
yymsg(GERROR, "Surface %d already exists", num);
}
else{
Surface *s = Create_Surface(num, MSH_SURF_DISCRETE);
Tree_Add(THEM->Surfaces, &s);
extr.mesh.Holes[num].first = yyvsp[-1].d;
extr.mesh.Holes[num].second.clear();
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
extr.mesh.Holes[num].second.push_back((int)d);
}
}
List_Delete(yyvsp[-3].l);
;
break;}
case 212:
#line 2622 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
int j = (int)fabs(d);
Curve *c = FindCurve(j);
if(!c)
yymsg(WARNING, "Unknown curve %d", j);
else{
c->Method = TRANSFINI;
c->ipar[0] = (yyvsp[-1].d>2)?(int)yyvsp[-1].d:2;
c->ipar[1] = sign(d);
c->dpar[0] = 1.0;
}
}
List_Delete(yyvsp[-3].l);
;
break;}
case 213:
#line 2640 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-6].l); i++){
double d;
List_Read(yyvsp[-6].l, i, &d);
int j = (int)fabs(d);
Curve *c = FindCurve(j);
if(!c)
yymsg(WARNING, "Unknown curve %d", j);
else{
c->Method = TRANSFINI;
c->ipar[0] = (yyvsp[-4].d>2)?(int)yyvsp[-4].d:2;
c->ipar[1] = sign(d); /* Progresion : code 1 ou -1 */
c->dpar[0] = fabs(yyvsp[-1].d);
}
}
List_Delete(yyvsp[-6].l);
;
break;}
case 214:
#line 2658 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-6].l); i++){
double d;
List_Read(yyvsp[-6].l, i, &d);
int j = (int)fabs(d);
Curve *c = FindCurve(j);
if(!c)
yymsg(WARNING, "Unknown curve %d", j);
else{
c->Method = TRANSFINI;
c->ipar[0] = (yyvsp[-4].d>2)?(int)yyvsp[-4].d:2;
c->ipar[1] = 2*sign(d); /* Bump : code 2 ou -2 */
c->dpar[0] = fabs(yyvsp[-1].d);
}
}
List_Delete(yyvsp[-6].l);
;
break;}
case 215:
#line 2676 "Gmsh.y"
{
Surface *s = FindSurface((int)yyvsp[-4].d);
if(!s)
yymsg(WARNING, "Unknown surface %d", (int)yyvsp[-4].d);
else{
s->Method = TRANSFINI;
s->Recombine_Dir = -1;
int k = List_Nbr(yyvsp[-1].l);
if(k != 3 && k != 4){
yymsg(GERROR, "Wrong definition of Transfinite Surface %d: "
"%d points instead of 3 or 4" , (int)yyvsp[-4].d, k);
}
else{
List_Reset(s->TrsfPoints);
for(int i = 0; i < k; i++){
double d;
List_Read(yyvsp[-1].l, i, &d);
int j = (int)fabs(d);
Vertex *v = FindPoint(j);
if(!v)
yymsg(WARNING, "Unknown point %d", j);
else
List_Add(s->TrsfPoints, &v);
}
}
}
List_Delete(yyvsp[-1].l);
;
break;}
case 216:
#line 2705 "Gmsh.y"
{
Surface *s = FindSurface((int)yyvsp[-5].d);
if(!s)
yymsg(WARNING, "Unknown surface %d", (int)yyvsp[-5].d);
else{
s->Method = TRANSFINI;
int k = List_Nbr(yyvsp[-2].l);
if(k != 3 && k != 4){
yymsg(GERROR, "Wrong definition of Transfinite Surface %d: "
"%d points instead of 3 or 4" , (int)yyvsp[-5].d, k);
}
else{
List_Reset(s->TrsfPoints);
if (!strcmp(yyvsp[-1].c, "Right"))
s->Recombine_Dir = 1;
else if (!strcmp(yyvsp[-1].c, "Left"))
s->Recombine_Dir = -1;
else
s->Recombine_Dir = 0;
for(int i = 0; i < k; i++){
double d;
List_Read(yyvsp[-2].l, i, &d);
int j = (int)fabs(d);
Vertex *v = FindPoint(j);
if(!v)
yymsg(WARNING, "Unknown point %d", j);
else
List_Add(s->TrsfPoints, &v);
}
}
}
List_Delete(yyvsp[-2].l);
Free(yyvsp[-1].c);
;
break;}
case 217:
#line 2740 "Gmsh.y"
{
yymsg(WARNING, "Elliptic Surface is deprecated: use Transfinite instead (with smoothing)");
List_Delete(yyvsp[-1].l);
;
break;}
case 218:
#line 2745 "Gmsh.y"
{
Volume *v = FindVolume((int)yyvsp[-4].d);
if(!v)
yymsg(WARNING, "Unknown volume %d", (int)yyvsp[-4].d);
else{
v->Method = TRANSFINI;
int k = List_Nbr(yyvsp[-1].l);
if(k != 6 && k != 8)
yymsg(GERROR, "Wrong definition of Transfinite Volume %d: "
"%d points instead of 6 or 8" , (int)yyvsp[-4].d, k);
else{
List_Reset(v->TrsfPoints);
for(int i = 0; i < k; i++){
double d;
List_Read(yyvsp[-1].l, i, &d);
int j = (int)fabs(d);
Vertex *vert = FindPoint(j);
if(!vert)
yymsg(WARNING, "Unknown point %d", j);
else
List_Add(v->TrsfPoints, &vert);
}
}
}
List_Delete(yyvsp[-1].l);
;
break;}
case 219:
#line 2772 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-3].l); i++){
double d;
List_Read(yyvsp[-3].l, i, &d);
int j = (int)d;
Surface *s = FindSurface(j);
if(s){
s->Recombine = 1;
s->RecombineAngle = (yyvsp[-1].d > 0 && yyvsp[-1].d < 90) ? yyvsp[-1].d : 90;
}
}
List_Delete(yyvsp[-3].l);
;
break;}
case 220:
#line 2786 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[-1].l); i++){
double d;
List_Read(yyvsp[-1].l, i, &d);
int j = (int)d;
Surface *s = FindSurface(j);
if(s){
s->Recombine = 1;
}
}
List_Delete(yyvsp[-1].l);
;
break;}
case 221:
#line 2805 "Gmsh.y"
{
Surface *s = FindSurface((int)yyvsp[-2].d);
if(s)
setSurfaceEmbeddedPoints(s, yyvsp[-7].l);
;
break;}
case 222:
#line 2811 "Gmsh.y"
{
Surface *s = FindSurface((int)yyvsp[-2].d);
if(s)
setSurfaceEmbeddedCurves(s, yyvsp[-7].l);
;
break;}
case 223:
#line 2817 "Gmsh.y"
{
;
break;}
case 224:
#line 2820 "Gmsh.y"
{
;
break;}
case 225:
#line 2829 "Gmsh.y"
{
ReplaceAllDuplicates();
;
break;}
case 226:
#line 2838 "Gmsh.y"
{ yyval.d = yyvsp[0].d; ;
break;}
case 227:
#line 2839 "Gmsh.y"
{ yyval.d = yyvsp[-1].d; ;
break;}
case 228:
#line 2840 "Gmsh.y"
{ yyval.d = -yyvsp[0].d; ;
break;}
case 229:
#line 2841 "Gmsh.y"
{ yyval.d = yyvsp[0].d; ;
break;}
case 230:
#line 2842 "Gmsh.y"
{ yyval.d = !yyvsp[0].d; ;
break;}
case 231:
#line 2843 "Gmsh.y"
{ yyval.d = yyvsp[-2].d - yyvsp[0].d; ;
break;}
case 232:
#line 2844 "Gmsh.y"
{ yyval.d = yyvsp[-2].d + yyvsp[0].d; ;
break;}
case 233:
#line 2845 "Gmsh.y"
{ yyval.d = yyvsp[-2].d * yyvsp[0].d; ;
break;}
case 234:
#line 2847 "Gmsh.y"
{
if(!yyvsp[0].d)
yymsg(GERROR, "Division by zero in '%g / %g'", yyvsp[-2].d, yyvsp[0].d);
else
yyval.d = yyvsp[-2].d / yyvsp[0].d;
;
break;}
case 235:
#line 2853 "Gmsh.y"
{ yyval.d = (int)yyvsp[-2].d % (int)yyvsp[0].d; ;
break;}
case 236:
#line 2854 "Gmsh.y"
{ yyval.d = pow(yyvsp[-2].d, yyvsp[0].d); ;
break;}
case 237:
#line 2855 "Gmsh.y"
{ yyval.d = yyvsp[-2].d < yyvsp[0].d; ;
break;}
case 238:
#line 2856 "Gmsh.y"
{ yyval.d = yyvsp[-2].d > yyvsp[0].d; ;
break;}
case 239:
#line 2857 "Gmsh.y"
{ yyval.d = yyvsp[-2].d <= yyvsp[0].d; ;
break;}
case 240:
#line 2858 "Gmsh.y"
{ yyval.d = yyvsp[-2].d >= yyvsp[0].d; ;
break;}
case 241:
#line 2859 "Gmsh.y"
{ yyval.d = yyvsp[-2].d == yyvsp[0].d; ;
break;}
case 242:
#line 2860 "Gmsh.y"
{ yyval.d = yyvsp[-2].d != yyvsp[0].d; ;
break;}
case 243:
#line 2861 "Gmsh.y"
{ yyval.d = yyvsp[-2].d && yyvsp[0].d; ;
break;}
case 244:
#line 2862 "Gmsh.y"
{ yyval.d = yyvsp[-2].d || yyvsp[0].d; ;
break;}
case 245:
#line 2863 "Gmsh.y"
{ yyval.d = yyvsp[-4].d? yyvsp[-2].d : yyvsp[0].d; ;
break;}
case 246:
#line 2864 "Gmsh.y"
{ yyval.d = exp(yyvsp[-1].d); ;
break;}
case 247:
#line 2865 "Gmsh.y"
{ yyval.d = log(yyvsp[-1].d); ;
break;}
case 248:
#line 2866 "Gmsh.y"
{ yyval.d = log10(yyvsp[-1].d); ;
break;}
case 249:
#line 2867 "Gmsh.y"
{ yyval.d = sqrt(yyvsp[-1].d); ;
break;}
case 250:
#line 2868 "Gmsh.y"
{ yyval.d = sin(yyvsp[-1].d); ;
break;}
case 251:
#line 2869 "Gmsh.y"
{ yyval.d = asin(yyvsp[-1].d); ;
break;}
case 252:
#line 2870 "Gmsh.y"
{ yyval.d = cos(yyvsp[-1].d); ;
break;}
case 253:
#line 2871 "Gmsh.y"
{ yyval.d = acos(yyvsp[-1].d); ;
break;}
case 254:
#line 2872 "Gmsh.y"
{ yyval.d = tan(yyvsp[-1].d); ;
break;}
case 255:
#line 2873 "Gmsh.y"
{ yyval.d = atan(yyvsp[-1].d); ;
break;}
case 256:
#line 2874 "Gmsh.y"
{ yyval.d = atan2(yyvsp[-3].d, yyvsp[-1].d);;
break;}
case 257:
#line 2875 "Gmsh.y"
{ yyval.d = sinh(yyvsp[-1].d); ;
break;}
case 258:
#line 2876 "Gmsh.y"
{ yyval.d = cosh(yyvsp[-1].d); ;
break;}
case 259:
#line 2877 "Gmsh.y"
{ yyval.d = tanh(yyvsp[-1].d); ;
break;}
case 260:
#line 2878 "Gmsh.y"
{ yyval.d = fabs(yyvsp[-1].d); ;
break;}
case 261:
#line 2879 "Gmsh.y"
{ yyval.d = floor(yyvsp[-1].d); ;
break;}
case 262:
#line 2880 "Gmsh.y"
{ yyval.d = ceil(yyvsp[-1].d); ;
break;}
case 263:
#line 2881 "Gmsh.y"
{ yyval.d = fmod(yyvsp[-3].d, yyvsp[-1].d); ;
break;}
case 264:
#line 2882 "Gmsh.y"
{ yyval.d = fmod(yyvsp[-3].d, yyvsp[-1].d); ;
break;}
case 265:
#line 2883 "Gmsh.y"
{ yyval.d = sqrt(yyvsp[-3].d*yyvsp[-3].d+yyvsp[-1].d*yyvsp[-1].d); ;
break;}
case 266:
#line 2884 "Gmsh.y"
{ yyval.d = yyvsp[-1].d*(double)rand()/(double)RAND_MAX; ;
break;}
case 267:
#line 2886 "Gmsh.y"
{ yyval.d = exp(yyvsp[-1].d); ;
break;}
case 268:
#line 2887 "Gmsh.y"
{ yyval.d = log(yyvsp[-1].d); ;
break;}
case 269:
#line 2888 "Gmsh.y"
{ yyval.d = log10(yyvsp[-1].d); ;
break;}
case 270:
#line 2889 "Gmsh.y"
{ yyval.d = sqrt(yyvsp[-1].d); ;
break;}
case 271:
#line 2890 "Gmsh.y"
{ yyval.d = sin(yyvsp[-1].d); ;
break;}
case 272:
#line 2891 "Gmsh.y"
{ yyval.d = asin(yyvsp[-1].d); ;
break;}
case 273:
#line 2892 "Gmsh.y"
{ yyval.d = cos(yyvsp[-1].d); ;
break;}
case 274:
#line 2893 "Gmsh.y"
{ yyval.d = acos(yyvsp[-1].d); ;
break;}
case 275:
#line 2894 "Gmsh.y"
{ yyval.d = tan(yyvsp[-1].d); ;
break;}
case 276:
#line 2895 "Gmsh.y"
{ yyval.d = atan(yyvsp[-1].d); ;
break;}
case 277:
#line 2896 "Gmsh.y"
{ yyval.d = atan2(yyvsp[-3].d, yyvsp[-1].d);;
break;}
case 278:
#line 2897 "Gmsh.y"
{ yyval.d = sinh(yyvsp[-1].d); ;
break;}
case 279:
#line 2898 "Gmsh.y"
{ yyval.d = cosh(yyvsp[-1].d); ;
break;}
case 280:
#line 2899 "Gmsh.y"
{ yyval.d = tanh(yyvsp[-1].d); ;
break;}
case 281:
#line 2900 "Gmsh.y"
{ yyval.d = fabs(yyvsp[-1].d); ;
break;}
case 282:
#line 2901 "Gmsh.y"
{ yyval.d = floor(yyvsp[-1].d); ;
break;}
case 283:
#line 2902 "Gmsh.y"
{ yyval.d = ceil(yyvsp[-1].d); ;
break;}
case 284:
#line 2903 "Gmsh.y"
{ yyval.d = fmod(yyvsp[-3].d, yyvsp[-1].d); ;
break;}
case 285:
#line 2904 "Gmsh.y"
{ yyval.d = fmod(yyvsp[-3].d, yyvsp[-1].d); ;
break;}
case 286:
#line 2905 "Gmsh.y"
{ yyval.d = sqrt(yyvsp[-3].d*yyvsp[-3].d+yyvsp[-1].d*yyvsp[-1].d); ;
break;}
case 287:
#line 2906 "Gmsh.y"
{ yyval.d = yyvsp[-1].d*(double)rand()/(double)RAND_MAX; ;
break;}
case 288:
#line 2915 "Gmsh.y"
{ yyval.d = yyvsp[0].d; ;
break;}
case 289:
#line 2916 "Gmsh.y"
{ yyval.d = 3.141592653589793; ;
break;}
case 290:
#line 2917 "Gmsh.y"
{ yyval.d = ParUtil::Instance()->rank(); ;
break;}
case 291:
#line 2918 "Gmsh.y"
{ yyval.d = ParUtil::Instance()->size(); ;
break;}
case 292:
#line 2919 "Gmsh.y"
{ yyval.d = Get_GmshMajorVersion(); ;
break;}
case 293:
#line 2920 "Gmsh.y"
{ yyval.d = Get_GmshMinorVersion(); ;
break;}
case 294:
#line 2921 "Gmsh.y"
{ yyval.d = Get_GmshPatchVersion(); ;
break;}
case 295:
#line 2926 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[0].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[0].c);
yyval.d = 0.;
}
else
yyval.d = *(double*)List_Pointer_Fast(pSymbol->val, 0);
Free(yyvsp[0].c);
;
break;}
case 296:
#line 2942 "Gmsh.y"
{
char tmpstring[1024];
sprintf(tmpstring, "%s_%d", yyvsp[-4].c, (int)yyvsp[-1].d) ;
Symbol TheSymbol;
TheSymbol.Name = tmpstring;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", tmpstring);
yyval.d = 0.;
}
else
yyval.d = *(double*)List_Pointer_Fast(pSymbol->val, 0);
Free(yyvsp[-4].c);
;
break;}
case 297:
#line 2957 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-3].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-3].c);
yyval.d = 0.;
}
else{
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-1].d)))
yyval.d = *pd;
else{
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-3].c, (int)yyvsp[-1].d);
yyval.d = 0.;
}
}
Free(yyvsp[-3].c);
;
break;}
case 298:
#line 2977 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-2].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-2].c);
yyval.d = 0.;
}
else{
yyval.d = List_Nbr(pSymbol->val);
}
Free(yyvsp[-2].c);
;
break;}
case 299:
#line 2991 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-1].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-1].c);
yyval.d = 0.;
}
else
yyval.d = (*(double*)List_Pointer_Fast(pSymbol->val, 0) += yyvsp[0].i);
Free(yyvsp[-1].c);
;
break;}
case 300:
#line 3004 "Gmsh.y"
{
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-4].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-4].c);
yyval.d = 0.;
}
else{
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-2].d)))
yyval.d = (*pd += yyvsp[0].i);
else{
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-4].c, (int)yyvsp[-2].d);
yyval.d = 0.;
}
}
Free(yyvsp[-4].c);
;
break;}
case 301:
#line 3027 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-2].c))){
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-2].c);
yyval.d = 0.;
}
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[0].c, pNumCat))){
yymsg(GERROR, "Unknown numeric option '%s.%s'", yyvsp[-2].c, yyvsp[0].c);
yyval.d = 0.;
}
else
yyval.d = pNumOpt(0, GMSH_GET, 0);
}
Free(yyvsp[-2].c); Free(yyvsp[0].c);
;
break;}
case 302:
#line 3045 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-5].c))){
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-5].c);
yyval.d = 0.;
}
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[0].c, pNumCat))){
yymsg(GERROR, "Unknown numeric option '%s[%d].%s'", yyvsp[-5].c, (int)yyvsp[-3].d, yyvsp[0].c);
yyval.d = 0.;
}
else
yyval.d = pNumOpt((int)yyvsp[-3].d, GMSH_GET, 0);
}
Free(yyvsp[-5].c); Free(yyvsp[0].c);
;
break;}
case 303:
#line 3063 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-3].c))){
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-3].c);
yyval.d = 0.;
}
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-1].c, pNumCat))){
yymsg(GERROR, "Unknown numeric option '%s.%s'", yyvsp[-3].c, yyvsp[-1].c);
yyval.d = 0.;
}
else
yyval.d = pNumOpt(0, GMSH_SET|GMSH_GUI, pNumOpt(0, GMSH_GET, 0)+yyvsp[0].i);
}
Free(yyvsp[-3].c); Free(yyvsp[-1].c);
;
break;}
case 304:
#line 3081 "Gmsh.y"
{
double (*pNumOpt)(int num, int action, double value);
StringXNumber *pNumCat;
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-6].c))){
yymsg(GERROR, "Unknown numeric option class '%s'", yyvsp[-6].c);
yyval.d = 0.;
}
else{
if(!(pNumOpt = (double (*) (int, int, double))Get_NumberOption(yyvsp[-1].c, pNumCat))){
yymsg(GERROR, "Unknown numeric option '%s[%d].%s'", yyvsp[-6].c, (int)yyvsp[-4].d, yyvsp[-1].c);
yyval.d = 0.;
}
else
yyval.d = pNumOpt((int)yyvsp[-4].d, GMSH_SET|GMSH_GUI, pNumOpt((int)yyvsp[-4].d, GMSH_GET, 0)+yyvsp[0].i);
}
Free(yyvsp[-6].c); Free(yyvsp[-1].c);
;
break;}
case 305:
#line 3099 "Gmsh.y"
{
yyval.d = GetValue(yyvsp[-3].c, yyvsp[-1].d);
Free(yyvsp[-3].c);
;
break;}
case 306:
#line 3107 "Gmsh.y"
{
memcpy(yyval.v, yyvsp[0].v, 5*sizeof(double));
;
break;}
case 307:
#line 3111 "Gmsh.y"
{
for(int i = 0; i < 5; i++) yyval.v[i] = -yyvsp[0].v[i];
;
break;}
case 308:
#line 3115 "Gmsh.y"
{
for(int i = 0; i < 5; i++) yyval.v[i] = yyvsp[0].v[i];
;
break;}
case 309:
#line 3119 "Gmsh.y"
{
for(int i = 0; i < 5; i++) yyval.v[i] = yyvsp[-2].v[i] - yyvsp[0].v[i];
;
break;}
case 310:
#line 3123 "Gmsh.y"
{
for(int i = 0; i < 5; i++) yyval.v[i] = yyvsp[-2].v[i] + yyvsp[0].v[i];
;
break;}
case 311:
#line 3130 "Gmsh.y"
{
yyval.v[0] = yyvsp[-9].d; yyval.v[1] = yyvsp[-7].d; yyval.v[2] = yyvsp[-5].d; yyval.v[3] = yyvsp[-3].d; yyval.v[4] = yyvsp[-1].d;
;
break;}
case 312:
#line 3134 "Gmsh.y"
{
yyval.v[0] = yyvsp[-7].d; yyval.v[1] = yyvsp[-5].d; yyval.v[2] = yyvsp[-3].d; yyval.v[3] = yyvsp[-1].d; yyval.v[4] = 1.0;
;
break;}
case 313:
#line 3138 "Gmsh.y"
{
yyval.v[0] = yyvsp[-5].d; yyval.v[1] = yyvsp[-3].d; yyval.v[2] = yyvsp[-1].d; yyval.v[3] = 0.0; yyval.v[4] = 1.0;
;
break;}
case 314:
#line 3142 "Gmsh.y"
{
yyval.v[0] = yyvsp[-5].d; yyval.v[1] = yyvsp[-3].d; yyval.v[2] = yyvsp[-1].d; yyval.v[3] = 0.0; yyval.v[4] = 1.0;
;
break;}
case 315:
#line 3149 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(List_T*));
List_Add(yyval.l, &(yyvsp[0].l));
;
break;}
case 316:
#line 3154 "Gmsh.y"
{
List_Add(yyval.l, &(yyvsp[0].l));
;
break;}
case 317:
#line 3162 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
List_Add(yyval.l, &(yyvsp[0].d));
;
break;}
case 318:
#line 3167 "Gmsh.y"
{
yyval.l = yyvsp[0].l;
;
break;}
case 319:
#line 3171 "Gmsh.y"
{
// creates an empty list
yyval.l = List_Create(2, 1, sizeof(double));
;
break;}
case 320:
#line 3176 "Gmsh.y"
{
yyval.l = yyvsp[-1].l;
;
break;}
case 321:
#line 3180 "Gmsh.y"
{
yyval.l = yyvsp[-1].l;
for(int i = 0; i < List_Nbr(yyval.l); i++){
double *pd = (double*)List_Pointer(yyval.l, i);
(*pd) = - (*pd);
}
;
break;}
case 322:
#line 3188 "Gmsh.y"
{
yyval.l = yyvsp[-1].l;
for(int i = 0; i < List_Nbr(yyval.l); i++){
double *pd = (double*)List_Pointer(yyval.l, i);
(*pd) *= yyvsp[-4].d;
}
;
break;}
case 323:
#line 3199 "Gmsh.y"
{
yyval.l = yyvsp[0].l;
for(int i = 0; i < List_Nbr(yyval.l); i++){
double *pd = (double*)List_Pointer(yyval.l, i);
(*pd) = - (*pd);
}
;
break;}
case 324:
#line 3207 "Gmsh.y"
{
yyval.l = yyvsp[0].l;
for(int i = 0; i < List_Nbr(yyval.l); i++){
double *pd = (double*)List_Pointer(yyval.l, i);
(*pd) *= yyvsp[-2].d;
}
;
break;}
case 325:
#line 3215 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
for(double d = yyvsp[-2].d; (yyvsp[-2].d < yyvsp[0].d) ? (d <= yyvsp[0].d) : (d >= yyvsp[0].d); (yyvsp[-2].d < yyvsp[0].d) ? (d += 1.) : (d -= 1.))
List_Add(yyval.l, &d);
;
break;}
case 326:
#line 3221 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
if(!yyvsp[0].d || (yyvsp[-4].d < yyvsp[-2].d && yyvsp[0].d < 0) || (yyvsp[-4].d > yyvsp[-2].d && yyvsp[0].d > 0)){
yymsg(GERROR, "Wrong increment in '%g:%g:%g'", yyvsp[-4].d, yyvsp[-2].d, yyvsp[0].d);
List_Add(yyval.l, &(yyvsp[-4].d));
}
else
for(double d = yyvsp[-4].d; (yyvsp[0].d > 0) ? (d <= yyvsp[-2].d) : (d >= yyvsp[-2].d); d += yyvsp[0].d)
List_Add(yyval.l, &d);
;
break;}
case 327:
#line 3232 "Gmsh.y"
{
// Returns the coordinates of a point and fills a list with it.
// This allows to ensure e.g. that relative point positions are
// always conserved
Vertex *v = FindPoint((int)yyvsp[-1].d);
yyval.l = List_Create(3, 1, sizeof(double));
if(!v) {
yymsg(GERROR, "Unknown point '%d'", (int)yyvsp[-1].d);
double d = 0.0;
List_Add(yyval.l, &d);
List_Add(yyval.l, &d);
List_Add(yyval.l, &d);
}
else{
List_Add(yyval.l, &v->Pos.X);
List_Add(yyval.l, &v->Pos.Y);
List_Add(yyval.l, &v->Pos.Z);
}
;
break;}
case 328:
#line 3252 "Gmsh.y"
{
yyval.l = List_Create(List_Nbr(yyvsp[0].l), 1, sizeof(double));
for(int i = 0; i < List_Nbr(yyvsp[0].l); i++){
Shape *s = (Shape*) List_Pointer(yyvsp[0].l, i);
double d = s->Num;
List_Add(yyval.l, &d);
}
List_Delete(yyvsp[0].l);
;
break;}
case 329:
#line 3262 "Gmsh.y"
{
yyval.l = List_Create(List_Nbr(yyvsp[0].l), 1, sizeof(double));
for(int i = 0; i < List_Nbr(yyvsp[0].l); i++){
Shape *s = (Shape*) List_Pointer(yyvsp[0].l, i);
double d = s->Num;
List_Add(yyval.l, &d);
}
List_Delete(yyvsp[0].l);
;
break;}
case 330:
#line 3272 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-2].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-2].c);
double d = 0.0;
List_Add(yyval.l, &d);
}
else{
for(int i = 0; i < List_Nbr(pSymbol->val); i++)
List_Add(yyval.l, (double*)List_Pointer_Fast(pSymbol->val, i));
}
Free(yyvsp[-2].c);
;
break;}
case 331:
#line 3289 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
Symbol TheSymbol;
TheSymbol.Name = yyvsp[-5].c;
Symbol *pSymbol;
if(!(pSymbol = (Symbol*)Tree_PQuery(Symbol_T, &TheSymbol))) {
yymsg(GERROR, "Unknown variable '%s'", yyvsp[-5].c);
double d = 0.0;
List_Add(yyval.l, &d);
}
else{
for(int i = 0; i < List_Nbr(yyvsp[-2].l); i++){
int j = (int)(*(double*)List_Pointer_Fast(yyvsp[-2].l, i));
double *pd;
if((pd = (double*)List_Pointer_Test(pSymbol->val, j)))
List_Add(yyval.l, pd);
else
yymsg(GERROR, "Uninitialized variable '%s[%d]'", yyvsp[-5].c, j);
}
}
Free(yyvsp[-5].c);
List_Delete(yyvsp[-2].l);
;
break;}
case 332:
#line 3316 "Gmsh.y"
{
yyval.l = List_Create(2, 1, sizeof(double));
List_Add(yyval.l, &(yyvsp[0].d));
;
break;}
case 333:
#line 3321 "Gmsh.y"
{
yyval.l = yyvsp[0].l;
;
break;}
case 334:
#line 3325 "Gmsh.y"
{
List_Add(yyval.l, &(yyvsp[0].d));
;
break;}
case 335:
#line 3329 "Gmsh.y"
{
for(int i = 0; i < List_Nbr(yyvsp[0].l); i++){
double d;
List_Read(yyvsp[0].l, i, &d);
List_Add(yyval.l, &d);
}
List_Delete(yyvsp[0].l);
;
break;}
case 336:
#line 3342 "Gmsh.y"
{
yyval.u = CTX.PACK_COLOR((int)yyvsp[-7].d, (int)yyvsp[-5].d, (int)yyvsp[-3].d, (int)yyvsp[-1].d);
;
break;}
case 337:
#line 3346 "Gmsh.y"
{
yyval.u = CTX.PACK_COLOR((int)yyvsp[-5].d, (int)yyvsp[-3].d, (int)yyvsp[-1].d, 255);
;
break;}
case 338:
#line 3358 "Gmsh.y"
{
int flag;
yyval.u = Get_ColorForString(ColorString, -1, yyvsp[0].c, &flag);
if(flag) yymsg(GERROR, "Unknown color '%s'", yyvsp[0].c);
Free(yyvsp[0].c);
;
break;}
case 339:
#line 3365 "Gmsh.y"
{
unsigned int (*pColOpt)(int num, int action, unsigned int value);
StringXColor *pColCat;
if(!(pColCat = Get_ColorOptionCategory(yyvsp[-4].c))){
yymsg(GERROR, "Unknown color option class '%s'", yyvsp[-4].c);
yyval.u = 0;
}
else{
if(!(pColOpt = (unsigned int (*) (int, int, unsigned int))Get_ColorOption(yyvsp[0].c, pColCat))){
yymsg(GERROR, "Unknown color option '%s.Color.%s'", yyvsp[-4].c, yyvsp[0].c);
yyval.u = 0;
}
else{
yyval.u = pColOpt(0, GMSH_GET, 0);
}
}
Free(yyvsp[-4].c); Free(yyvsp[0].c);
;
break;}
case 340:
#line 3387 "Gmsh.y"
{
yyval.l = yyvsp[-1].l;
;
break;}
case 341:
#line 3391 "Gmsh.y"
{
yyval.l = List_Create(256, 10, sizeof(unsigned int));
GmshColorTable *ct = Get_ColorTable((int)yyvsp[-3].d);
if(!ct)
yymsg(GERROR, "View[%d] does not exist", (int)yyvsp[-3].d);
else{
for(int i = 0; i < ct->size; i++)
List_Add(yyval.l, &ct->table[i]);
}
Free(yyvsp[-5].c);
;
break;}
case 342:
#line 3406 "Gmsh.y"
{
yyval.l = List_Create(256, 10, sizeof(unsigned int));
List_Add(yyval.l, &(yyvsp[0].u));
;
break;}
case 343:
#line 3411 "Gmsh.y"
{
List_Add(yyval.l, &(yyvsp[0].u));
;
break;}
case 344:
#line 3418 "Gmsh.y"
{
yyval.c = yyvsp[0].c;
;
break;}
case 345:
#line 3422 "Gmsh.y"
{
Msg(WARNING, "Named string expressions not implemented yet");
;
break;}
case 346:
#line 3429 "Gmsh.y"
{
yyval.c = yyvsp[0].c;
;
break;}
case 347:
#line 3433 "Gmsh.y"
{
yyval.c = (char *)Malloc(32*sizeof(char));
time_t now;
time(&now);
strcpy(yyval.c, ctime(&now));
yyval.c[strlen(yyval.c) - 1] = '\0';
;
break;}
case 348:
#line 3441 "Gmsh.y"
{
yyval.c = (char *)Malloc((strlen(yyvsp[-3].c)+strlen(yyvsp[-1].c)+1)*sizeof(char));
strcpy(yyval.c, yyvsp[-3].c);
strcat(yyval.c, yyvsp[-1].c);
Free(yyvsp[-3].c);
Free(yyvsp[-1].c);
;
break;}
case 349:
#line 3449 "Gmsh.y"
{
yyval.c = (char *)Malloc((strlen(yyvsp[-1].c)+1)*sizeof(char));
int i;
for(i = strlen(yyvsp[-1].c)-1; i >= 0; i--){
if(yyvsp[-1].c[i] == '.'){
strncpy(yyval.c, yyvsp[-1].c, i);
yyval.c[i]='\0';
break;
}
}
if(i <= 0) strcpy(yyval.c, yyvsp[-1].c);
Free(yyvsp[-1].c);
;
break;}
case 350:
#line 3463 "Gmsh.y"
{
yyval.c = (char *)Malloc((strlen(yyvsp[-1].c)+1)*sizeof(char));
int i;
for(i = strlen(yyvsp[-1].c)-1; i >= 0; i--){
if(yyvsp[-1].c[i] == '/' || yyvsp[-1].c[i] == '\\')
break;
}
if(i <= 0)
strcpy(yyval.c, yyvsp[-1].c);
else
strcpy(yyval.c, &yyvsp[-1].c[i+1]);
Free(yyvsp[-1].c);
;
break;}
case 351:
#line 3477 "Gmsh.y"
{
yyval.c = yyvsp[-1].c;
;
break;}
case 352:
#line 3481 "Gmsh.y"
{
char tmpstring[1024];
int i = PrintListOfDouble(yyvsp[-3].c, yyvsp[-1].l, tmpstring);
if(i < 0){
yymsg(GERROR, "Too few arguments in Sprintf");
yyval.c = yyvsp[-3].c;
}
else if(i > 0){
yymsg(GERROR, "%d extra argument%s in Sprintf", i, (i>1)?"s":"");
yyval.c = yyvsp[-3].c;
}
else{
yyval.c = (char*)Malloc((strlen(tmpstring)+1)*sizeof(char));
strcpy(yyval.c, tmpstring);
Free(yyvsp[-3].c);
}
List_Delete(yyvsp[-1].l);
;
break;}
case 353:
#line 3500 "Gmsh.y"
{
char* (*pStrOpt)(int num, int action, char *value);
StringXString *pStrCat;
if(!(pStrCat = Get_StringOptionCategory(yyvsp[-3].c))){
yymsg(GERROR, "Unknown string option class '%s'", yyvsp[-3].c);
yyval.c = (char*)Malloc(sizeof(char));
yyval.c[0] = '\0';
}
else{
if(!(pStrOpt = (char *(*) (int, int, char *))Get_StringOption(yyvsp[-1].c, pStrCat))){
yymsg(GERROR, "Unknown string option '%s.%s'", yyvsp[-3].c, yyvsp[-1].c);
yyval.c = (char*)Malloc(sizeof(char));
yyval.c[0] = '\0';
}
else{
char *str = pStrOpt(0, GMSH_GET, NULL);
yyval.c = (char*)Malloc((strlen(str)+1)*sizeof(char));
strcpy(yyval.c, str);
}
}
;
break;}
case 354:
#line 3522 "Gmsh.y"
{
char* (*pStrOpt)(int num, int action, char *value);
StringXString *pStrCat;
if(!(pStrCat = Get_StringOptionCategory(yyvsp[-6].c))){
yymsg(GERROR, "Unknown string option class '%s'", yyvsp[-6].c);
yyval.c = (char*)Malloc(sizeof(char));
yyval.c[0] = '\0';
}
else{
if(!(pStrOpt = (char *(*) (int, int, char *))Get_StringOption(yyvsp[-1].c, pStrCat))){
yymsg(GERROR, "Unknown string option '%s[%d].%s'", yyvsp[-6].c, (int)yyvsp[-4].d, yyvsp[-1].c);
yyval.c = (char*)Malloc(sizeof(char));
yyval.c[0] = '\0';
}
else{
char *str = pStrOpt((int)yyvsp[-4].d, GMSH_GET, NULL);
yyval.c = (char*)Malloc((strlen(str)+1)*sizeof(char));
strcpy(yyval.c, str);
}
}
;
break;}
}
/* the action file gets copied in in place of this dollarsign */
#line 543 "/usr/share/bison.simple"
yyvsp -= yylen;
yyssp -= yylen;
#ifdef YYLSP_NEEDED
yylsp -= yylen;
#endif
#if YYDEBUG != 0
if (yydebug)
{
short *ssp1 = yyss - 1;
fprintf (stderr, "state stack now");
while (ssp1 != yyssp)
fprintf (stderr, " %d", *++ssp1);
fprintf (stderr, "\n");
}
#endif
*++yyvsp = yyval;
#ifdef YYLSP_NEEDED
yylsp++;
if (yylen == 0)
{
yylsp->first_line = yylloc.first_line;
yylsp->first_column = yylloc.first_column;
yylsp->last_line = (yylsp-1)->last_line;
yylsp->last_column = (yylsp-1)->last_column;
yylsp->text = 0;
}
else
{
yylsp->last_line = (yylsp+yylen-1)->last_line;
yylsp->last_column = (yylsp+yylen-1)->last_column;
}
#endif
/* Now "shift" the result of the reduction.
Determine what state that goes to,
based on the state we popped back to
and the rule number reduced by. */
yyn = yyr1[yyn];
yystate = yypgoto[yyn - YYNTBASE] + *yyssp;
if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp)
yystate = yytable[yystate];
else
yystate = yydefgoto[yyn - YYNTBASE];
goto yynewstate;
yyerrlab: /* here on detecting error */
if (! yyerrstatus)
/* If not already recovering from an error, report this error. */
{
++yynerrs;
#ifdef YYERROR_VERBOSE
yyn = yypact[yystate];
if (yyn > YYFLAG && yyn < YYLAST)
{
int size = 0;
char *msg;
int x, count;
count = 0;
/* Start X at -yyn if nec to avoid negative indexes in yycheck. */
for (x = (yyn < 0 ? -yyn : 0);
x < (sizeof(yytname) / sizeof(char *)); x++)
if (yycheck[x + yyn] == x)
size += strlen(yytname[x]) + 15, count++;
msg = (char *) malloc(size + 15);
if (msg != 0)
{
strcpy(msg, "parse error");
if (count < 5)
{
count = 0;
for (x = (yyn < 0 ? -yyn : 0);
x < (sizeof(yytname) / sizeof(char *)); x++)
if (yycheck[x + yyn] == x)
{
strcat(msg, count == 0 ? ", expecting `" : " or `");
strcat(msg, yytname[x]);
strcat(msg, "'");
count++;
}
}
yyerror(msg);
free(msg);
}
else
yyerror ("parse error; also virtual memory exceeded");
}
else
#endif /* YYERROR_VERBOSE */
yyerror("parse error");
}
goto yyerrlab1;
yyerrlab1: /* here on error raised explicitly by an action */
if (yyerrstatus == 3)
{
/* if just tried and failed to reuse lookahead token after an error, discard it. */
/* return failure if at end of input */
if (yychar == YYEOF)
YYABORT;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]);
#endif
yychar = YYEMPTY;
}
/* Else will try to reuse lookahead token
after shifting the error token. */
yyerrstatus = 3; /* Each real token shifted decrements this */
goto yyerrhandle;
yyerrdefault: /* current state does not do anything special for the error token. */
#if 0
/* This is wrong; only states that explicitly want error tokens
should shift them. */
yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/
if (yyn) goto yydefault;
#endif
yyerrpop: /* pop the current state because it cannot handle the error token */
if (yyssp == yyss) YYABORT;
yyvsp--;
yystate = *--yyssp;
#ifdef YYLSP_NEEDED
yylsp--;
#endif
#if YYDEBUG != 0
if (yydebug)
{
short *ssp1 = yyss - 1;
fprintf (stderr, "Error: state stack now");
while (ssp1 != yyssp)
fprintf (stderr, " %d", *++ssp1);
fprintf (stderr, "\n");
}
#endif
yyerrhandle:
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yyerrdefault;
yyn += YYTERROR;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR)
goto yyerrdefault;
yyn = yytable[yyn];
if (yyn < 0)
{
if (yyn == YYFLAG)
goto yyerrpop;
yyn = -yyn;
goto yyreduce;
}
else if (yyn == 0)
goto yyerrpop;
if (yyn == YYFINAL)
YYACCEPT;
#if YYDEBUG != 0
if (yydebug)
fprintf(stderr, "Shifting error token, ");
#endif
*++yyvsp = yylval;
#ifdef YYLSP_NEEDED
*++yylsp = yylloc;
#endif
yystate = yyn;
goto yynewstate;
yyacceptlab:
/* YYACCEPT comes here. */
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 0;
yyabortlab:
/* YYABORT comes here. */
if (yyfree_stacks)
{
free (yyss);
free (yyvs);
#ifdef YYLSP_NEEDED
free (yyls);
#endif
}
return 1;
}
#line 3545 "Gmsh.y"
void DeleteSymbol(void *a, void *b){
Symbol *s = (Symbol*)a;
Free(s->Name);
List_Delete(s->val);
}
int CompareSymbols (const void *a, const void *b){
return(strcmp(((Symbol*)a)->Name, ((Symbol*)b)->Name));
}
void InitSymbols(void){
if(Symbol_T){
Tree_Action(Symbol_T, DeleteSymbol);
Tree_Delete(Symbol_T);
}
Symbol_T = Tree_Create(sizeof(Symbol), CompareSymbols);
}
int PrintListOfDouble(char *format, List_T *list, char *buffer){
int j, k;
char tmp1[256], tmp2[256];
j = 0;
buffer[j] = '\0';
while(j < (int)strlen(format) && format[j] != '%') j++;
strncpy(buffer, format, j);
buffer[j]='\0';
for(int i = 0; i < List_Nbr(list); i++){
k = j;
j++;
if(j < (int)strlen(format)){
if(format[j] == '%'){
strcat(buffer, "%");
j++;
}
while(j < (int)strlen(format) && format[j] != '%') j++;
if(k != j){
strncpy(tmp1, &(format[k]), j-k);
tmp1[j-k] = '\0';
sprintf(tmp2, tmp1, *(double*)List_Pointer(list, i));
strcat(buffer, tmp2);
}
}
else{
return List_Nbr(list)-i;
}
}
if(j != (int)strlen(format))
return -1;
return 0;
}
int CheckViewErrorFlags(Post_View *v){
if(View->adaptive) return 0; // hope for the best :-)
char *name[8] = { "point", "line", "triangle", "quadrangle",
"tetrahedron", "hexahedron", "prism", "pyramid" };
char *type[3] = { "scalar", "vector", "tensor" };
if(8 * 3 != VIEW_NB_ELEMENT_TYPES){
Msg(GERROR, "Please upgrade CheckViewErrorFlags!");
return 0;
}
for(int i = 0; i < VIEW_NB_ELEMENT_TYPES; i++)
if(ViewErrorFlags[i])
Msg(GERROR, "%d %s %s%s in View[%d] contain%s a wrong number of values",
ViewErrorFlags[i], type[i%3], name[i/3], (ViewErrorFlags[i] > 1) ? "s" : "",
v->Index, (ViewErrorFlags[i] > 1) ? "" : "s");
return 0;
}
void yyerror(char *s){
Msg(GERROR, "'%s', line %d : %s (%s)", yyname, yylineno-1, s, yytext);
yyerrorstate++;
}
void yymsg(int type, char *fmt, ...){
va_list args;
char tmp[1024];
va_start (args, fmt);
vsprintf (tmp, fmt, args);
va_end (args);
Msg(type, "'%s', line %d : %s", yyname, yylineno-1, tmp);
if(type == GERROR) yyerrorstate++;
}