Newer
Older
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
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 4:
{
Msg(PARSER_INFO,"STL File Format");
STL_Surf = Create_Surface(1,MSH_SURF_STL,1);
STL_Surf->STL = new STL_Data;
return 1;
;
break;}
case 5:
{
STL_Surf->STL->Add_Facet( yyvsp[-12].d, yyvsp[-11].d, yyvsp[-10].d,
yyvsp[-8].d, yyvsp[-7].d, yyvsp[-6].d,
yyvsp[-4].d, yyvsp[-3].d, yyvsp[-2].d);
return 1;
;
break;}
case 6:
{
Msg(PARSER_INFO,"STL File Format Read");
Tree_Add(THEM->Surfaces, &STL_Surf);
return 1;
;
break;}
case 9:
{ return 1; ;
break;}
case 10:
{ return 1; ;
break;}
case 11:
{ return 1; ;
break;}
case 12:
{ yyerrok ; return 1; ;
break;}
case 13:
{
Msg(PARSER_INFO,"Step Iso-10303-21 File Format");
Create_Step_Solid_BRep();
;
break;}
case 14:
{
Msg(PARSER_INFO,"Step Iso-10303-21 File Format Read");
Resolve_BREP ();
;
break;}
case 18:
{
;
break;}
case 19:
{
;
break;}
case 20:
{
;
break;}
case 21:
{
Add_Cartesian_Point((int)yyvsp[-8].d,yyvsp[-4].c,yyvsp[-2].v[0],yyvsp[-2].v[1],yyvsp[-2].v[2]);
;
break;}
case 22:
{
Add_BSpline_Curve_With_Knots ((int)yyvsp[-22].d, yyvsp[-18].c, (int) yyvsp[-16].d, yyvsp[-14].l, yyvsp[-6].l, yyvsp[-4].l, 0., 1.);
;
break;}
case 23:
{
Add_BSpline_Surface_With_Knots ((int)yyvsp[-30].d, yyvsp[-26].c, (int) yyvsp[-24].d, (int) yyvsp[-22].d, yyvsp[-20].l, yyvsp[-10].l,
yyvsp[-8].l, yyvsp[-6].l, yyvsp[-4].l, 0., 1., 0., 1. );
;
break;}
case 24:
{
Add_Edge_Curve ((int)yyvsp[-14].d, yyvsp[-10].c , (int)yyvsp[-8].d , (int)yyvsp[-6].d, (int)yyvsp[-4].d);
;
break;}
case 25:
{
Add_Face_Outer_Bound((int)yyvsp[-10].d,yyvsp[-6].c,(int)yyvsp[-4].d,yyvsp[-2].i,1);
;
break;}
case 26:
{
/* La je dois voir la norme ! Face_Bound : trou externe a la surface ! */
Msg(PARSER_INFO,"Found a Face Bound");
Add_Face_Outer_Bound((int)yyvsp[-10].d,yyvsp[-6].c,(int)yyvsp[-4].d,yyvsp[-2].i,0);
;
break;}
case 27:
{
Add_Oriented_Edge((int)yyvsp[-14].d,yyvsp[-10].c,(int)yyvsp[-4].d,yyvsp[-2].i);
;
break;}
case 28:
{
Add_Edge_Loop((int)yyvsp[-8].d,yyvsp[-4].c,yyvsp[-2].l);
;
break;}
case 29:
{
Add_Advanced_Face((int)yyvsp[-12].d,yyvsp[-8].c,yyvsp[-6].l,(int)yyvsp[-4].d,yyvsp[-2].i);
;
break;}
case 30:
{
Add_Vertex_Point((int)yyvsp[-8].d,yyvsp[-4].c,(int)yyvsp[-2].d);
;
break;}
case 31:
{
;
break;}
case 32:
{
Add_Axis2_Placement3D ( (int)yyvsp[-12].d, (int)yyvsp[-4].d, (int)yyvsp[-2].d, (int)yyvsp[-6].d);
;
break;}
case 33:
{
Add_Direction((int)yyvsp[-8].d , yyvsp[-4].c, yyvsp[-2].v[0], yyvsp[-2].v[1], yyvsp[-2].v[2]);
;
break;}
case 34:
{
Add_Plane((int)yyvsp[-8].d,yyvsp[-4].c,(int)yyvsp[-2].d);
;
break;}
case 35:
{
Add_Line ((int)yyvsp[-10].d, yyvsp[-6].c , (int) yyvsp[-4].d, (int)yyvsp[-2].d);
;
break;}
case 36:
{
Msg(PARSER_INFO,"Found a Closed shell");
Add_Closed_Shell((int)yyvsp[-8].d, yyvsp[-4].c , yyvsp[-2].l);
;
break;}
case 37:
{
;
break;}
case 38:
{
;
break;}
case 39:
{
Add_Cylinder ((int)yyvsp[-10].d, yyvsp[-6].c , (int)yyvsp[-4].d, yyvsp[-2].d);
;
break;}
case 40:
{
Add_Cone ((int)yyvsp[-12].d, yyvsp[-8].c , (int)yyvsp[-6].d, yyvsp[-4].d,yyvsp[-2].d);
;
break;}
case 41:
{
Add_Torus ((int)yyvsp[-12].d, yyvsp[-8].c , (int)yyvsp[-6].d, yyvsp[-4].d,yyvsp[-2].d);
;
break;}
case 42:
{
Add_Circle((int) yyvsp[-10].d, yyvsp[-6].c, (int) yyvsp[-4].d, yyvsp[-2].d);
;
break;}
case 43:
{
Add_Ellipsis((int) yyvsp[-12].d, yyvsp[-8].c, (int) yyvsp[-6].d, yyvsp[-4].d, yyvsp[-2].d);
;
break;}
case 44:
{
;
break;}
case 45:
{
;
break;}
case 46:
{
;
break;}
case 47:
{
;
break;}
case 48:
{
;
break;}
case 49:
{
;
break;}
case 50:
{
;
break;}
case 51:
{
;
break;}
case 52:
{
Msg(PARSER_INFO,"Gmsh File Format Read");
;
break;}
case 53:
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
{ return 1; ;
break;}
break;}
break;}
{ return 1; ;
break;}
{ yyerrok; return 1;;
break;}
{
Msg(PARSER_INFO, yyvsp[-4].c, yyvsp[-2].d);
;
break;}
case 68:
{
EndView(1, Force_ViewNumber,yyname,yyvsp[-4].c,0.,0.,0.);
;
break;}
{
EndView(1, Force_ViewNumber,yyname,yyvsp[-6].c,yyvsp[-4].v[0],yyvsp[-4].v[1],yyvsp[-4].v[2]);
;
break;}
{
BeginView(1);
;
break;}
{ List_Add(ActualView->SP, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->SP, &yyvsp[0].d) ; ;
break;}
case 85:
{
List_Add(ActualView->SP, &yyvsp[-5].d); List_Add(ActualView->SP, &yyvsp[-3].d);
List_Add(ActualView->SP, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->VP, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->VP, &yyvsp[0].d) ; ;
break;}
case 89:
{
List_Add(ActualView->VP, &yyvsp[-5].d); List_Add(ActualView->VP, &yyvsp[-3].d);
List_Add(ActualView->VP, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->TP, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->TP, &yyvsp[0].d) ; ;
break;}
case 93:
{
List_Add(ActualView->TP, &yyvsp[-5].d); List_Add(ActualView->TP, &yyvsp[-3].d);
List_Add(ActualView->TP, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->SL, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->SL, &yyvsp[0].d) ; ;
break;}
case 97:
{
List_Add(ActualView->SL, &yyvsp[-11].d); List_Add(ActualView->SL, &yyvsp[-5].d);
List_Add(ActualView->SL, &yyvsp[-9].d); List_Add(ActualView->SL, &yyvsp[-3].d);
List_Add(ActualView->SL, &yyvsp[-7].d); List_Add(ActualView->SL, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->VL, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->VL, &yyvsp[0].d) ; ;
break;}
case 101:
{
List_Add(ActualView->SL, &yyvsp[-11].d); List_Add(ActualView->SL, &yyvsp[-5].d);
List_Add(ActualView->SL, &yyvsp[-9].d); List_Add(ActualView->SL, &yyvsp[-3].d);
List_Add(ActualView->SL, &yyvsp[-7].d); List_Add(ActualView->SL, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->TL, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->TL, &yyvsp[0].d) ; ;
break;}
case 105:
{
List_Add(ActualView->SL, &yyvsp[-11].d); List_Add(ActualView->SL, &yyvsp[-5].d);
List_Add(ActualView->SL, &yyvsp[-9].d); List_Add(ActualView->SL, &yyvsp[-3].d);
List_Add(ActualView->SL, &yyvsp[-7].d); List_Add(ActualView->SL, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->ST, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->ST, &yyvsp[0].d) ; ;
break;}
case 109:
{
List_Add(ActualView->ST, &yyvsp[-17].d); List_Add(ActualView->ST, &yyvsp[-11].d);
List_Add(ActualView->ST, &yyvsp[-5].d);
List_Add(ActualView->ST, &yyvsp[-15].d); List_Add(ActualView->ST, &yyvsp[-9].d);
List_Add(ActualView->ST, &yyvsp[-3].d);
List_Add(ActualView->ST, &yyvsp[-13].d); List_Add(ActualView->ST, &yyvsp[-7].d);
List_Add(ActualView->ST, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->VT, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->VT, &yyvsp[0].d) ; ;
break;}
case 113:
{
List_Add(ActualView->VT, &yyvsp[-17].d); List_Add(ActualView->VT, &yyvsp[-11].d);
List_Add(ActualView->VT, &yyvsp[-5].d);
List_Add(ActualView->VT, &yyvsp[-15].d); List_Add(ActualView->VT, &yyvsp[-9].d);
List_Add(ActualView->VT, &yyvsp[-3].d);
List_Add(ActualView->VT, &yyvsp[-13].d); List_Add(ActualView->VT, &yyvsp[-7].d);
List_Add(ActualView->VT, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->TT, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->TT, &yyvsp[0].d) ; ;
break;}
case 117:
{
List_Add(ActualView->TT, &yyvsp[-17].d); List_Add(ActualView->TT, &yyvsp[-11].d);
List_Add(ActualView->TT, &yyvsp[-5].d);
List_Add(ActualView->TT, &yyvsp[-15].d); List_Add(ActualView->TT, &yyvsp[-9].d);
List_Add(ActualView->TT, &yyvsp[-3].d);
List_Add(ActualView->TT, &yyvsp[-13].d); List_Add(ActualView->TT, &yyvsp[-7].d);
List_Add(ActualView->TT, &yyvsp[-1].d);
;
break;}
{
;
break;}
{ List_Add(ActualView->SS, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->SS, &yyvsp[0].d) ; ;
break;}
case 121:
{
List_Add(ActualView->SS, &yyvsp[-23].d); List_Add(ActualView->SS, &yyvsp[-17].d);
List_Add(ActualView->SS, &yyvsp[-11].d); List_Add(ActualView->SS, &yyvsp[-5].d);
List_Add(ActualView->SS, &yyvsp[-21].d); List_Add(ActualView->SS, &yyvsp[-15].d);
List_Add(ActualView->SS, &yyvsp[-9].d); List_Add(ActualView->SS, &yyvsp[-3].d);
List_Add(ActualView->SS, &yyvsp[-19].d); List_Add(ActualView->SS, &yyvsp[-13].d);
List_Add(ActualView->SS, &yyvsp[-7].d); List_Add(ActualView->SS, &yyvsp[-1].d);
;
break;}
{
ActualView->NbSS++ ;
;
break;}
{ List_Add(ActualView->VS, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->VS, &yyvsp[0].d) ; ;
break;}
case 125:
{
List_Add(ActualView->VS, &yyvsp[-23].d); List_Add(ActualView->VS, &yyvsp[-17].d);
List_Add(ActualView->VS, &yyvsp[-11].d); List_Add(ActualView->VS, &yyvsp[-5].d);
List_Add(ActualView->VS, &yyvsp[-21].d); List_Add(ActualView->VS, &yyvsp[-15].d);
List_Add(ActualView->VS, &yyvsp[-9].d); List_Add(ActualView->VS, &yyvsp[-3].d);
List_Add(ActualView->VS, &yyvsp[-19].d); List_Add(ActualView->VS, &yyvsp[-13].d);
List_Add(ActualView->VS, &yyvsp[-7].d); List_Add(ActualView->VS, &yyvsp[-1].d);
;
break;}
{
ActualView->NbVS++ ;
;
break;}
{ List_Add(ActualView->TS, &yyvsp[0].d) ; ;
break;}
{ List_Add(ActualView->TS, &yyvsp[0].d) ; ;
break;}
case 129:
{
List_Add(ActualView->TS, &yyvsp[-23].d); List_Add(ActualView->TS, &yyvsp[-17].d);
List_Add(ActualView->TS, &yyvsp[-11].d); List_Add(ActualView->TS, &yyvsp[-5].d);
List_Add(ActualView->TS, &yyvsp[-21].d); List_Add(ActualView->TS, &yyvsp[-15].d);
List_Add(ActualView->TS, &yyvsp[-9].d); List_Add(ActualView->TS, &yyvsp[-3].d);
List_Add(ActualView->TS, &yyvsp[-19].d); List_Add(ActualView->TS, &yyvsp[-13].d);
List_Add(ActualView->TS, &yyvsp[-7].d); List_Add(ActualView->TS, &yyvsp[-1].d);
;
break;}
{
ActualView->NbTS++ ;
;
break;}
{
TheSymbol.Name = yyvsp[-3].c;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols))){
TheSymbol.val = List_Create(1,1,sizeof(double));
List_Put(TheSymbol.val, 0, &yyvsp[-1].d);
List_Add(Symbol_L, &TheSymbol);
}
else{
List_Write(pSymbol->val, 0, &yyvsp[-1].d);
}
;
break;}
TheSymbol.Name = yyvsp[-6].c;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols))){
TheSymbol.val = List_Create(5,5,sizeof(double));
List_Put(TheSymbol.val, (int)yyvsp[-4].d, &yyvsp[-1].d);
List_Add(Symbol_L, &TheSymbol);
}
else{
List_Put(pSymbol->val, (int)yyvsp[-4].d, &yyvsp[-1].d);
}
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
else{
*(double*)List_Pointer_Fast(pSymbol->val, 0) += 1.0 ;
}
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-5].c) ;
else{
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-3].d)))
*pd += 1.0 ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-5].c, (int)yyvsp[-3].d) ;
}
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-2].c) ;
*(double*)List_Pointer_Fast(pSymbol->val, 0) -= 1. ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-5].c) ;
else{
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-3].d)))
*pd -= 1.0 ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-5].c, (int)yyvsp[-3].d) ;
}
{
TheSymbol.Name = yyvsp[-3].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-3].c) ;
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) += yyvsp[-1].d ;
#line 791 "Gmsh.y"
{
TheSymbol.Name = yyvsp[-6].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-6].c) ;
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-4].d)))
*pd += yyvsp[-1].d ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-6].c, (int)yyvsp[-4].d) ;
;
break;}
{
TheSymbol.Name = yyvsp[-3].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-3].c) ;
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) -= yyvsp[-1].d ;
;
break;}
{
TheSymbol.Name = yyvsp[-6].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-6].c) ;
3816
3817
3818
3819
3820
3821
3822
3823
3824
3825
3826
3827
3828
3829
3830
3831
3832
3833
3834
3835
3836
3837
3838
3839
3840
3841
3842
3843
3844
3845
3846
3847
3848
3849
3850
3851
3852
3853
3854
3855
3856
3857
3858
3859
3860
3861
3862
3863
3864
3865
3866
3867
3868
3869
3870
3871
3872
3873
3874
3875
3876
3877
3878
3879
3880
3881
3882
3883
3884
3885
3886
3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899
3900
3901
3902
3903
3904
3905
3906
3907
3908
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918
3919
3920
3921
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-4].d)))
*pd -= yyvsp[-1].d ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-6].c, (int)yyvsp[-4].d) ;
}
;
break;}
case 141:
#line 823 "Gmsh.y"
{
TheSymbol.Name = yyvsp[-3].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-3].c) ;
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) *= yyvsp[-1].d ;
;
break;}
case 142:
#line 831 "Gmsh.y"
{
TheSymbol.Name = yyvsp[-6].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-6].c) ;
else{
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-4].d)))
*pd *= yyvsp[-1].d ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-6].c, (int)yyvsp[-4].d) ;
}
;
break;}
case 143:
#line 843 "Gmsh.y"
{
if(!yyvsp[-1].d)
vyyerror("Division by Zero in '%s /= %g'", yyvsp[-3].c, yyvsp[-1].d);
else{
TheSymbol.Name = yyvsp[-3].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-3].c) ;
else
*(double*)List_Pointer_Fast(pSymbol->val, 0) /= yyvsp[-1].d ;
}
;
break;}
case 144:
#line 855 "Gmsh.y"
{
if(!yyvsp[-1].d)
vyyerror("Division by Zero in '%s[%d] /= %g'", yyvsp[-6].c, (int)yyvsp[-4].d, yyvsp[-1].d);
else{
TheSymbol.Name = yyvsp[-6].c ;
if (!(pSymbol = (Symbol*)List_PQuery(Symbol_L, &TheSymbol, CompareSymbols)))
vyyerror("Unknown Variable '%s'", yyvsp[-6].c) ;
else{
if((pd = (double*)List_Pointer_Test(pSymbol->val, (int)yyvsp[-4].d)))
*pd /= yyvsp[-1].d ;
else
vyyerror("Uninitialized Variable '%s[%d]'", yyvsp[-6].c, (int)yyvsp[-4].d) ;
}
}
;
break;}
case 145:
#line 874 "Gmsh.y"
{
if(!(pStrCat = Get_StringOptionCategory(yyvsp[-5].c)))
vyyerror("Unknown String Option Class '%s'", yyvsp[-5].c);
else{
if(!(pStrOpt = Get_StringOption(yyvsp[-3].c, pStrCat)))
vyyerror("Unknown String Option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else{
*pStrOpt = yyvsp[-1].c ;
}
}
;
break;}
case 146:
#line 887 "Gmsh.y"
{
if(strcmp(yyvsp[-10].c, "PostProcessing"))
vyyerror("Unknown View Option Class '%s'", yyvsp[-10].c);
else{
if(!(pStrViewOpt = Get_StringViewOption((int)yyvsp[-6].d, yyvsp[-3].c, &i))){
if(i < 0) vyyerror("PostProcessing View %d does not Exist", (int)yyvsp[-6].d);
else vyyerror("Unknown String Option '%s.View[%d].%s'",
yyvsp[-10].c, (int)yyvsp[-6].d, yyvsp[-3].c);
}
else{
strcpy(pStrViewOpt, yyvsp[-1].c) ;
}
}
;
break;}
case 147:
#line 905 "Gmsh.y"
{
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-5].c)))
vyyerror("Unknown Numeric Option Class '%s'", yyvsp[-5].c);
else{
if(!(pNumOpt = Get_NumberOption(yyvsp[-3].c, pNumCat, &i)))
vyyerror("Unknown Numeric Option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else{
switch(i){
case GMSH_DOUBLE : *(double*)pNumOpt = yyvsp[-1].d ; break ;
case GMSH_FLOAT : *(float*)pNumOpt = (float)yyvsp[-1].d ; break ;
case GMSH_LONG : *(long*)pNumOpt = (long)yyvsp[-1].d ; break ;
case GMSH_INT : *(int*)pNumOpt = (int)yyvsp[-1].d ; break ;
}
}
}
;
break;}
vyyerror("Unknown View Option Class '%s'", yyvsp[-10].c);
else{
if(!(pNumOpt = Get_NumberViewOption((int)yyvsp[-6].d, yyvsp[-3].c, &i))){
if(i < 0) vyyerror("PostProcessing View %d does not Exist", (int)yyvsp[-6].d);
else vyyerror("Unknown Numeric Option '%s.View[%d].%s'",
yyvsp[-10].c, (int)yyvsp[-6].d, yyvsp[-3].c);
}
else{
switch(i){
case GMSH_DOUBLE : *(double*)pNumOpt = yyvsp[-1].d ; break ;
case GMSH_FLOAT : *(float*)pNumOpt = (float)yyvsp[-1].d ; break ;
case GMSH_LONG : *(long*)pNumOpt = (long)yyvsp[-1].d ; break ;
case GMSH_INT : *(int*)pNumOpt = (int)yyvsp[-1].d ; break ;
}
}
}
;
break;}
{
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-5].c)))
vyyerror("Unknown Numeric Option Class '%s'", yyvsp[-5].c);
else{
if(!(pNumOpt = Get_NumberOption(yyvsp[-3].c, pNumCat, &i)))
vyyerror("Unknown Numeric Option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else{
switch(i){
case GMSH_DOUBLE : *(double*)pNumOpt += yyvsp[-1].d ; break ;
case GMSH_FLOAT : *(float*)pNumOpt += (float)yyvsp[-1].d ; break ;
case GMSH_LONG : *(long*)pNumOpt += (long)yyvsp[-1].d ; break ;
case GMSH_INT : *(int*)pNumOpt += (int)yyvsp[-1].d ; break ;
}
}
}
;
break;}
{
vyyerror("Unknown View Option Class '%s'", yyvsp[-10].c);
else{
if(!(pNumOpt = Get_NumberViewOption((int)yyvsp[-6].d, yyvsp[-3].c, &i))){
if(i < 0) vyyerror("PostProcessing View %d does not Exist", (int)yyvsp[-6].d);
else vyyerror("Unknown Numeric Option '%s.View[%d].%s'",
yyvsp[-10].c, (int)yyvsp[-6].d, yyvsp[-3].c);
}
else{
switch(i){
case GMSH_DOUBLE : *(double*)pNumOpt += yyvsp[-1].d ; break ;
case GMSH_FLOAT : *(float*)pNumOpt += (float)yyvsp[-1].d ; break ;
case GMSH_LONG : *(long*)pNumOpt += (long)yyvsp[-1].d ; break ;
case GMSH_INT : *(int*)pNumOpt += (int)yyvsp[-1].d ; break ;
}
}
}
;
break;}
{
if(!(pNumCat = Get_NumberOptionCategory(yyvsp[-5].c)))
vyyerror("Unknown Numeric Option Class '%s'", yyvsp[-5].c);
else{
if(!(pNumOpt = Get_NumberOption(yyvsp[-3].c, pNumCat, &i)))
vyyerror("Unknown Numeric Option '%s.%s'", yyvsp[-5].c, yyvsp[-3].c);
else{