home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / demos / gpc / bifparse.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-02-15  |  76.3 KB  |  2,513 lines
  1.  
  2. # line 12 "bifparse.y"
  3. /*--------------------------------------------------------------------*\
  4. |
  5. |  Copyright (C) 1989,1990, 1991, National Computer Graphics Association
  6. |
  7. |  Permission is granted to any individual or institution to use, copy, or
  8. |  redistribute this software so long as it is not sold for profit, provided
  9. |  this copyright notice is retained.
  10. |
  11. |                         Developed for the
  12. |                National Computer Graphics Association
  13. |                         2722 Merrilee Drive
  14. |                         Fairfax, VA  22031
  15. |                           (703) 698-9600
  16. |
  17. |                                by
  18. |                 SimGraphics Engineering Corporation
  19. |                    1137 Huntington Drive  Unit A
  20. |                      South Pasadena, CA  91030
  21. |                           (213) 255-0900
  22. |---------------------------------------------------------------------
  23. |
  24. | Author        :    mjf / SimGraphics Engineering Corportation
  25. |
  26. | File          :    bifparse.y
  27. | Date          :    Fri Feb  9 10:46:55 PST 1990
  28. | Project       :    PLB
  29. | Description   :    
  30. | Status        :    Version 1.0
  31. |
  32. | Revisions     :    
  33. |
  34. \*--------------------------------------------------------------------*/
  35.  
  36. #include <stdio.h>
  37.  
  38. #ifdef SUN4
  39. #include <strings.h>
  40. #else
  41. #include <string.h>
  42. #endif
  43.  
  44. #include <ctype.h>
  45. #include "bifbuild.h"
  46.  
  47. #define STRLENGTH 80
  48. #define REPEAT_TABLE_SIZE 30
  49.  
  50. #ifndef FALSE
  51. #define FALSE 0
  52. #endif /* ifndef FALSE */
  53. #ifndef TRUE
  54. #define TRUE (!FALSE)
  55. #endif /* ifndef TRUE */
  56.  
  57. #define CB_ERM1 "Additional attempt to set color model ignored"
  58. #define CB_ERM2 "Additional attempt to set buffer mode ignored"
  59. #define CB_ERM3 "Additional attempt to set color mode ignored"
  60. #define CB_ERM4 "Additional attempt to set window size ignored"
  61. #define FAS_ERM1 "Additional VERTEX_COLOR set in FILL_AREA_SET3 ignored."
  62. #define FAS_ERM2 "Additional VERTEX_COLOR_INDICES in FILL_AREA_SET3 ignored."
  63. #define FAS_ERM3 "Additional VERTEX_NORMALS set in FILL_AREA_SET3 ignored."
  64. #define FAS_ERM4 "Additional EDGE_VISIBILITY set in FILL_AREA_SET3 ignored."
  65. #define FAS_ERM5 "Additional FACET_COLORS set in FILL_AREA_SET3 ignored."
  66. #define FAS_ERM6 "Additional FACET_COLOR_INDICES in FILL_AREA_SET3 ignored."
  67. #define FAS_ERM7 "Additional FACET_NORMALS set in FILL_AREA_SET3 ignored."
  68. #define GS_ERM1 "Additional CENTER in GEN_SPHERE3 ignored."
  69. #define GS_ERM2 "Additional RADIUS in GEN_SPHERE3 ignored."
  70. #define GS_ERM3 "Additional SCALE_FACTOR in GEN_SPHERE3 ignored."
  71. #define GC_ERM1 "Additional CENTER in GEN_CIRCLE ignored."
  72. #define GC_ERM2 "Additional RADIUS in GEN_CIRCLE ignored."
  73. #define GC3_ERM1 "Additional CENTER in GEN_CIRCLE3 ignored."
  74. #define GC3_ERM2 "Additional RADIUS in GEN_CIRCLE3 ignored."
  75. #define GC3_ERM3 "Additional NORMAL in GEN_CIRCLE3 ignored."
  76. #define WD3B_error(A) \
  77. { \
  78.   char temp[STRLENGTH]; \
  79.   sprintf(temp,"Additional %s in %s ignored.", A, with_data_name ); \
  80.   yyerror(temp); \
  81. }
  82.                 
  83. typedef char StringType[STRLENGTH];
  84.  
  85. static char *with_data_name;
  86. extern FILE *active_file, *last_file;
  87. extern char filenm[128], last_filenm[128];
  88. extern int lineno,last_lineno;
  89.  
  90.  
  91.  
  92. # line 108 "bifparse.y"
  93. typedef union     {
  94.     long        l;
  95.     double        f;
  96.     StringType    str;
  97.     } YYSTYPE;
  98. #define LONG 257
  99. #define REAL 258
  100. #define QSTRING 259
  101. #define BEGIN_STRUCTURE 260
  102. #define END_STRUCTURE 261
  103. #define LABEL 262
  104. #define MARKER 263
  105. #define MARKER3 264
  106. #define LINE 265
  107. #define LINE3 266
  108. #define POLYGON 267
  109. #define POLYGON3 268
  110. #define FILL_AREA_SET 269
  111. #define FILL_AREA_SET3 270
  112. #define TRIANGLE3 271
  113. #define QUAD_MESH3 272
  114. #define INDEX_POLYGONS3 273
  115. #define GEN_SPHERE3 274
  116. #define GEN_CIRCLE 275
  117. #define GEN_CIRCLE3 276
  118. #define TEXT 277
  119. #define TEXT3 278
  120. #define ANNOTATION_TEXT3 279
  121. #define PIXEL_MAP3 280
  122. #define NON_UNIFORM_BSPLINE_CURVE 281
  123. #define NON_UNIFORM_BSPLINE_SURFACE 282
  124. #define CURVE_APPROXIMATION_CRITERIA 283
  125. #define TRIMCURVE_APPROXIMATION_CRITERIA 284
  126. #define SURFACE_APPROXIMATION_CRITERIA 285
  127. #define MARKER_TYPE 286
  128. #define MARKER_SIZE 287
  129. #define MARKER_COLOR 288
  130. #define MARKER_COLOR_INDEX 289
  131. #define LINE_TYPE 290
  132. #define LINE_WIDTH 291
  133. #define LINE_COLOR 292
  134. #define LINE_COLOR_INDEX 293
  135. #define LINE_SHADING 294
  136. #define INTERIOR_STYLE 295
  137. #define INTERIOR_PATTERN_INDEX 296
  138. #define INTERIOR_COLOR 297
  139. #define INTERIOR_COLOR_INDEX 298
  140. #define BACKFACE_INTERIOR_COLOR 299
  141. #define BACKFACE_INTERIOR_COLOR_INDEX 300
  142. #define INTERIOR_SHADING 301
  143. #define INTERIOR_LIGHTING 302
  144. #define SURFACE_PROPERTIES 303
  145. #define BACKFACE_PROPERTIES 304
  146. #define BACKFACE_PROCESSING 305
  147. #define EDGE_FLAG 306
  148. #define EDGE_TYPE 307
  149. #define EDGE_WIDTH 308
  150. #define EDGE_COLOR 309
  151. #define EDGE_COLOR_INDEX 310
  152. #define TEXT_FONT 311
  153. #define TEXT_PREC 312
  154. #define TEXT_COLOR 313
  155. #define TEXT_COLOR_INDEX 314
  156. #define TEXT_PATH 315
  157. #define TEXT_ALIGN 316
  158. #define CHAR_HEIGHT 317
  159. #define CHAR_EXP 318
  160. #define CHAR_SPACE 319
  161. #define CHAR_UP_VECTOR 320
  162. #define ANNO_TEXT_CHAR_HEIGHT 321
  163. #define ANNO_TEXT_CHAR_UP_VECTOR 322
  164. #define ANNO_TEXT_STYLE 323
  165. #define LIGHT_STATE 324
  166. #define DEPTHCUE_INDEX 325
  167. #define HLHS_REMOVAL 326
  168. #define IDENTITY3 327
  169. #define CONCAT_MATRIX3 328
  170. #define INVERT_MATRIX3 329
  171. #define ROTATE3 330
  172. #define ROTATE_XYZ3 331
  173. #define TRANSLATE3 332
  174. #define SCALE3 333
  175. #define MATRIX3 334
  176. #define GET_MATRIX3 335
  177. #define PUSH_MATRIX3 336
  178. #define POP_MATRIX3 337
  179. #define GLOBAL_TRANSFORMATION3 338
  180. #define LOCAL_TRANSFORMATION3 339
  181. #define APPLY_TO_GLOBAL3 340
  182. #define APPLY_TO_LOCAL3 341
  183. #define VIEW_ORIENTATION3 342
  184. #define VIEW_MAPPING3 343
  185. #define ACTIVE_VIEW 344
  186. #define EXECUTE_STRUCTURE 345
  187. #define CALL_STRUCTURE 346
  188. #define READ_GEOMETRY_FILE 347
  189. #define CLEAR_GEOMETRY 348
  190. #define BEGIN_TEST 349
  191. #define END_TEST 350
  192. #define PAUSE 351
  193. #define SLEEP 352
  194. #define INVOKE_AT_FRAME 353
  195. #define DEFINE_COLOR 354
  196. #define BACKGROUND_COLOR 355
  197. #define BACKGROUND_COLOR_INDEX 356
  198. #define DEFINE_VIEW_SPECIFICATION 357
  199. #define DEFAULT_VIEW_SPECIFICATION 358
  200. #define DEFINE_LIGHT 359
  201. #define DEFINE_DEPTHCUE 360
  202. #define CONFIGURATION 361
  203. #define KNOTS 362
  204. #define CTRL_POINTS 363
  205. #define UKNOTS 364
  206. #define VKNOTS 365
  207. #define TRIMLOOP 366
  208. #define TRIMCURVE 367
  209. #define RATIONAL 368
  210. #define NON_RATIONAL 369
  211. #define IGNORE_GROUP 370
  212. #define VERTEX_COLORS 371
  213. #define VERTEX_NORMALS 372
  214. #define VERTEX_COLOR_INDICES 373
  215. #define FACET_COLORS 374
  216. #define FACET_NORMALS 375
  217. #define FACET_COLOR_INDICES 376
  218. #define VERTEX_COORDINATES 377
  219. #define EDGE_VISIBILITY 378
  220. #define ENABLE 379
  221. #define DISABLE 380
  222. #define STRING 381
  223. #define CHAR 382
  224. #define STROKE 383
  225. #define WORLD 384
  226. #define MODELLING 385
  227. #define AMBIENT_LIGHT 386
  228. #define DIRECTIONAL_LIGHT 387
  229. #define POSITIONAL_LIGHT 388
  230. #define SPOT_LIGHT 389
  231. #define LD_TRANSFORM 390
  232. #define ACTIVATE_LIST 391
  233. #define DEACTIVATE_LIST 392
  234. #define HLHSRID 393
  235. #define HLHS_DISABLE 394
  236. #define HLHS_ENABLE 395
  237. #define MAKE_RAMP 396
  238. #define COLOR_LIST 397
  239. #define RGB 398
  240. #define CIE 399
  241. #define HSV 400
  242. #define HLS 401
  243. #define PRECONCAT 402
  244. #define POSTCONCAT 403
  245. #define REPLACE 404
  246. #define X_AXIS 405
  247. #define Y_AXIS 406
  248. #define Z_AXIS 407
  249. #define PERSPECTIVE 408
  250. #define PARALLEL 409
  251. #define MATCH_VIEW_AREA 410
  252. #define ADJUST_X 411
  253. #define ADJUST_Y 412
  254. #define GROW 413
  255. #define SHRINK 414
  256. #define XY_CLIP 415
  257. #define NO_XY_CLIP 416
  258. #define FRONT_CLIP 417
  259. #define NO_FRONT_CLIP 418
  260. #define BACK_CLIP 419
  261. #define NO_BACK_CLIP 420
  262. #define HOLLOW 421
  263. #define SOLID 422
  264. #define PATTERN 423
  265. #define EMPTY 424
  266. #define VIEW_MAPPING 425
  267. #define VIEW_ORIENTATION 426
  268. #define GLOBAL_MODELLING 427
  269. #define LOCAL_MODELLING 428
  270. #define COMPOSITE_MODELLING 429
  271. #define SPECIFY_REPORT_FILE 430
  272. #define TO 431
  273. #define END 432
  274. #define EXECUTE 433
  275. #define CALL 434
  276. #define WINDOW_SIZE 435
  277. #define DOUBLE_BUFFER 436
  278. #define SINGLE_BUFFER 437
  279. #define TRUE_COLOR 438
  280. #define PSEUDO_COLOR 439
  281. #define FACET_CONNECTIVITY 440
  282. #define EXACT 441
  283. #define CENTER 442
  284. #define RADIUS 443
  285. #define SCALE_FACTORS 444
  286. #define NORMAL 445
  287. #define TEXT_DIRECTION 446
  288. #define ADD 447
  289. #define AND 448
  290. #define CLEAR 449
  291. #define INVERT 450
  292. #define NAND 451
  293. #define NOOP 452
  294. #define NOR 453
  295. #define OR 454
  296. #define SET 455
  297. #define SUBTRACT_DEST 456
  298. #define SUBTRACT_SOURCE 457
  299. #define XOR 458
  300. #define PIXEL_VALUES 459
  301. #define INTENSITY_VALUES 460
  302. #define PIXEL_VALUE_SEGMENTS 461
  303. #define INTENSITY_VALUE_SEGMENTS 462
  304. #define FIRST_FILE 463
  305. #define END_GEOM_FILE 464
  306. #define UNRECOGNIZED_KEYWORD 465
  307. #define yyclearin yychar = -1
  308. #define yyerrok yyerrflag = 0
  309. extern int yychar;
  310. extern short yyerrflag;
  311. #ifndef YYMAXDEPTH
  312. #define YYMAXDEPTH 150
  313. #endif
  314. YYSTYPE yylval, yyval;
  315. # define YYERRCODE 256
  316.  
  317. # line 2323 "bifparse.y"
  318.  
  319.  
  320. /* ------------------------------------------------------------------ */
  321. /* not_repeated is a utility used by entities in yacc to allow        */
  322. /* optional date groups to be specified in any order but to detect   */
  323. /* if an optional group is specified more than once.                  */ 
  324. /*                                                                    */ 
  325. /*  code        < 0:       Reinitialize the repeat_table              */ 
  326. /*  code        > REPEAT_TABLE_SIZE -1: is an error.                  */ 
  327. /*  return_code = FALSE:   The optional group has been repeated       */
  328. /*  return_code = TRUE:    The optional group has not been repeated   */
  329. /* ------------------------------------------------------------------ */
  330. int not_repeated(code)
  331. int code;
  332. {
  333.     int return_code;
  334.     static int repeat_table[REPEAT_TABLE_SIZE];
  335.     int i;
  336.  
  337.     return_code = TRUE;
  338.     if (code < 0)
  339.     {
  340.         for(i=0;i<REPEAT_TABLE_SIZE;i++)
  341.             repeat_table[i]=TRUE;
  342.     }
  343.     else if (code > REPEAT_TABLE_SIZE-1)
  344.     {
  345.        yyerror
  346.        ("Program error:  Attempt to index beyond end of repeat_table.");
  347.        yyerror
  348.        ("             :  Entity option has been ignored.");
  349.         return_code = FALSE;
  350.     }
  351.     else
  352.     {
  353.         if(repeat_table[code])  repeat_table[code] = FALSE;
  354.         else   return_code = FALSE;
  355.     }
  356.     return(return_code);
  357. }
  358. short yyexca[] ={
  359. -1, 1,
  360.     0, -1,
  361.     -2, 0,
  362. -1, 2,
  363.     260, 444,
  364.     -2, 445,
  365.     };
  366. # define YYNPROD 460
  367. # define YYLAST 1672
  368. short yyact[]={
  369.  
  370.  336, 724, 325, 590, 750, 344, 335, 232, 526, 558,
  371.  557, 324, 562, 561, 327, 423, 467, 560, 559, 804,
  372.  805, 806, 807,   5, 327, 666, 333, 338, 477, 949,
  373.  870, 676, 826, 581, 685, 972, 534, 107, 108, 109,
  374.  110, 111, 112, 113, 114, 115, 116, 117, 118, 119,
  375.  120, 121, 122, 123, 124, 125, 126, 127, 128, 129,
  376.  130, 131, 132, 133, 134, 135, 136, 137, 138, 139,
  377.  140, 141, 142, 143, 144, 145, 146, 147, 148, 149,
  378.  150, 151, 152, 153, 154, 155, 156, 157, 158, 159,
  379.  160, 161, 162, 163, 164, 165, 166, 167, 168, 169,
  380.  170, 171, 172, 173, 174, 175, 176, 177, 178, 179,
  381.  180, 181, 182, 183, 184, 185, 186, 187, 188, 189,
  382.  190, 191, 857, 226, 229, 230, 231, 745, 536, 705,
  383.  706, 767, 768, 240, 241, 235, 402, 244, 245, 249,
  384.  250, 251, 252, 254, 577, 256, 699, 700, 822, 260,
  385.  261, 620, 621, 979, 266, 267, 527, 528, 751, 273,
  386.  505, 506, 507, 277, 278, 279, 280, 281, 282, 551,
  387.  737, 738, 739, 740, 741, 742, 743, 744, 746, 747,
  388.  748, 749, 415, 416, 417, 418, 419,1020,1021,1022,
  389. 1023, 424, 425, 426, 286, 287, 771, 772, 773, 774,
  390.  316, 270, 271, 272, 208, 871, 445, 444, 263, 264,
  391.  233, 234, 978, 334, 201, 334, 204, 334, 765, 914,
  392.  915, 916, 656, 327, 802,   4, 977, 352, 696, 209,
  393.  353, 354, 355, 909, 587, 466, 520, 358, 359, 360,
  394.  192, 337, 363, 340, 639, 341, 367, 463, 346, 878,
  395.  348, 876, 460, 481, 457, 372, 832, 374, 830, 228,
  396.  227, 378, 379, 434, 829, 722, 827, 311, 385, 714,
  397. 1003, 713, 900, 654, 391, 775, 703, 682, 627, 437,
  398.  679, 398, 626, 400, 591,   3, 589, 525, 572, 486,
  399.  450, 446, 409, 410, 411, 412, 442, 407, 394, 637,
  400.  420, 421, 380, 996, 427, 428, 953, 357, 356, 349,
  401.  347, 930, 904, 322, 320, 556, 439, 440, 319, 318,
  402.  443, 317, 881, 877, 831, 828, 756, 448, 315, 313,
  403.  307, 306, 305, 304, 458, 459, 461, 462, 458, 303,
  404.  302, 458, 102, 301, 228, 227, 465, 296, 295, 294,
  405.  293, 292, 291, 453, 482, 483, 484, 290, 228, 227,
  406.  289, 489, 288, 474, 490, 228, 227, 432, 491, 285,
  407.  283, 276, 275, 492, 274, 493, 269, 268, 265, 494,
  408.  495, 228, 227, 228, 227, 262, 497, 259, 228, 227,
  409.  228, 227, 498, 258, 257, 981, 228, 227, 228, 227,
  410.  255, 228, 227, 228, 227, 228, 227, 667, 668, 669,
  411.  670, 508, 509, 510, 511, 582, 583, 584, 677, 585,
  412. 1043, 513, 514, 503, 253, 247, 246, 243, 516, 517,
  413.  512, 228, 227, 228, 227, 755, 242, 239, 755, 522,
  414.  523, 524, 105, 931, 755, 228, 227, 531, 238, 237,
  415.  228, 227, 228, 227, 755, 755, 755, 755, 755, 548,
  416.  236, 225, 549, 550, 224, 223, 461, 537, 538, 539,
  417.  540, 334, 221, 533, 553, 552, 628, 438, 211,1042,
  418.  571, 554,1041, 555, 588, 790, 790, 879, 875, 471,
  419. 1033, 874, 323,1028,1016, 597, 598, 568, 790, 471,
  420.  873, 872,1014, 573, 545, 541, 542, 543, 544, 604,
  421.  605, 606, 607,1012, 609, 610,1011, 611, 612, 790,
  422.  603, 791, 973, 616, 617, 968, 578, 579, 580, 961,
  423.  956, 623, 624, 615, 554, 563, 555, 564, 566, 565,
  424.  955, 664, 944, 943, 925, 906, 905, 885, 884, 209,
  425.  629, 846, 844, 331, 814, 799, 647, 649, 648, 651,
  426.  653, 652, 797, 650, 762, 761,1025,1018, 334, 458,
  427.  468,1017, 461, 990, 987, 983, 638, 554, 563, 555,
  428.  564, 566, 565, 976, 659, 658, 970, 663, 662, 678,
  429.  655, 681, 661, 660, 636, 969, 952, 951, 683, 684,
  430.  554, 563, 555, 564, 566, 565, 950, 917, 690, 887,
  431.  691, 692, 693, 694, 866, 858, 853, 697, 448, 725,
  432.  687, 688, 689, 345, 701, 702, 695, 554, 563, 555,
  433.  564, 566, 565, 825, 469, 824, 823, 458, 816, 461,
  434.  815, 789, 788, 787, 786, 785, 784, 783, 782, 734,
  435.  728, 727, 726, 330, 712, 711, 710, 709, 708, 707,
  436.  675, 674, 673, 672, 671, 665, 601, 530, 471, 413,
  437.  343, 300, 729, 730, 731, 732, 733, 299,1048, 735,
  438. 1047,1044, 986, 982, 753, 754, 975, 962, 958, 942,
  439.  940, 760, 932, 891, 763, 890, 865, 852, 448, 850,
  440.  759, 758, 769, 764, 757, 686, 625, 622, 618, 613,
  441.  608, 602, 600, 599, 776, 596, 778, 779, 595, 781,
  442.  594, 593, 592, 586, 546, 535, 529, 793, 794, 795,
  443.  796, 518, 798, 515, 800, 801, 501, 500, 499, 496,
  444.  488, 487, 447, 777, 441, 436, 780, 435, 431, 430,
  445.  429, 422, 408, 406, 811, 812, 810, 405, 404, 403,
  446.  401, 399, 397, 396, 817, 818, 395, 819, 393, 392,
  447.  820, 390, 389, 388, 387, 386, 384, 461, 383, 461,
  448.  461, 382, 461, 381, 377, 834, 376, 836, 833, 375,
  449.  835, 840, 373, 837, 843, 839, 845, 371, 370, 847,
  450.  369, 848, 849, 368, 366, 365, 364, 362, 361, 332,
  451.  312, 681, 855, 856, 310, 298, 859, 860, 861, 862,
  452.  863, 864, 838, 297, 867, 868, 869, 842, 451, 328,
  453.  821, 770, 321, 314, 547, 614, 521, 519, 461, 433,
  454.  461, 309, 308, 971, 882, 957, 883, 967, 892, 813,
  455.  886, 502, 284, 934, 933,1024,1009, 888, 980, 893,
  456.  894, 895, 896, 897, 898, 899, 966, 935, 901, 902,
  457.  903, 913, 912, 911, 910, 889, 880, 854, 752, 809,
  458.  808, 680, 485, 963, 948, 908, 851, 907, 480, 681,
  459.  351, 479, 350, 576, 918, 919, 920, 921, 922, 923,
  460.  924, 478, 926, 927, 928, 575, 723, 657, 929, 574,
  461.  476, 222, 475, 220, 721, 720, 719, 718, 717, 937,
  462.  938, 939, 716, 941, 715, 646, 645, 644, 945, 946,
  463.  947, 643, 642, 641, 640, 570, 472, 219, 954, 569,
  464.  473, 567, 470, 841, 792, 342, 959, 960, 218, 635,
  465.  634, 633, 936, 632, 964, 965, 631, 630, 339, 217,
  466.  216, 974, 464, 215, 214, 681, 681, 213, 212, 104,
  467.  984, 985, 103, 101, 100, 988,  99,  98,  97,  96,
  468.   95,  94,  93,  92, 991, 992, 993,  91, 994, 995,
  469.   90,  89, 998, 999,1000,1001,1002,  88, 997,1004,
  470. 1005,1006,1007,1008,  87,1010,  86,  85,1013,  84,
  471.   83, 989,  82,1015,  81,  80, 681,  79,1026,1027,
  472.   78,  77,  76,  75,  74,  73,1030,1031,1032,1029,
  473.   72,1034,1035,1036,  71,1037,1038,1039,1040,  70,
  474.   69,  68,  67,  66,  65,  64,  63,  62,  61,  60,
  475.   59,  58,  57,  56,  55,  54,  53,  52,1045,1046,
  476.  107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
  477.  117, 118, 119, 120, 121, 122, 123, 124, 125, 126,
  478.  127, 128, 129, 130, 131, 132, 133, 134, 135, 136,
  479.  137, 138, 139, 140, 141, 142, 143, 144, 145, 146,
  480.  147, 148, 149, 150, 151, 152, 153, 154, 155, 156,
  481.  157, 158, 159, 160, 161, 162, 163, 164, 165, 166,
  482.  167, 168, 169, 170, 171, 172, 173, 174, 175, 176,
  483.  177, 178, 179, 180, 181, 182, 183, 184, 185, 186,
  484.  187, 188, 189, 190, 191, 193, 194, 205,  51, 196,
  485.  197,  50, 198, 199, 200, 201, 202, 204, 203,  49,
  486.   48,  47,  46,  45,  44,  43,  42,  41,  40,  39,
  487.   38,  37,  36,  35,  34,  33,  32,  31,  30,  29,
  488.   28,  27,  26,  25,  24,  23,  22,  21,  20,  19,
  489.   18,  17,  16,  15,  14,  13,  12,  11,  10,   9,
  490.    8, 454, 452, 329, 210, 106, 532, 449, 326,   7,
  491.    6, 207, 206, 736, 803, 704, 248, 766, 698, 619,
  492. 1019, 504, 414,   1,   0,   0,   0,   0, 195,   0,
  493.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  494.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  495.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  496.    0,   2,   0, 192, 107, 108, 109, 110, 111, 112,
  497.  113, 114, 115, 116, 117, 118, 119, 120, 121, 122,
  498.  123, 124, 125, 126, 127, 128, 129, 130, 131, 132,
  499.  133, 134, 135, 136, 137, 138, 139, 140, 141, 142,
  500.  143, 144, 145, 146, 147, 148, 149, 150, 151, 152,
  501.  153, 154, 155, 156, 157, 158, 159, 160, 161, 162,
  502.  163, 164, 165, 166, 167, 168, 169, 170, 171, 172,
  503.  173, 174, 175, 176, 177, 178, 179, 180, 181, 182,
  504.  183, 184, 185, 186, 187, 188, 189, 190, 191, 193,
  505.  194, 205,   0, 196, 197,   0, 198, 199, 200, 201,
  506.  202, 204, 203,   0,   0,   0,   0,   0,   0,   0,
  507.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  508.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  509.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  510.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  511.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  512.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  513.    0,   0, 195,   0,   0,   0,   0,   0,   0,   0,
  514.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  515.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  516.    0,   0,   0,   0,   0,   0,   0, 192, 107, 108,
  517.  109, 110, 111, 112, 113, 114, 115, 116, 117, 118,
  518.  119, 120, 121, 122, 123, 124, 125, 126, 127, 128,
  519.  129, 130, 131, 132, 133, 134, 135, 136, 137, 138,
  520.  139, 140, 141, 142, 143, 144, 145, 146, 147, 148,
  521.  149, 150, 151, 152, 153, 154, 155, 156, 157, 158,
  522.  159, 160, 161, 162, 163, 164, 165, 166, 167, 168,
  523.  169, 170, 171, 172, 173, 174, 175, 176, 177, 178,
  524.  179, 180, 181, 182, 183, 184, 185, 186, 187, 188,
  525.  189, 190, 191,   0,   0,   0, 455,   0,   0, 456,
  526.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  527.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  528.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  529.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  530.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  531.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  532.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  533.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  534.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  535.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  536.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  537.    0, 192 };
  538. short yypact[]={
  539.  
  540.  798,-1000,-157,1002,-1000,-1000,-1000,-1000,-1000,-1000,
  541. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  542. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  543. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  544. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  545. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  546. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  547. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  548. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  549. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  550. -1000,-1000,-1000,-1000,-1000,-1000,-1000, 221,-1000,-1000,
  551. -1000,-1000,-1000,-1000,-1000,-1000,-1000, 215,-1000, 208,
  552.  207, 204,   2,   2,   2,   2,-158,-158, 203, 192,
  553.  191, 180,   2,   2, 179, 170,   2,   2, 169, 168,
  554. -282, 167,   2, 143,   2, 137, 136, 130,   2,   2,
  555.  128,-171, 121,   2,   2, 120, 119,-180,   2, 117,
  556.  115, 114,   2,   2,   2,   2,   2,   2, 113,-1000,
  557.  112,-200, 105, 103, 100,  95,  94,  93,  92,  91,
  558.   90, 764, 756, 554, 548,  86,  83,  82,  76,  75,
  559.   74,  73,-1000,-1000, 755,   8, 751,  72,  71,   2,
  560.   64,  62,  61,  57,-1000,  56,1002, -37,-1000,-1000,
  561. -143, 750,   2,   2,   2,-1000,   2,-1000, 547, 500,
  562. -1000,  53,-1000,  52,-1000,-1000,   2,-1000,-1000,   2,
  563.    2,   2,  51,-1000,-1000,  50,   2,   2,   2, 749,
  564.  748,   2, 747, 746, 745,   2, 744, 741, 739,-1000,
  565. -1000,-1000,-1000, 738,   2, 733,   2, 730, 727, 725,
  566.    2,   2,  45, 724, 722, 719, 717,   2, 716, 715,
  567.  714, 713, 712,   2, 710, 709,  41, 707, 704, 703,
  568.    2, 702,   2, 701,-255, 700, 699, 698, 694,  40,
  569.  693,   2,   2,   2,   2, 546,-243,-1000,-1000,   2,
  570.    2, 692,-211,   2,   2, 691, 690, 689, 111,   4,
  571. -1000, 688,-1000, 686, 220,   2,   2, 685,  39,   2,
  572. -173,  34, 683,1002, -37,-1000,-1000,  33,-1000,1206,
  573. -1000,-1000,-1000, 195,   2, 193,   2, 188,-1000,   2,
  574.  176,-1000, 511,-1000, 545,-1000,-1000,-1000,-412,-1000,
  575. -1000,-1000,  -6,   2,   2,   2,-1000,  32, 682, 681,
  576.    2,-1000,-1000,   2,-1000,-1000,-1000,   2,-1000,-1000,
  577. -1000,-1000,   2,-1000,   2,-1000,-1000,-1000,   2,   2,
  578.  680,-1000,-1000,-1000,-1000,   2,-1000,-1000,-1000,-1000,
  579. -1000,   2,-1000,-1000, 679,-1000,-1000,-1000, 678,-1000,
  580.  677,-1000,-1000,-1000,-1000,-1000,-1000,-211,-1000,-245,
  581.    2,   2,   2,   2,-211,-1000,-1000,-1000,-1000,-1000,
  582.    2,   2,-1000, 674,-1000,-1000,-1000,   2,   2,-1000,
  583. -1000,-1000, 672, -23,-1000,-1000,-1000,-1000,   2,   2,
  584.    2,-1000,  30,-252, 667, 544,   2,-1000,-1000,-225,
  585.  666,  69,-1000,-1000,-1000, 665,-1000,-1000,   2,-1000,
  586. -1000,   2,   2,-1000, 110,   2,-1000, 256,-1000,-1000,
  587.    2,-1000,-1000,   2, 229,-1000,-1000,-1000,-1000,  85,
  588.  -26, 664, -25,   2,  29,-1000,  27,-1000,-1000, 663,
  589.  662, 661, 659, 656,   2,   2,-1000, 654, 653,-1000,
  590. -1000,-1000, 543, 652,-211,-1000,-1000,-1000,   2,   2,
  591.    2,   2, 651,   2,   2,-1000,   2,   2,-1000, 650,
  592. -1000, -37,   2,   2, 649,-264, 648,-1000,-1000,-1000,
  593.    2,   2,-1000,-1000, 647,-1000,-1000,-1000,-1000,-1000,
  594. -1000,-1000,-1000,-1000,-1000,  25,-1000, 219,-1000,   2,
  595. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  596. -1000,-1000,-1000,-1000,-1000,-1000,-1000,   2, 174,   2,
  597.  185, 148,-1000,-1000, 163, 542, -34,-1000,-1000, 541,
  598.  540,-1000,-1000, 539, 538, 537,-1000, -28,   2,  23,
  599.    2,  20,-1000,-1000,-1000,-1000,-1000,   2,   2,-1000,
  600. -1000,-1000,-1000, 646,-211,-211,-211,   2,-1000,   2,
  601.    2,   2,   2,-1000, -37,-236,   2,-1000,-1000,-271,
  602. -1000,-1000,-1000,   2,   2,-1000,  19,-1000,-304,-1000,
  603.  536, 535, 534, 533, 532, 531, 146,-1000, 144,-1000,
  604. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  605. -1000,-1000,-1000,-1000,-1000, 206,-1000,-1000,-1000,-1000,
  606. -1000,-1000,-1000,-1000,-1000, 496,-1000,-1000, 529, 528,
  607.  527,   2,   2,   2,   2,   2,-1000, 526,   2,-277,
  608. -204,-1000,-1000,   2,   2, 201,-1000, 645, 642, 641,
  609.    2, 440, 439,   2,-252,-246,-1000,-1000,-288,-1000,
  610. -1000,   2,-190,-1000,  18,-1000,-1000,   2,-1000,   2,
  611.    2,-1000,   2,-1000,-1000, 525, 524, 523, 522, 521,
  612.  520, 519,-1000, 518, 396,-1000,   2,   2,   2,   2,
  613.  437,   2, 430,   2,   2, -35,-440,-1000,-1000,-1000,
  614. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  615. -1000,-1000,-1000,   2,   2,-1000,-1000,-1000,-1000,-1000,
  616.  429, 517, 515,   2,   2,-1000,   2,-1000,-1000,   2,
  617. -242,-1000, 513, 512, 510,-399, 141, 200, 139, 133,
  618.  199, 131, 500, 496, 500, 496,   2,-1000,   2, 496,
  619. -1000,-1000,-1000,   2, 427,   2, 426,-1000,   2,-1000,
  620.    2,   2, 640,-1000,-1000,-1000,-1000,-1000, 638, 493,
  621.    2,   2,   2,-270, 492,   2,   2,   2,   2,   2,
  622.    2, 637, 491,   2,   2,   2,-227,-1000,-1000,-1000,
  623. -1000,-1000,-1000, 376, 375, 366, 363, 126, 198, 124,
  624.  362,-1000, 197,   2,-1000,   2,-1000, 423, 422,   2,
  625. -1000, 486,-1000,-1000,-1000, 636, 634,-1000,   2,   2,
  626.    2,   2,   2,   2,   2,-1000,  15,   2,   2,   2,
  627. -1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,
  628.  187,-1000, 421, 420,-1000,-1000,   2,-1000, 108,-145,
  629. -1000,-1000, 484,   2,   2,   2,   2,   2,   2,   2,
  630.  419,   2,   2,   2,-1000,-1000,-1000,   2, 186,-1000,
  631.  633,-1000,-1000,-1000,-1000,-1000,-1000,-1000,   2,   2,
  632.    2, 631,   2, 630, 418,-1000, 417,   2,   2,   2,
  633. -410,-1000,-1000, 483, 474, 473, 181,   2, 415, 405,
  634. -1000,-1000,-1000, 629,-1000,   2,   2, 404, 628,-1000,
  635. -1000,-1000,-1000,-1000, 400, 472, 463,-375,-1000, 397,
  636.    2, 627,-1000, 460, 101,  87,  28, 624, 452,   2,
  637.    2, 623, 451,-1000,   2,-1000,-1000,-1000,-1000,-1000,
  638. -1000, 450,-1000,   2,   2,   2,-1000,   2,   2, 178,
  639. -158,   2,   2,   2,   2,   2,-1000,  13,   2,   2,
  640.    2,   2,   2,-1000,   2, 391, 388,   2, 377,-1000,
  641.  369, 448, 444,-224,-1000,   2, 443,   2,   2, 368,
  642. -1000,-1000,-1000,-1000,-204,   2,   2,   2,-1000, 365,
  643.    2,   2,   2,-1000,   2,   2,   2,   2, 357, 354,
  644.  295, 622,-211,-211,-1000, 621, 619,-1000,-1000 };
  645. short yypgo[]={
  646.  
  647.    0,1223,   0,   7,  15,1222,1221,   8,1220,1219,
  648. 1218,1217,1216,1215,1214,1213,1212, 285,1211,  11,
  649.  225,   2,  23,1210,1209,1208,1207,1206,1205,1204,
  650. 1203,1202, 442, 342,1201,1200,1199,1198,1197,1196,
  651. 1195,1194,1193,1192,1191,1190,1189,1188,1187,1186,
  652. 1185,1184,1183,1182,1181,1180,1179,1178,1177,1176,
  653. 1175,1174,1173,1172,1171,1170,1169,1168,1167,1166,
  654. 1165,1164,1163,1162,1161,1160,1159,1151,1148,1057,
  655. 1056,1055,1054,1053,1052,1051,1050,1049,1048,1047,
  656. 1046,1045,1044,1043,1042,1041,1040,1039,1034,1030,
  657. 1025,1024,1023,1022,1021,1020,1017,1015,1014,1012,
  658. 1010,1009,1007,1006,1004, 997, 991, 990, 987, 983,
  659.  982, 981, 980, 979, 978, 977, 976, 974, 973, 972,
  660.  969, 968,  26, 967,   6,  34, 964, 963,  27, 962,
  661.   10,   9, 960, 959,  16, 958,  18,  17,  13,  12,
  662.  957, 956, 953, 951, 950, 949, 948, 945,   1, 944,
  663.  943, 942, 941,   5, 940, 939, 937, 936, 935, 934,
  664.  933, 932, 931, 927, 926, 925, 924, 922, 918, 917,
  665.  916, 915, 914, 913, 912, 911, 910, 909, 907, 906,
  666.  905, 901, 893, 892, 891, 890, 888, 886, 885, 884,
  667.  883, 882,   3, 881,   4, 880, 879, 878, 877, 875,
  668.  874, 873, 872, 871, 867, 866, 858, 856, 855, 854,
  669.  853, 852, 851, 849, 848, 847, 845, 843, 842, 841,
  670.  839, 837, 836, 835, 834, 833, 832, 831, 830, 829,
  671.  828 };
  672. short yyr1[]={
  673.  
  674.    0,   1,   1,   1,   1,  17,  17,  19,  19,  20,
  675.   20,  20,  21,  25,  26,  26,  27,  24,  28,  29,
  676.   29,  29,  30,  30,  30,  31,  22,  22,  22,  22,
  677.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  678.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  679.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  680.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  681.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  682.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  683.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  684.   22,  22,  22,  22,  22,  22,  22,  22,  22,  22,
  685.   22,  22,  23,  23,  23,  23,  23,  23,  23,  23,
  686.   23,  23,  23,  23,  35, 131,  36, 133,  37, 132,
  687.  132, 134, 134, 135, 135, 136,  38, 137,  39, 139,
  688.  139, 139, 142,  40, 143,  41, 145, 138, 144, 144,
  689.  144, 144, 144, 144, 144, 150, 140, 151, 141, 152,
  690.  146, 153, 147, 154, 148, 155, 149, 156,  42, 159,
  691.  158, 160, 158, 161, 157, 162, 157, 164, 163, 165,
  692.  163, 166, 167,  43, 168, 168, 168, 168, 168, 168,
  693.  168, 168, 176, 169, 177, 170, 178, 171, 179, 172,
  694.  180, 173, 181, 174, 182, 175, 183,  44, 184,  45,
  695.  185,  46, 187, 187, 187, 187, 187, 187, 187, 187,
  696.  189, 188, 190, 186, 191,  47, 192, 192, 192, 192,
  697.  192, 193,  48, 194, 194, 194, 194, 195,  49, 196,
  698.  196, 196, 196, 196,  50,  51,  51,  52, 197,  53,
  699.   15,  15,  15,  15,  15,  15,  15,  15,  15,  15,
  700.   15,  15,  15,  15,  14,  14,  14,  14, 198, 198,
  701.  199, 200, 199, 201, 203, 205,  54, 204, 206, 204,
  702.    3,   3, 202, 202, 207, 208, 210,  55, 209, 209,
  703.  209, 209, 214, 213, 215, 215, 217, 218, 216, 219,
  704.  211, 220, 212,  56,  57,  58,  59,  60,  61,  62,
  705.   63,  64,  65,  66,  67,  68,  12,  12,  12,  12,
  706.   69,  70,  71,  72,  73,  74,  75,  76,  77,  78,
  707.   79,  79,  80,  81,  82,  83,  84,  85,  85,  85,
  708.   86,  87,  88,  89,  90,  91,  92,  93,  94,  95,
  709.   96, 221, 222, 223, 224, 225,  97,  98,  99,  99,
  710.  100, 101,   4,   4,   4, 102, 103,   6,   6,   6,
  711.  104, 105, 106, 107, 108,   5,   5,   5,   5,   5,
  712.  109, 110, 111, 112, 113, 114, 115, 226, 116,   7,
  713.    7, 227, 227,   8,   8,   8,   8, 117, 118, 119,
  714.  228, 120, 229, 231, 121, 232, 230, 233, 230, 122,
  715.  123, 124, 125,  34, 234, 234, 234, 234,  13,  13,
  716.  126, 235, 235, 127, 128,  33,   9,   9,  10,  10,
  717.   11,  11, 129, 236,  32, 237, 237, 237, 237, 237,
  718.  238, 238, 130, 130,  18,  16, 239,  16, 240, 240,
  719.  240, 240, 240, 240, 240, 240, 240, 240,   2,   2 };
  720. short yyr2[]={
  721.  
  722.    0,   0,   3,   1,   3,   1,   2,   1,   2,   1,
  723.    1,   1,   3,   3,   0,   2,   2,   4,   3,   0,
  724.    2,   2,   0,   2,   2,   2,   1,   1,   1,   1,
  725.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  726.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  727.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  728.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  729.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  730.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  731.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  732.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  733.    1,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  734.    1,   1,   1,   1,   3,   0,   4,   0,   4,   2,
  735.    3,   3,   4,   0,   2,   0,   4,   0,   5,   0,
  736.    2,   2,   0,   4,   0,   5,   0,   2,   0,   2,
  737.    2,   2,   2,   2,   2,   0,   5,   0,   5,   0,
  738.    5,   0,   5,   0,   5,   0,   5,   0,   4,   0,
  739.    4,   0,   5,   0,   4,   0,   5,   0,   4,   0,
  740.    5,   0,   0,   6,   0,   2,   2,   2,   2,   2,
  741.    2,   2,   0,   5,   0,   5,   0,   5,   0,   5,
  742.    0,   5,   0,   5,   0,   5,   0,   5,   0,   7,
  743.    0,   6,   0,   2,   2,   2,   2,   2,   2,   2,
  744.    0,   5,   0,   5,   0,   6,   0,   2,   7,   5,
  745.    7,   0,   5,   0,   2,   6,   5,   0,   5,   0,
  746.    2,   7,   5,   7,   5,   6,  15,   9,   0,  14,
  747.    0,   1,   1,   1,   1,   1,   1,   1,   1,   1,
  748.    1,   1,   1,   1,   1,   1,   1,   1,   0,   2,
  749.    0,   0,   5,   0,   0,   0,   9,   0,   0,   5,
  750.    1,   1,   0,   2,   0,   0,   0,  12,   0,   2,
  751.    2,   2,   0,   5,   0,   2,   0,   0,   9,   0,
  752.    5,   0,   5,   4,   4,   5,   3,   3,   5,   3,
  753.    3,   3,   5,   3,   3,   3,   1,   1,   1,   1,
  754.    3,   5,   3,   5,   3,   3,   3,  10,  10,   4,
  755.    3,   3,   3,   3,   5,   3,   3,   3,   3,   3,
  756.    5,   3,   3,   4,   3,   3,   3,   4,   3,   4,
  757.    3,   0,   0,   0,   0,   0,  15,   3,   3,   3,
  758.    3,   5,   1,   1,   1,   3,   6,   1,   1,   1,
  759.    7,   7,   7,  28,   5,   1,   1,   1,   1,   1,
  760.    2,   2,  26,  27,   3,   4,  12,   0,  15,   1,
  761.    1,   0,   8,   1,   1,   1,   1,   3,   3,   3,
  762.    0,   4,   0,   0,   5,   0,   4,   0,   5,   2,
  763.    3,   2,   3,   3,   0,   4,   6,   6,   1,   1,
  764.    3,   4,   5,   5,   3,  12,   1,   1,   1,   1,
  765.    1,   1,   5,   0,   9,   0,   1,   6,   8,  13,
  766.    0,   4,   4,  13,   0,   0,   0,   4,   0,   2,
  767.    2,   2,   2,   2,   2,   2,   2,   4,   1,   1 };
  768. short yychk[]={
  769.  
  770. -1000,  -1, 463, -17, -20, -22, -23, -24, -35, -36,
  771.  -37, -38, -39, -40, -41, -42, -43, -44, -45, -46,
  772.  -47, -48, -49, -50, -51, -52, -53, -54, -55, -56,
  773.  -57, -58, -59, -60, -61, -62, -63, -64, -65, -66,
  774.  -67, -68, -69, -70, -71, -72, -73, -74, -75, -76,
  775.  -77, -78, -79, -80, -81, -82, -83, -84, -85, -86,
  776.  -87, -88, -89, -90, -91, -92, -93, -94, -95, -96,
  777.  -97, -98, -99,-100,-101,-102,-103,-104,-105,-106,
  778. -107,-108,-109,-110,-111,-112,-113,-114,-115,-116,
  779. -117,-118,-119,-120,-121,-122,-123,-124,-125,-126,
  780. -127,-128, -33,-129,-130, -32, -28, 262, 263, 264,
  781.  265, 266, 267, 268, 269, 270, 271, 272, 273, 274,
  782.  275, 276, 277, 278, 279, 280, 281, 282, 283, 284,
  783.  285, 286, 287, 288, 289, 290, 291, 292, 293, 294,
  784.  295, 296, 297, 298, 299, 300, 301, 302, 303, 304,
  785.  305, 306, 307, 308, 309, 310, 311, 312, 313, 314,
  786.  315, 316, 317, 318, 319, 320, 321, 322, 323, 324,
  787.  325, 326, 327, 328, 329, 330, 331, 332, 333, 334,
  788.  335, 336, 337, 338, 339, 340, 341, 342, 343, 344,
  789.  345, 346, 465, 347, 348, 430, 351, 352, 354, 355,
  790.  356, 357, 358, 360, 359, 349, -16, -18, 361, -20,
  791.  -29, 257,-131,-133,-136,-137,-142,-143,-156,-166,
  792. -183, 257,-185, 257, 257, 257,  -2, 258, 257,  -2,
  793.   -2,  -2,  -3, 368, 369,  -3, 257, 257, 257, 257,
  794.   -2,  -2, 257, 257,  -2,  -2, 257, 257, -12, 421,
  795.  422, 423, 424, 257,  -2, 257,  -2, 257, 257, 257,
  796.   -2,  -2, 257, 379, 380, 257,  -2,  -2, 257, 257,
  797.  381, 382, 383,  -2, 257, 257, 257,  -2,  -2,  -2,
  798.   -2,  -2,  -2, 257,-221, 257, 394, 395, 257, 257,
  799.  257, 257, 257, 257, 257, 257, 257,  59,  59, 123,
  800.  123, 257, 257, 257, 257, 257, 257, 257,-228,-229,
  801.   59, 259,  59, 257,-235, 257,  -2, 257, 257, 257,
  802.  257,-236, 257, -17, -19, -21, -25, 260,-239, -30,
  803.  -32, -33,  59,-132,  -2,-134,  -2,-132,-138,-145,
  804. -132,-138,-157, 123,-163, 123,-138, 257,-138, 257,
  805. -193,-195,  -2,  -2,  -2,  -2, 257, 257,  -2,  -2,
  806.   -2,  59,  59,  -2,  59,  59,  59,  -2,  59,  59,
  807.   59,  59,  -2,  59,  -2,  59,  59,  59,  -2,  -2,
  808.  257,  59,  59,  59,  59,  -2,  59,  59,  59,  59,
  809.   59,  -2,  59,  59, 257,  59,  59,  59,  -2,  59,
  810.   -2,  59, 391,  59,  59,  59,  59, 257,  59,  -2,
  811.   -2,  -2,  -2, 123,  -5, 425, 426, 427, 428, 429,
  812.   -2,  -2,  59,  -4, 402, 403, 404,  -2,  -2,  59,
  813.   59,  59, 256,-230, 259,  59,  59,  59, 257,  -2,
  814.   -2,  59, 257,  -2, 380, 379, 257,  59, -21, -26,
  815.  257,-240, -31, -22, -34, 350, 353,  59,  -2,  -2,
  816.   59,  -2,  -2,  59,-139,-134,  59,-144,  59, 123,
  817. -161, 123,-167,-164,-144,-184,-186, 440,-191,-194,
  818. -196, 259,  -2,  -2,  -2,-201, 257,  59,  59,  -2,
  819.   -2,  -2,  -2,  -2,  -2,  -2,  59,  -2,  -2,  59,
  820.   59,  59,-222,  -4,  -6, 405, 406, 407,  -2,  -2,
  821.   -2,  -2,  -4,  -2,  -2,  59,  -2,  -2,  59,-231,
  822.  259,-232,  -2,  -2,  -2, 257,  -7, 408, 409,  59,
  823.  123,  -2, -27, -22, 261,  59,  59, 398, 399, 400,
  824.  401, 436, 437, 438, 439, 435,  59,-234,  -2,  -2,
  825.   -2,  59,-140,-141, 371, 373,  59,-140,-141,-146,
  826. -147,-148,-149, 372, 374, 376, 375,-162,-132,-165,
  827. -168,-134,  59,-138,-187,-190,-192,  59, 441, 442,
  828.  443,  59, 441, 442, 443, 445,  59, 259,  -2, 257,
  829. -202, 257,  59,  59,  59,  59,  59,  -2,  -2,  59,
  830.   59, 123,  59,  -4,  -2,  -2,  -2,  -2,  59,  -2,
  831.   -2,  -2,  -2,  59,-233, -19,  -2,  -2,  59,  -9,
  832.  415, 416,  59,  -2,  -2,  59, 257,  59, 257,  -2,
  833. -150,-151,-152,-153,-154,-155,-132, 125,-134,  59,
  834. -169,-170,-171,-172,-173,-174,-175, 371, 373, 372,
  835.  378, 374, 376, 375, 125,-144,  59,-188,-140,-141,
  836. -146,-147,-148,-149, 378, 123,  59, 441, 442, 443,
  837.  444, 123, 123, 123, 123, 123,  59, 446,  -2, 257,
  838. -203,  -2, 257,  -2,  -2,-135,  59,  -4,  -4,  -4,
  839.   -2,  -2,  -2,  -2,  -2, -19, 464,  -2, -10, 417,
  840.  418,  -2,  -2, 257, -13, 433, 434, 123, 123, 123,
  841.  123, 123, 123, 125, 125,-176,-177,-178,-179,-180,
  842. -181,-182,  59,-189,-158, 123, 123, 123, 123,  -2,
  843.   -2,  -2,  -2,  -2, 123,  -2, -15, 447, 448, 449,
  844.  450, 451, 452, 453, 454, 404, 455, 456, 457, 458,
  845. -204, 362,-207,  -2,  -2, 257, 125,  59,  59,  59,
  846.   -2, 125, 125,  -2,  -7, 464, -11, 419, 420,  -2,
  847. -237, 386, 387, 388, 389, 257,-134,-135,-134,-134,
  848. -135,-134, 123, 123, 123, 123, 123, 123, 123, 123,
  849.  123, 125,-159,  -2,  -2,  -2,  -2, 125,  -2, 125,
  850.   -2,  -2, 259, -14, 459, 460, 461, 462,-205,-206,
  851. -202,  -2,  -2,-223, 125, 123, 123,  -2,  -2,  -2,
  852.   -2,-238, 390, 123, 123, 123, 431, 125, 125, 125,
  853.  125, 125, 125,-163,-158,-163,-158,-134,-135,-134,
  854. -158,-160,-135,  -2, 125,  -2, 125,  -2,  -2,  -2,
  855.   59,-197,  59, 123,-208,  -2,  -2, 392, 123,  -2,
  856.   -2,  -2,  -2,  -2,  -2,  59, 123,  -2,  -2,  -2,
  857.  257, 432, 125, 125, 125, 125, 125, 125, 125, 125,
  858. -135, 125,  -2,  -2, 125, 125,  -2, 123,-202,-209,
  859.   59,  59,-224,  -2,  -2,  -2,  -2,  -2,  -2,  -2,
  860.  257,  -2,  -2,  -2, 125, 125, 125,  -2,-198, 125,
  861. -210,-211,-212,-213, 364, 365, 366, 123,  -2,  -2,
  862.   -2,  -2,  -2,  -2,  -2, 125,  -2,  -2,  -2,  -2,
  863.  125, 257,  59,-219,-220,-214,-135,  -2,  -2,  -2,
  864.   59,  -2,  59, 125, 125,  -2,  -2,  -2,-199, 439,
  865.  123, 123, 123, 125,  -2, 125, 125,-226,  59,  -2,
  866.   -2, 125,  59,-200,-202,-202,-215,-225, 125, 123,
  867.  123,-227, 410, 125,  -2,  59, 123, 125, 125, 125,
  868. -216, 367,  59, 123,  -2,  -2,  59, 123,  -2,-135,
  869.  123,  -2,  -2,  -2,  -2,  -2, 125,  -3,  -2,  -2,
  870.   -2,  -2,  -2, 257,  -2,  -2,  -2,  -2,  -2,-217,
  871.   -2, 125, 125,  -2, 125,-202, 125, 123, 123,  -8,
  872.  411, 412, 413, 414,-218, 123,  -2,  -2, 125,-204,
  873.   -2,  -2,  -2, 125,  -2,  -2,  -2,  -2,  -2,  -2,
  874.   -2, 125, 125, 125,  59,  -4,  -4,  59,  59 };
  875. short yydef[]={
  876.  
  877.    1,  -2,  -2,   3,   5,   9,  10,  11,  26,  27,
  878.   28,  29,  30,  31,  32,  33,  34,  35,  36,  37,
  879.   38,  39,  40,  41,  42,  43,  44,  45,  46,  47,
  880.   48,  49,  50,  51,  52,  53,  54,  55,  56,  57,
  881.   58,  59,  60,  61,  62,  63,  64,  65,  66,  67,
  882.   68,  69,  70,  71,  72,  73,  74,  75,  76,  77,
  883.   78,  79,  80,  81,  82,  83,  84,  85,  86,  87,
  884.   88,  89,  90,  91,  92,  93,  94,  95,  96,  97,
  885.   98,  99, 100, 101, 102, 103, 104, 105, 106, 107,
  886.  108, 109, 110, 111, 112, 113, 114, 115, 116, 117,
  887.  118, 119, 120, 121, 122, 123,  19,   0, 125, 127,
  888.  135, 137, 142, 144, 167, 181, 206,   0, 210,   0,
  889.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  890.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  891.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  892.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  893.    0,   0,   0,   0,   0,   0,   0,   0,   0, 351,
  894.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  895.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  896.    0,   0, 400, 402,   0,   0,   0,   0,   0,   0,
  897.    0,   0,   0,   0, 433,   0,   0,   0, 446,   6,
  898.   22,   0,   0,   0,   0, 146,   0, 146,   0,   0,
  899.  146,   0, 146,   0, 231, 237,   0, 458, 459,   0,
  900.    0,   0,   0, 280, 281,   0,   0,   0,   0,   0,
  901.    0,   0,   0,   0,   0,   0,   0,   0,   0, 316,
  902.  317, 318, 319,   0,   0,   0,   0,   0,   0,   0,
  903.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  904.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  905.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  906.    0,   0,   0,   0,   0,   0,   0, 380, 381,   0,
  907.    0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  908.  409,   0, 411,   0,   0,   0,   0,   0,   0,   0,
  909.    0,   0,   0,   2,   4,   7,  14,   0, 448,   0,
  910.   20,  21, 124,   0,   0,   0,   0,   0, 139,   0,
  911.    0, 148,   0, 173, 182, 177, 148, 208,   0, 224,
  912.  233, 239,   0,   0,   0,   0, 273,   0,   0,   0,
  913.    0, 306, 307,   0, 309, 310, 311,   0, 313, 314,
  914.  315, 320,   0, 322,   0, 324, 325, 326,   0,   0,
  915.    0, 330, 331, 332, 333,   0, 335, 336, 337, 338,
  916.  339,   0, 341, 342,   0, 344, 345, 346,   0, 348,
  917.    0, 350, 352, 357, 358, 359, 360,   0, 365,   0,
  918.    0,   0,   0,   0,   0, 375, 376, 377, 378, 379,
  919.    0,   0, 384,   0, 362, 363, 364,   0,   0, 397,
  920.  398, 399,   0, 403, 405, 410, 412, 420,   0,   0,
  921.    0, 424,   0,   0,   0,   0,   0,  18,   8,   0,
  922.    0,   0,  17,  23,  24,   0, 414, 126,   0, 129,
  923.  128,   0,   0, 136,   0, 147, 143,   0, 168, 175,
  924.    0, 179, 184,   0,   0, 146, 212, 222, 226,   0,
  925.    0,   0,   0,   0,   0, 282,   0, 303, 304,   0,
  926.    0,   0,   0,   0,   0,   0, 329,   0,   0, 343,
  927.  347, 349,   0,   0,   0, 367, 368, 369,   0,   0,
  928.    0,   0,   0,   0,   0, 385,   0,   0, 401,   0,
  929.  407,   0,   0,   0,   0,   0,   0, 389, 390, 442,
  930.    0,   0,  12,  15,   0,  13, 447, 449, 450, 451,
  931.  452, 453, 454, 455, 456,   0,  25,   0, 130,   0,
  932.  131, 138, 140, 141, 155, 157, 145, 149, 150, 151,
  933.  152, 153, 154, 159, 161, 163, 165,   0,   0,   0,
  934.    0,   0, 207, 148,   0,   0,   0, 232, 234,   0,
  935.    0, 238, 240,   0,   0,   0, 244,   0,   0,   0,
  936.  274,   0, 305, 308, 312, 321, 323,   0,   0, 334,
  937.  340, 133, 361,   0,   0,   0,   0,   0, 374,   0,
  938.    0,   0,   0, 404,   0,   0,   0, 421, 423,   0,
  939.  426, 427, 432,   0,   0,  16,   0, 413,   0, 132,
  940.    0,   0,   0,   0,   0,   0,   0, 174,   0, 183,
  941.  185, 186, 187, 188, 189, 190, 191, 192, 194, 196,
  942.  198, 200, 202, 204, 178,   0, 211, 213, 214, 215,
  943.  216, 217, 218, 219, 220,   0, 225, 227,   0,   0,
  944.    0,   0,   0,   0,   0,   0, 245,   0,   0, 250,
  945.  277, 283, 284,   0,   0,   0, 366,   0,   0,   0,
  946.    0,   0,   0,   0,   0,   0, 406, 422,   0, 428,
  947.  429,   0, 435, 457,   0, 418, 419,   0, 133,   0,
  948.    0, 133,   0, 176, 180,   0,   0,   0,   0,   0,
  949.    0,   0, 209,   0,   0, 169,   0,   0,   0,   0,
  950.    0,   0,   0,   0,   0,   0,   0, 251, 252, 253,
  951.  254, 255, 256, 257, 258, 259, 260, 261, 262, 263,
  952.  275, 278, 282,   0,   0, 134, 353, 370, 371, 372,
  953.    0,   0,   0,   0,   0, 408,   0, 430, 431,   0,
  954.  440, 436,   0,   0,   0, 415,   0,   0,   0,   0,
  955.    0,   0,   0,   0,   0,   0,   0, 133,   0,   0,
  956.  171, 223, 133,   0,   0,   0,   0, 236,   0, 242,
  957.    0,   0,   0, 248, 264, 265, 266, 267,   0,   0,
  958.  285,   0,   0,   0,   0,   0,   0,   0,   0,   0,
  959.    0,   0,   0,   0,   0,   0,   0, 156, 158, 160,
  960.  162, 164, 166,   0,   0,   0,   0,   0,   0,   0,
  961.    0, 133,   0,   0, 229,   0, 235,   0,   0,   0,
  962.  247,   0, 276, 282, 288,   0,   0, 354,   0,   0,
  963.    0,   0,   0,   0,   0, 434,   0,   0,   0,   0,
  964.  416, 417, 193, 195, 197, 199, 201, 203, 205, 221,
  965.    0, 170,   0,   0, 241, 243,   0, 268,   0, 286,
  966.  327, 328,   0,   0,   0,   0,   0,   0,   0,   0,
  967.    0,   0,   0,   0, 172, 228, 230,   0,   0, 279,
  968.    0, 289, 290, 291, 299, 301, 292, 133,   0,   0,
  969.    0,   0,   0,   0,   0, 441,   0,   0,   0,   0,
  970.  270, 269, 287,   0,   0,   0,   0,   0,   0,   0,
  971.  386, 387, 425,   0, 437,   0,   0,   0,   0, 271,
  972.  282, 282, 294, 355,   0,   0,   0, 391, 443,   0,
  973.    0,   0, 249,   0,   0,   0,   0,   0,   0,   0,
  974.    0,   0,   0, 438,   0, 246, 133, 300, 302, 293,
  975.  295,   0, 356,   0,   0,   0, 388,   0,   0,   0,
  976.    0,   0,   0,   0,   0,   0, 272,   0,   0,   0,
  977.    0,   0,   0, 296,   0,   0,   0,   0,   0, 282,
  978.    0,   0,   0,   0, 439, 297,   0,   0,   0,   0,
  979.  393, 394, 395, 396, 277,   0,   0,   0, 392,   0,
  980.    0,   0,   0, 298,   0,   0,   0,   0,   0,   0,
  981.    0,   0,   0,   0, 382,   0,   0, 383, 373 };
  982. /* static char yaccpar_sccsid[] = "@(#) bifparse.c,v 1.3 91/01/17 10:17:23 mikec Exp"; */
  983.  
  984. #
  985. # define YYFLAG -1000
  986. # define YYERROR goto yyerrlab
  987. # define YYACCEPT return(0)
  988. # define YYABORT return(1)
  989.  
  990. /*    parser for yacc output    */
  991.  
  992. #ifdef YYDEBUG
  993. int yydebug = 0; /* 1 for debugging */
  994. #endif
  995. YYSTYPE yyv[YYMAXDEPTH]; /* where the values are stored */
  996. int yychar = -1; /* current input token number */
  997. int yynerrs = 0;  /* number of errors */
  998. short yyerrflag = 0;  /* error recovery flag */
  999.  
  1000. yyparse() {
  1001.  
  1002.     short yys[YYMAXDEPTH];
  1003.     short yyj, yym;
  1004.     register YYSTYPE *yypvt;
  1005.     register short yystate, *yyps, yyn;
  1006.     register YYSTYPE *yypv;
  1007.     register short *yyxi;
  1008.  
  1009.     yystate = 0;
  1010.     yychar = -1;
  1011.     yynerrs = 0;
  1012.     yyerrflag = 0;
  1013.     yyps= &yys[-1];
  1014.     yypv= &yyv[-1];
  1015.  
  1016.  yystack:    /* put a state and value onto the stack */
  1017.  
  1018. #ifdef YYDEBUG
  1019.     if( yydebug  ) printf( "state %d, char 0%o\n", yystate, yychar );
  1020. #endif
  1021.         if( ++yyps> &yys[YYMAXDEPTH] ) { yyerror( "yacc stack overflow" ); return(1); }
  1022.         *yyps = yystate;
  1023.         ++yypv;
  1024.         *yypv = yyval;
  1025.  
  1026.  yynewstate:
  1027.  
  1028.     yyn = yypact[yystate];
  1029.  
  1030.     if( yyn<= YYFLAG ) goto yydefault; /* simple state */
  1031.  
  1032.     if( yychar<0 ) if( (yychar=yylex())<0 ) yychar=0;
  1033.     if( (yyn += yychar)<0 || yyn >= YYLAST ) goto yydefault;
  1034.  
  1035.     if( yychk[ yyn=yyact[ yyn ] ] == yychar ){ /* valid shift */
  1036.         yychar = -1;
  1037.         yyval = yylval;
  1038.         yystate = yyn;
  1039.         if( yyerrflag > 0 ) --yyerrflag;
  1040.         goto yystack;
  1041.         }
  1042.  
  1043.  yydefault:
  1044.     /* default state action */
  1045.  
  1046.     if( (yyn=yydef[yystate]) == -2 ) {
  1047.         if( yychar<0 ) if( (yychar=yylex())<0 ) yychar = 0;
  1048.         /* look through exception table */
  1049.  
  1050.         for( yyxi=yyexca; (*yyxi!= (-1)) || (yyxi[1]!=yystate) ; yyxi += 2 ) ; /* VOID */
  1051.  
  1052.         while( *(yyxi+=2) >= 0 ){
  1053.             if( *yyxi == yychar ) break;
  1054.             }
  1055.         if( (yyn = yyxi[1]) < 0 ) return(0);   /* accept */
  1056.         }
  1057.  
  1058.     if( yyn == 0 ){ /* error */
  1059.         /* error ... attempt to resume parsing */
  1060.  
  1061.         switch( yyerrflag ){
  1062.  
  1063.         case 0:   /* brand new error */
  1064.  
  1065.         yyerrlab:
  1066.             yyerror( "syntax error" );
  1067.             ++yynerrs;
  1068.  
  1069.         case 1:
  1070.         case 2: /* incompletely recovered error ... try again */
  1071.  
  1072.             yyerrflag = 3;
  1073.  
  1074.             /* find a state where "error" is a legal shift action */
  1075.  
  1076.             while ( yyps >= yys ) {
  1077.                yyn = yypact[*yyps] + YYERRCODE;
  1078.                if( yyn>= 0 && yyn < YYLAST && yychk[yyact[yyn]] == YYERRCODE ){
  1079.                   yystate = yyact[yyn];  /* simulate a shift of "error" */
  1080.                   goto yystack;
  1081.                   }
  1082.                yyn = yypact[*yyps];
  1083.  
  1084.                /* the current yyps has no shift onn "error", pop stack */
  1085.  
  1086. #ifdef YYDEBUG
  1087.                if( yydebug ) printf( "error recovery pops state %d, uncovers %d\n", *yyps, yyps[-1] );
  1088. #endif
  1089.                --yyps;
  1090.                --yypv;
  1091.                }
  1092.  
  1093.             /* there is no state on the stack with an error shift ... abort */
  1094.  
  1095.     yyabort:
  1096.             return(1);
  1097.  
  1098.  
  1099.         case 3:  /* no shift yet; clobber input char */
  1100.  
  1101. #ifdef YYDEBUG
  1102.             if( yydebug ) printf( "error recovery discards char %d\n", yychar );
  1103. #endif
  1104.  
  1105.             if( yychar == 0 ) goto yyabort; /* don't discard EOF, quit */
  1106.             yychar = -1;
  1107.             goto yynewstate;   /* try again in the same state */
  1108.  
  1109.             }
  1110.  
  1111.         }
  1112.  
  1113.     /* reduction by production yyn */
  1114.  
  1115. #ifdef YYDEBUG
  1116.         if( yydebug ) printf("reduce %d\n",yyn);
  1117. #endif
  1118.         yyps -= yyr2[yyn];
  1119.         yypvt = yypv;
  1120.         yypv -= yyr2[yyn];
  1121.         yyval = yypv[1];
  1122.         yym=yyn;
  1123.             /* consult goto table to find next state */
  1124.         yyn = yyr1[yyn];
  1125.         yyj = yypgo[yyn] + *yyps + 1;
  1126.         if( yyj>=YYLAST || yychk[ yystate = yyact[yyj] ] != -yyn ) yystate = yyact[yypgo[yyn]];
  1127.         switch(yym){
  1128.             
  1129. case 2:
  1130. # line 389 "bifparse.y"
  1131. { close_reportfile(); } break;
  1132. case 3:
  1133. # line 391 "bifparse.y"
  1134. { close_reportfile(); } break;
  1135. case 4:
  1136. # line 393 "bifparse.y"
  1137. { close_reportfile(); } break;
  1138. case 13:
  1139. # line 413 "bifparse.y"
  1140. { (void)bif_begstr(yypvt[-1].l); } break;
  1141. case 16:
  1142. # line 422 "bifparse.y"
  1143. { (void)bif_endstr(); } break;
  1144. case 18:
  1145. # line 429 "bifparse.y"
  1146. { (void)bif_begintest(yypvt[-1].l); } break;
  1147. case 25:
  1148. # line 442 "bifparse.y"
  1149. { (void)bif_endtest(); } break;
  1150. case 124:
  1151. # line 550 "bifparse.y"
  1152. { (void)bif_label(yypvt[-1].l); } break;
  1153. case 125:
  1154. # line 554 "bifparse.y"
  1155. { (void) bif_marker(BIF_P_BEGIN); } break;
  1156. case 126:
  1157. # line 556 "bifparse.y"
  1158. { (void)bif_marker(BIF_P_END  ); } break;
  1159. case 127:
  1160. # line 560 "bifparse.y"
  1161. { (void)bif_marker3(BIF_P_BEGIN); } break;
  1162. case 128:
  1163. # line 562 "bifparse.y"
  1164. { (void)bif_marker3(BIF_P_END  ); } break;
  1165. case 129:
  1166. # line 566 "bifparse.y"
  1167. {
  1168.                  (void)bif_pair(yypvt[-1].f,yypvt[-0].f);  /* rev 0.8 */
  1169.                 } break;
  1170. case 130:
  1171. # line 570 "bifparse.y"
  1172. {(void)bif_pair(yypvt[-1].f,yypvt[-0].f); } break;
  1173. case 131:
  1174. # line 574 "bifparse.y"
  1175. {
  1176.                  (void)bif_triplet(yypvt[-2].f,yypvt[-1].f,yypvt[-0].f); 
  1177.                 } break;
  1178. case 132:
  1179. # line 578 "bifparse.y"
  1180. {(void)bif_triplet(yypvt[-2].f,yypvt[-1].f,yypvt[-0].f);} break;
  1181. case 134:
  1182. # line 583 "bifparse.y"
  1183. { bif_intlist(yypvt[-0].l); } break;
  1184. case 135:
  1185. # line 587 "bifparse.y"
  1186. { (void)
  1187.                    bif_line(BIF_P_BEGIN); } break;
  1188. case 136:
  1189. # line 590 "bifparse.y"
  1190. { (void)bif_line(BIF_P_END  ); } break;
  1191. case 137:
  1192. # line 594 "bifparse.y"
  1193. { 
  1194.                   bif_line3(BIF_P_BEGIN); 
  1195.                   not_repeated(-1); 
  1196.                   with_data_name = "LINE3";
  1197.                 } break;
  1198. case 138:
  1199. # line 600 "bifparse.y"
  1200. { 
  1201.                   not_repeated(-1); 
  1202.                   bif_line3(BIF_P_END  ); 
  1203.                 } break;
  1204. case 142:
  1205. # line 613 "bifparse.y"
  1206. { (void)
  1207.                    bif_polygon(BIF_P_BEGIN); } break;
  1208. case 143:
  1209. # line 616 "bifparse.y"
  1210. { (void)bif_polygon(BIF_P_END  ); } break;
  1211. case 144:
  1212. # line 620 "bifparse.y"
  1213. { 
  1214.                   bif_polygon3 (BIF_P_BEGIN); 
  1215.                   not_repeated(-1); 
  1216.                   with_data_name = "POLYGON3";
  1217.                 } break;
  1218. case 145:
  1219. # line 626 "bifparse.y"
  1220. { 
  1221.                   not_repeated(-1); 
  1222.                   (void)bif_polygon3 (BIF_P_END  ); 
  1223.                 } break;
  1224. case 146:
  1225. # line 632 "bifparse.y"
  1226. { (void)bif_group(VERTEX_COORDINATES); } break;
  1227. case 147:
  1228. # line 634 "bifparse.y"
  1229. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1230. case 155:
  1231. # line 647 "bifparse.y"
  1232. { 
  1233.                   if(not_repeated(1)) 
  1234.                   bif_group(VERTEX_COLORS); 
  1235.                   else 
  1236.                   { 
  1237.                      (void)bif_group(IGNORE_GROUP);  
  1238.                      WD3B_error("VERTEX_COLORS"); 
  1239.                   } 
  1240.                 } break;
  1241. case 156:
  1242. # line 657 "bifparse.y"
  1243. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1244. case 157:
  1245. # line 661 "bifparse.y"
  1246. { 
  1247.                   if(not_repeated(2)) 
  1248.                   bif_group(VERTEX_COLOR_INDICES); 
  1249.                   else 
  1250.                   { 
  1251.                      (void)bif_group(IGNORE_GROUP);  
  1252.                      WD3B_error("VERTEX_COLOR_INDICES"); 
  1253.                   } 
  1254.                 } break;
  1255. case 158:
  1256. # line 671 "bifparse.y"
  1257. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1258. case 159:
  1259. # line 676 "bifparse.y"
  1260. { 
  1261.                   if(not_repeated(3)) 
  1262.                   bif_group(VERTEX_NORMALS); 
  1263.                   else 
  1264.                   { 
  1265.                      (void)bif_group(IGNORE_GROUP);  
  1266.                      WD3B_error("VERTEX_NORMALS"); 
  1267.                   } 
  1268.                 } break;
  1269. case 160:
  1270. # line 686 "bifparse.y"
  1271. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1272. case 161:
  1273. # line 691 "bifparse.y"
  1274. { 
  1275.                   if(not_repeated(4)) 
  1276.                   bif_group(FACET_COLORS); 
  1277.                   else 
  1278.                   { 
  1279.                      (void)bif_group(IGNORE_GROUP);  
  1280.                      WD3B_error("FACET_COLORS"); 
  1281.                   } 
  1282.                 } break;
  1283. case 162:
  1284. # line 701 "bifparse.y"
  1285. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1286. case 163:
  1287. # line 706 "bifparse.y"
  1288. { 
  1289.                   if(not_repeated(5)) 
  1290.                   bif_group(FACET_COLOR_INDICES); 
  1291.                   else 
  1292.                   { 
  1293.                      (void)bif_group(IGNORE_GROUP);  
  1294.                      WD3B_error("FACET_COLOR_INDICES"); 
  1295.                   } 
  1296.                 } break;
  1297. case 164:
  1298. # line 716 "bifparse.y"
  1299. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1300. case 165:
  1301. # line 721 "bifparse.y"
  1302. { 
  1303.                   if(not_repeated(6)) 
  1304.                   bif_group(FACET_NORMALS); 
  1305.                   else 
  1306.                   { 
  1307.                      (void)bif_group(IGNORE_GROUP);  
  1308.                      WD3B_error("FACET_NORMALS"); 
  1309.                   } 
  1310.                 } break;
  1311. case 166:
  1312. # line 731 "bifparse.y"
  1313. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1314. case 167:
  1315. # line 737 "bifparse.y"
  1316. { 
  1317.                   (void)bif_faset (BIF_P_BEGIN);  /* rev 0.8 */
  1318.                   (void)bif_group(VERTEX_COORDINATES); 
  1319.                 } break;
  1320. case 168:
  1321. # line 743 "bifparse.y"
  1322. { 
  1323.                   (void)bif_group(BIF_END_OF_GROUP); 
  1324.                   (void)bif_faset (BIF_P_END  ); 
  1325.                 } break;
  1326. case 169:
  1327. # line 750 "bifparse.y"
  1328. { (void)bif_contour(BIF_P_BEGIN); } break;
  1329. case 170:
  1330. # line 753 "bifparse.y"
  1331. { (void)bif_contour(BIF_P_END  ); } break;
  1332. case 171:
  1333. # line 756 "bifparse.y"
  1334. { (void)bif_contour(BIF_P_BEGIN); } break;
  1335. case 172:
  1336. # line 759 "bifparse.y"
  1337. { (void)bif_contour(BIF_P_END  ); } break;
  1338. case 173:
  1339. # line 763 "bifparse.y"
  1340. { (void)bif_contour(BIF_P_BEGIN); } break;
  1341. case 174:
  1342. # line 766 "bifparse.y"
  1343. { (void)bif_contour(BIF_P_END  ); } break;
  1344. case 175:
  1345. # line 769 "bifparse.y"
  1346. { (void)bif_contour(BIF_P_BEGIN); } break;
  1347. case 176:
  1348. # line 772 "bifparse.y"
  1349. { (void)bif_contour(BIF_P_END  ); } break;
  1350. case 177:
  1351. # line 776 "bifparse.y"
  1352. { (void)bif_contour(BIF_P_BEGIN); } break;
  1353. case 178:
  1354. # line 779 "bifparse.y"
  1355. { (void)bif_contour(BIF_P_END  ); } break;
  1356. case 179:
  1357. # line 782 "bifparse.y"
  1358. { (void)bif_contour(BIF_P_BEGIN); } break;
  1359. case 180:
  1360. # line 785 "bifparse.y"
  1361. { (void)bif_contour(BIF_P_END  ); } break;
  1362. case 181:
  1363. # line 789 "bifparse.y"
  1364. { 
  1365.                   (void)bif_faset3(BIF_P_BEGIN); 
  1366.                   (void)bif_group(VERTEX_COORDINATES); 
  1367.                 } break;
  1368. case 182:
  1369. # line 794 "bifparse.y"
  1370. { 
  1371.                    (void)bif_group(BIF_END_OF_GROUP); 
  1372.                    (void)not_repeated(-1); 
  1373.                  } break;
  1374. case 183:
  1375. # line 799 "bifparse.y"
  1376. { 
  1377.                    (void)not_repeated(-1); 
  1378.                    (void)bif_faset3 (BIF_P_END  );
  1379.                  } break;
  1380. case 192:
  1381. # line 816 "bifparse.y"
  1382. { if(not_repeated(1))
  1383.                      (void)bif_group(VERTEX_COLORS); 
  1384.                   else
  1385.                   {
  1386.                      (void)bif_group(IGNORE_GROUP); /*rev 0.8*/
  1387.                      yyerror(FAS_ERM1);
  1388.                   }
  1389.                 } break;
  1390. case 193:
  1391. # line 825 "bifparse.y"
  1392. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1393. case 194:
  1394. # line 829 "bifparse.y"
  1395. { if(not_repeated(2))
  1396.                      (void)bif_group(VERTEX_COLOR_INDICES);
  1397.                   else
  1398.                   {
  1399.                      (void)bif_group(IGNORE_GROUP); /*rev 0.8*/
  1400.                      yyerror(FAS_ERM2);
  1401.                   }
  1402.                 } break;
  1403. case 195:
  1404. # line 838 "bifparse.y"
  1405. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1406. case 196:
  1407. # line 842 "bifparse.y"
  1408. { if(not_repeated(3))
  1409.                      (void)bif_group(VERTEX_NORMALS);
  1410.                   else
  1411.                   {
  1412.                      (void)bif_group(IGNORE_GROUP); 
  1413.                      yyerror(FAS_ERM3);
  1414.                   }
  1415.                 } break;
  1416. case 197:
  1417. # line 851 "bifparse.y"
  1418. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1419. case 198:
  1420. # line 855 "bifparse.y"
  1421. { if(not_repeated(4))
  1422.                      (void)bif_group(EDGE_VISIBILITY);
  1423.                   else
  1424.                   {
  1425.                      (void)bif_group(IGNORE_GROUP); 
  1426.                      yyerror(FAS_ERM4);
  1427.                   }
  1428.                 } break;
  1429. case 199:
  1430. # line 864 "bifparse.y"
  1431. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1432. case 200:
  1433. # line 868 "bifparse.y"
  1434. { if(not_repeated(5))
  1435.                      (void)bif_group(FACET_COLORS);
  1436.                   else
  1437.                   {
  1438.                      (void)bif_group(IGNORE_GROUP); 
  1439.                      yyerror(FAS_ERM5);
  1440.                   }
  1441.                 } break;
  1442. case 201:
  1443. # line 877 "bifparse.y"
  1444. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1445. case 202:
  1446. # line 881 "bifparse.y"
  1447. { if(not_repeated(6))
  1448.                      (void)bif_group(FACET_COLOR_INDICES);
  1449.                   else
  1450.                   {
  1451.                      (void)bif_group(IGNORE_GROUP); 
  1452.                      yyerror(FAS_ERM6);
  1453.                   }
  1454.                 } break;
  1455. case 203:
  1456. # line 890 "bifparse.y"
  1457. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1458. case 204:
  1459. # line 894 "bifparse.y"
  1460. { if(not_repeated(7))
  1461.                      (void)bif_group(FACET_NORMALS);
  1462.                   else
  1463.                   {
  1464.                      (void)bif_group(IGNORE_GROUP); 
  1465.                      yyerror(FAS_ERM7);
  1466.                   }
  1467.                 } break;
  1468. case 205:
  1469. # line 903 "bifparse.y"
  1470. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1471. case 206:
  1472. # line 908 "bifparse.y"
  1473. {
  1474.                   bif_triangle3 (BIF_P_BEGIN);/* rev 0.8 */
  1475.                   not_repeated(-1); 
  1476.                   with_data_name = "TRIANGLE3";
  1477.                 } break;
  1478. case 207:
  1479. # line 914 "bifparse.y"
  1480. {
  1481.                   not_repeated(-1); 
  1482.                   (void)bif_triangle3 (BIF_P_END  ); 
  1483.                 } break;
  1484. case 208:
  1485. # line 922 "bifparse.y"
  1486. {
  1487.                   (void)bif_quad_mesh3 (BIF_P_BEGIN);/*rev 0.8*/
  1488.                   (void)bif_quadmeshorder(yypvt[-1].l,yypvt[-0].l);    /*rev 0.8*/
  1489.                   not_repeated(-1); 
  1490.                   with_data_name = "QUAD_MESH3";
  1491.                 } break;
  1492. case 209:
  1493. # line 929 "bifparse.y"
  1494. {
  1495.                   not_repeated(-1); 
  1496.                   (void)bif_quad_mesh3 (BIF_P_END  ); 
  1497.                 } break;
  1498. case 210:
  1499. # line 936 "bifparse.y"
  1500. {
  1501.                   bif_indexpoly3 (BIF_P_BEGIN); /* rev 0.8 */
  1502.                   not_repeated(-1); 
  1503.                   with_data_name = "INDEX_POLYGON3";
  1504.                 } break;
  1505. case 211:
  1506. # line 944 "bifparse.y"
  1507. {
  1508.                   not_repeated(-1); 
  1509.                   (void)bif_indexpoly3 (BIF_P_END  ); 
  1510.                 } break;
  1511. case 220:
  1512. # line 962 "bifparse.y"
  1513. { 
  1514.                   if(not_repeated(7)) 
  1515.                   bif_group(EDGE_VISIBILITY); 
  1516.                   else 
  1517.                   { 
  1518.                      (void)bif_group(IGNORE_GROUP);  
  1519.                      WD3B_error("EDGE_VISIBILITY"); 
  1520.                   } 
  1521.                 } break;
  1522. case 221:
  1523. # line 972 "bifparse.y"
  1524. { (void)bif_group(BIF_END_OF_GROUP); } break;
  1525. case 222:
  1526. # line 978 "bifparse.y"
  1527. {(void)bif_group(FACET_CONNECTIVITY);} break;
  1528. case 223:
  1529. # line 981 "bifparse.y"
  1530. {(void)bif_group(BIF_END_OF_GROUP); } break;
  1531. case 224:
  1532. # line 986 "bifparse.y"
  1533. {
  1534.                    (void)bif_sphere3(BIF_P_BEGIN); /* rev 0.8 */
  1535.                    (void)bif_sphereorder(yypvt[-1].l,yypvt[-0].l);
  1536.                    (void)not_repeated(-1); 
  1537.                 } break;
  1538. case 225:
  1539. # line 993 "bifparse.y"
  1540. {
  1541.                    (void)not_repeated(-1); 
  1542.                    (void)bif_sphere3(BIF_P_END); 
  1543.                 } break;
  1544. case 227:
  1545. # line 1001 "bifparse.y"
  1546. { 
  1547.                   bif_exact(TRUE);
  1548.                 } break;
  1549. case 228:
  1550. # line 1006 "bifparse.y"
  1551. { 
  1552.                   if(not_repeated(1)) 
  1553.                      bif_center(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); /* rev 0.8 */
  1554.                   else yyerror(GS_ERM1);
  1555.                 } break;
  1556. case 229:
  1557. # line 1013 "bifparse.y"
  1558. { 
  1559.                   if(not_repeated(2)) 
  1560.                      bif_radius(yypvt[-1].f); /* rev 0.8 */
  1561.                   else yyerror(GS_ERM2);
  1562.                 } break;
  1563. case 230:
  1564. # line 1020 "bifparse.y"
  1565. { 
  1566.                   if(not_repeated(3)) 
  1567.                      bif_scalefactors(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); /* rev 0.8 */
  1568.                   else yyerror(GS_ERM3);
  1569.                 } break;
  1570. case 231:
  1571. # line 1029 "bifparse.y"
  1572. {
  1573.                    (void)bif_gencircle(BIF_P_BEGIN); /*rev 0.8*/
  1574.                    (void)bif_circleedges(yypvt[-0].l); /* rev 0.8 */
  1575.                    (void)not_repeated(-1); 
  1576.                 } break;
  1577. case 232:
  1578. # line 1036 "bifparse.y"
  1579. {
  1580.                    (void)not_repeated(-1); 
  1581.                    (void)bif_gencircle(BIF_P_END);
  1582.                 } break;
  1583. case 234:
  1584. # line 1044 "bifparse.y"
  1585. { 
  1586.                   bif_exact(TRUE);
  1587.                 } break;
  1588. case 235:
  1589. # line 1049 "bifparse.y"
  1590. { 
  1591.                   if(not_repeated(1)) 
  1592.                      bif_center(yypvt[-2].f,yypvt[-1].f,0.0); /* rev 0.8 */
  1593.                   else yyerror(GC_ERM1);
  1594.                 } break;
  1595. case 236:
  1596. # line 1056 "bifparse.y"
  1597. { 
  1598.                   if(not_repeated(2)) 
  1599.                      bif_radius(yypvt[-1].f); /* rev 0.8 */
  1600.                   else yyerror(GC_ERM2);
  1601.                 } break;
  1602. case 237:
  1603. # line 1065 "bifparse.y"
  1604. {
  1605.                    (void)bif_gencircle3(BIF_P_BEGIN);/*rev 0.8*/
  1606.                    (void)bif_circleedges(yypvt[-0].l); /* rev 0.8 +3 */
  1607.                    (void)not_repeated(-1); 
  1608.                 } break;
  1609. case 238:
  1610. # line 1072 "bifparse.y"
  1611. {
  1612.                    (void)not_repeated(-1); 
  1613.                    (void)bif_gencircle3(BIF_P_END);
  1614.                 } break;
  1615. case 240:
  1616. # line 1080 "bifparse.y"
  1617. { 
  1618.                   bif_exact(TRUE);
  1619.                 } break;
  1620. case 241:
  1621. # line 1085 "bifparse.y"
  1622. { 
  1623.                   if(not_repeated(1)) 
  1624.                      bif_center(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); /* rev 0.8 */
  1625.                   else yyerror(GC3_ERM1);
  1626.                 } break;
  1627. case 242:
  1628. # line 1092 "bifparse.y"
  1629. { 
  1630.                   if(not_repeated(2)) 
  1631.                      bif_radius(yypvt[-1].f); /* rev 0.8 */
  1632.                   else yyerror(GC3_ERM2);
  1633.                 } break;
  1634. case 243:
  1635. # line 1099 "bifparse.y"
  1636. { 
  1637.                   if(not_repeated(3)) 
  1638.                      bif_normal(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); /* rev 0.8 */
  1639.                   else yyerror(GC3_ERM3);
  1640.                 } break;
  1641. case 244:
  1642. # line 1110 "bifparse.y"
  1643. {bif_text(yypvt[-3].f,yypvt[-2].f,yypvt[-1].str);} break;
  1644. case 245:
  1645. # line 1117 "bifparse.y"
  1646. { (void)bif_text3(yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].str, /*rev 0.8 delta*/
  1647.                     FALSE,0.,0.,0.,0.,0.,0.); } break;
  1648. case 246:
  1649. # line 1128 "bifparse.y"
  1650. { (void)bif_text3(yypvt[-13].f,yypvt[-12].f,yypvt[-11].f,yypvt[-10].str, /*rev 0.8 delta*/
  1651.                 TRUE,yypvt[-7].f,yypvt[-6].f,yypvt[-5].f,yypvt[-4].f,yypvt[-3].f,yypvt[-2].f);} break;
  1652. case 247:
  1653. # line 1137 "bifparse.y"
  1654. {bif_annotationtext(yypvt[-7].f,yypvt[-6].f,yypvt[-5].f, /* rev 0.8 */
  1655.                 yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].str);} break;
  1656. case 248:
  1657. # line 1154 "bifparse.y"
  1658. {
  1659.                    bif_pixelmap3(BIF_P_BEGIN,
  1660.                            yypvt[-6].f,yypvt[-5].f,yypvt[-4].f, yypvt[-3].l,yypvt[-2].l,yypvt[-1].l,yypvt[-0].l);
  1661.                 } break;
  1662. case 249:
  1663. # line 1161 "bifparse.y"
  1664. {
  1665.                   bif_pixelmap3(BIF_P_END,
  1666.                         0,0,0,0,0,0,0 );
  1667.                 } break;
  1668. case 250:
  1669. # line 1167 "bifparse.y"
  1670. { yyval.l = REPLACE ; } break;
  1671. case 251:
  1672. # line 1168 "bifparse.y"
  1673. {yyval.l=ADD;} break;
  1674. case 252:
  1675. # line 1169 "bifparse.y"
  1676. {yyval.l=AND;} break;
  1677. case 253:
  1678. # line 1170 "bifparse.y"
  1679. {yyval.l=CLEAR;} break;
  1680. case 254:
  1681. # line 1171 "bifparse.y"
  1682. {yyval.l=INVERT;} break;
  1683. case 255:
  1684. # line 1172 "bifparse.y"
  1685. {yyval.l=NAND;} break;
  1686. case 256:
  1687. # line 1173 "bifparse.y"
  1688. {yyval.l=NOOP;} break;
  1689. case 257:
  1690. # line 1174 "bifparse.y"
  1691. {yyval.l=NOR;} break;
  1692. case 258:
  1693. # line 1175 "bifparse.y"
  1694. {yyval.l=OR;} break;
  1695. case 259:
  1696. # line 1176 "bifparse.y"
  1697. {yyval.l=REPLACE;} break;
  1698. case 260:
  1699. # line 1177 "bifparse.y"
  1700. {yyval.l=SET;} break;
  1701. case 261:
  1702. # line 1178 "bifparse.y"
  1703. {yyval.l=SUBTRACT_DEST;} break;
  1704. case 262:
  1705. # line 1179 "bifparse.y"
  1706. {yyval.l=SUBTRACT_SOURCE;} break;
  1707. case 263:
  1708. # line 1180 "bifparse.y"
  1709. {yyval.l=XOR;} break;
  1710. case 264:
  1711. # line 1184 "bifparse.y"
  1712. { yyval.l = PIXEL_VALUES ;             } break;
  1713. case 265:
  1714. # line 1186 "bifparse.y"
  1715. { yyval.l = INTENSITY_VALUES ;         } break;
  1716. case 266:
  1717. # line 1188 "bifparse.y"
  1718. { yyval.l = PIXEL_VALUE_SEGMENTS ;     } break;
  1719. case 267:
  1720. # line 1190 "bifparse.y"
  1721. { yyval.l = INTENSITY_VALUE_SEGMENTS ; } break;
  1722. case 269:
  1723. # line 1195 "bifparse.y"
  1724. { bif_fillpixelbuffer(yypvt[-0].l); } break;
  1725. case 271:
  1726. # line 1200 "bifparse.y"
  1727. { bif_group(PSEUDO_COLOR); } break;
  1728. case 272:
  1729. # line 1202 "bifparse.y"
  1730. { bif_group(BIF_END_OF_GROUP); } break;
  1731. case 273:
  1732. # line 1210 "bifparse.y"
  1733. { 
  1734.                          (void)bif_nubc(BIF_P_BEGIN);
  1735.                         /*rev1.0*/ 
  1736.                        (void)bif_nubcholder(yypvt[-1].l,yypvt[-0].l);
  1737.                         /*rev1.0*/
  1738.                          (void)bif_group(CTRL_POINTS); 
  1739.                         /* rev 1.0 CTRL_POINTS*/
  1740.                     } break;
  1741. case 274:
  1742. # line 1219 "bifparse.y"
  1743. { 
  1744.                           (void)bif_group(BIF_END_OF_GROUP); 
  1745.                      } break;
  1746. case 275:
  1747. # line 1223 "bifparse.y"
  1748. { 
  1749.                           (void)bif_nubc (BIF_P_END);
  1750.                             /*rev 1.0*/
  1751.                      } break;
  1752. case 278:
  1753. # line 1233 "bifparse.y"
  1754. { 
  1755.                          (void)bif_group(KNOTS); 
  1756.                              /* rev 1.0 KNOTS*/
  1757.                      } break;
  1758. case 279:
  1759. # line 1239 "bifparse.y"
  1760. { 
  1761.                           (void)bif_group(BIF_END_OF_GROUP); 
  1762.                      } break;
  1763. case 280:
  1764. # line 1244 "bifparse.y"
  1765. { yyval.l = RATIONAL; } break;
  1766. case 281:
  1767. # line 1245 "bifparse.y"
  1768. { yyval.l = NON_RATIONAL; } break;
  1769. case 283:
  1770. # line 1250 "bifparse.y"
  1771. { bif_real_list(yypvt[-0].f); } break;
  1772. case 284:
  1773. # line 1262 "bifparse.y"
  1774. { 
  1775.                          (void)bif_nubs(BIF_P_BEGIN); 
  1776.                          not_repeated(-1); 
  1777.                          with_data_name = 
  1778.                             "NON_UNIFORM_BSPLINE_SURFACE";
  1779.                        (void)bif_nubsholder(yypvt[-4].l,yypvt[-3].l,
  1780.                                 yypvt[-2].l,yypvt[-1].l,yypvt[-0].l); 
  1781.                          (void)bif_group(CTRL_POINTS); 
  1782.                     } break;
  1783. case 285:
  1784. # line 1272 "bifparse.y"
  1785. { 
  1786.                           (void)bif_group(BIF_END_OF_GROUP); 
  1787.                      } break;
  1788. case 286:
  1789. # line 1276 "bifparse.y"
  1790. { 
  1791.                           (void)bif_nubs (BIF_P_END  );
  1792.                             /* rev 1.0*/
  1793.                      } break;
  1794. case 292:
  1795. # line 1290 "bifparse.y"
  1796. {
  1797.                          (void)bif_group(TRIMLOOP); 
  1798.                           (void)bif_group(BIF_END_OF_GROUP); 
  1799.                     } break;
  1800. case 296:
  1801. # line 1307 "bifparse.y"
  1802. { 
  1803.                          (void)bif_group(TRIMCURVE); 
  1804.                        bif_intlist(yypvt[-1].l);
  1805.                        bif_intlist(yypvt[-0].l);
  1806.                           (void)bif_group(BIF_END_OF_GROUP); 
  1807.                          (void)bif_group(CTRL_POINTS); 
  1808.                     } break;
  1809. case 297:
  1810. # line 1315 "bifparse.y"
  1811. { 
  1812.                           (void)bif_group(BIF_END_OF_GROUP); 
  1813.                      } break;
  1814. case 299:
  1815. # line 1323 "bifparse.y"
  1816. { 
  1817.                       if(not_repeated(1)) 
  1818.                       bif_group(UKNOTS); 
  1819.                           /* rev 1.0 UKNOTS*/
  1820.                       else 
  1821.                       { 
  1822.                          (void)bif_group(IGNORE_GROUP);  
  1823.                          WD3B_error("VERTEX_COLORS"); 
  1824.                       } 
  1825.                     } break;
  1826. case 300:
  1827. # line 1334 "bifparse.y"
  1828. { 
  1829.                           (void)bif_group(BIF_END_OF_GROUP); 
  1830.                      } break;
  1831. case 301:
  1832. # line 1340 "bifparse.y"
  1833. { 
  1834.                       if(not_repeated(2)) 
  1835.                       bif_group(VKNOTS); 
  1836.                           /* rev 1.0 VKNOTS*/
  1837.                       else 
  1838.                       { 
  1839.                          (void)bif_group(IGNORE_GROUP);  
  1840.                          WD3B_error("VERTEX_COLORS"); 
  1841.                       } 
  1842.                     } break;
  1843. case 302:
  1844. # line 1351 "bifparse.y"
  1845. { 
  1846.                           (void)bif_group(BIF_END_OF_GROUP); 
  1847.                      } break;
  1848. case 303:
  1849. # line 1363 "bifparse.y"
  1850. {
  1851.                        bif_curve_approx_criteria (yypvt[-2].l,yypvt[-1].f); 
  1852.                     } break;
  1853. case 304:
  1854. # line 1375 "bifparse.y"
  1855. {
  1856.                        bif_trimcurve_approx_criteria (yypvt[-2].l,yypvt[-1].f); 
  1857.                     } break;
  1858. case 305:
  1859. # line 1388 "bifparse.y"
  1860. {
  1861.                        bif_surface_approx_criteria (yypvt[-3].l,yypvt[-2].f,yypvt[-1].f); 
  1862.                     } break;
  1863. case 306:
  1864. # line 1397 "bifparse.y"
  1865. { (void)bif_mktype(yypvt[-1].l); } break;
  1866. case 307:
  1867. # line 1402 "bifparse.y"
  1868. { (void)bif_mkscale(yypvt[-1].f); } break;
  1869. case 308:
  1870. # line 1407 "bifparse.y"
  1871. { (void)
  1872.                       bif_mkcolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); } break;
  1873. case 309:
  1874. # line 1413 "bifparse.y"
  1875. { (void)bif_mkcolorindex(yypvt[-1].l); } break;
  1876. case 310:
  1877. # line 1418 "bifparse.y"
  1878. { (void)bif_linetype(yypvt[-1].l); } break;
  1879. case 311:
  1880. # line 1423 "bifparse.y"
  1881. { (void)bif_linewidth(yypvt[-1].f); } break;
  1882. case 312:
  1883. # line 1428 "bifparse.y"
  1884. { (void)
  1885.                       bif_linecolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); } break;
  1886. case 313:
  1887. # line 1434 "bifparse.y"
  1888. { (void)bif_linecolorindex(yypvt[-1].l); } break;
  1889. case 314:
  1890. # line 1439 "bifparse.y"
  1891. { (void)
  1892.                       bif_lineshading(yypvt[-1].l); } break;
  1893. case 315:
  1894. # line 1445 "bifparse.y"
  1895. { (void)
  1896.                        bif_intstyle(yypvt[-1].l); } break;
  1897. case 316:
  1898. # line 1449 "bifparse.y"
  1899. { yyval.l = HOLLOW ; } break;
  1900. case 317:
  1901. # line 1450 "bifparse.y"
  1902. { yyval.l = SOLID  ; } break;
  1903. case 318:
  1904. # line 1451 "bifparse.y"
  1905. { yyval.l = PATTERN; } break;
  1906. case 319:
  1907. # line 1452 "bifparse.y"
  1908. { yyval.l = EMPTY  ; } break;
  1909. case 320:
  1910. # line 1457 "bifparse.y"
  1911. { 
  1912.                   (void)bif_intpatternindex(yypvt[-1].l);/* rev 0.8 */
  1913.                 } break;
  1914. case 321:
  1915. # line 1464 "bifparse.y"
  1916. { 
  1917.                   (void)bif_intcolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f);/* rev 0.8 */
  1918.                 } break;
  1919. case 322:
  1920. # line 1471 "bifparse.y"
  1921. { (void)bif_intcolorindex(yypvt[-1].l); } break;
  1922. case 323:
  1923. # line 1476 "bifparse.y"
  1924. { (void)
  1925.                        bif_bkfintcolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); } break;
  1926. case 324:
  1927. # line 1483 "bifparse.y"
  1928. { (void)
  1929.                        bif_bkfintcolorindex(yypvt[-1].l); } break;
  1930. case 325:
  1931. # line 1490 "bifparse.y"
  1932. { (void)bif_intshade(yypvt[-1].l); } break;
  1933. case 326:
  1934. # line 1495 "bifparse.y"
  1935. { (void)bif_intlight(yypvt[-1].l); } break;
  1936. case 327:
  1937. # line 1503 "bifparse.y"
  1938. { (void)bif_surfprop(yypvt[-8].f,yypvt[-7].f,
  1939.                       yypvt[-6].f,yypvt[-5].f,yypvt[-4].f,yypvt[-3].f,
  1940.                       yypvt[-2].f,yypvt[-1].f); } break;
  1941. case 328:
  1942. # line 1513 "bifparse.y"
  1943. { (void)bif_bkfprop(yypvt[-8].f,yypvt[-7].f, /* rev 0.8 */
  1944.                       yypvt[-6].f,yypvt[-5].f,yypvt[-4].f,yypvt[-3].f,
  1945.                       yypvt[-2].f,yypvt[-1].f); } break;
  1946. case 329:
  1947. # line 1520 "bifparse.y"
  1948. { (void)
  1949.                        bif_bkfprocessing(yypvt[-2].l,yypvt[-1].l); } break;
  1950. case 330:
  1951. # line 1527 "bifparse.y"
  1952. { (void)bif_edgeflag(ENABLE ); } break;
  1953. case 331:
  1954. # line 1530 "bifparse.y"
  1955. { (void)bif_edgeflag(DISABLE ); } break;
  1956. case 332:
  1957. # line 1535 "bifparse.y"
  1958. { (void)bif_edgetype(yypvt[-1].l);} break;
  1959. case 333:
  1960. # line 1540 "bifparse.y"
  1961. { (void)bif_edgewidth(yypvt[-1].f); } break;
  1962. case 334:
  1963. # line 1545 "bifparse.y"
  1964. { 
  1965.                   (void)bif_edgecolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f);/* rev 0.8 */
  1966.                 } break;
  1967. case 335:
  1968. # line 1552 "bifparse.y"
  1969. { 
  1970.                   (void)bif_edgecolorindex(yypvt[-1].l);/* rev 0.8 */
  1971.                 } break;
  1972. case 336:
  1973. # line 1559 "bifparse.y"
  1974. { (void)bif_textfont(yypvt[-1].l); } break;
  1975. case 337:
  1976. # line 1564 "bifparse.y"
  1977. { (void)bif_textprec(STRING ); } break;
  1978. case 338:
  1979. # line 1567 "bifparse.y"
  1980. { (void)bif_textprec(CHAR ); } break;
  1981. case 339:
  1982. # line 1570 "bifparse.y"
  1983. { (void)bif_textprec(STROKE ); } break;
  1984. case 340:
  1985. # line 1575 "bifparse.y"
  1986. { (void)
  1987.                        bif_textcolor(yypvt[-3].f,yypvt[-2].f,yypvt[-1].f); } break;
  1988. case 341:
  1989. # line 1582 "bifparse.y"
  1990. { (void)bif_textcolorindex(yypvt[-1].l); } break;
  1991. case 342:
  1992. # line 1587 "bifparse.y"
  1993. { (void)bif_textpath(yypvt[-1].l); } break;
  1994. case 343:
  1995. # line 1593 "bifparse.y"
  1996. { (void)bif_textalign(yypvt[-2].l, yypvt[-1].l); } break;
  1997. case 344:
  1998. # line 1599 "bifparse.y"
  1999. { (void)bif_charheight(yypvt[-1].f); } break;
  2000. case 345:
  2001. # line 1604 "bifparse.y"
  2002. { (void)bif_charexp(yypvt[-1].f); } break;
  2003. case 346:
  2004. # line 1609 "bifparse.y"
  2005. { (void)bif_charspace(yypvt[-1].f); } break;
  2006. case 347:
  2007. # line 1616 "bifparse.y"
  2008. { (void)bif_charupvector(yypvt[-2].f, yypvt[-1].f); } break;
  2009. case 348:
  2010. # line 1621 "bifparse.y"
  2011. { (void)
  2012.                    bif_annotextcharheight(yypvt[-1].f); } break;
  2013. case 349:
  2014. # line 1627 "bifparse.y"
  2015. { (void)
  2016.                    bif_annotextcharupvector(yypvt[-2].f,yypvt[-1].f); } break;
  2017. case 350:
  2018. # line 1633 "bifparse.y"
  2019. { (void)
  2020.                           bif_annotextstyle(yypvt[-1].l); } break;
  2021. case 351:
  2022. # line 1642 "bifparse.y"
  2023. {(void)bif_lightstate(BIF_P_BEGIN);} break;
  2024. case 352:
  2025. # line 1644 "bifparse.y"
  2026. {(void)bif_group(ACTIVATE_LIST);} break;
  2027. case 353:
  2028. # line 1646 "bifparse.y"
  2029. {(void)bif_group(BIF_END_OF_GROUP);} break;
  2030. case 354:
  2031. # line 1648 "bifparse.y"
  2032. {(void)bif_group(DEACTIVATE_LIST);} break;
  2033. case 355:
  2034. # line 1650 "bifparse.y"
  2035. {(void)bif_group(BIF_END_OF_GROUP);} break;
  2036. case 356:
  2037. # line 1652 "bifparse.y"
  2038. {(void)bif_lightstate(BIF_P_END  );} break;
  2039. case 357:
  2040. # line 1657 "bifparse.y"
  2041. { (void)
  2042.                        bif_depthcueindex(yypvt[-1].l); } break;
  2043. case 358:
  2044. # line 1664 "bifparse.y"
  2045. {(void)bif_hlhsremoval(HLHS_DISABLE);} break;
  2046. case 359:
  2047. # line 1668 "bifparse.y"
  2048. {(void)bif_hlhsremoval(HLHS_ENABLE);} break;
  2049. case 360:
  2050. # line 1675 "bifparse.y"
  2051. {(void)bif_identity3(yypvt[-1].l);} break;
  2052. case 361:
  2053. # line 1681 "bifparse.y"
  2054. {(void)bif_concatmatrix3(yypvt[-3].l,yypvt[-2].l,yypvt[-1].l);} break;
  2055. case 362:
  2056. # line 1684 "bifparse.y"
  2057. { yyval.l = PRECONCAT; } break;
  2058. case 363:
  2059. # line 1685 "bifparse.y"
  2060. { yyval.l = POSTCONCAT; } break;
  2061. case 364:
  2062. # line 1686 "bifparse.y"
  2063. { yyval.l = REPLACE; } break;
  2064. case 365:
  2065. # line 1692 "bifparse.y"
  2066. {(void)bif_invertmatrix3(yypvt[-1].l);} break;
  2067. case 366:
  2068. # line 1701 "bifparse.y"
  2069. {(void)bif_rotate3(yypvt[-4].l,yypvt[-3].f,yypvt[-2].l,yypvt[-1].l);} break;
  2070. case 367:
  2071. # line 1704 "bifparse.y"
  2072. { yyval.l = X_AXIS; } break;
  2073. case 368:
  2074. # line 1705 "bifparse.y"
  2075. { yyval.l = Y_AXIS; } break;
  2076. case 369:
  2077. # line 1706 "bifparse.y"
  2078. { yyval.l = Z_AXIS; } break;
  2079. case 370:
  2080. # line 1714 "bifparse.y"
  2081. {(void)bif_rotatexyz3(yypvt[-5].l,yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].l);} break;
  2082. case 371:
  2083. # line 1722 "bifparse.y"
  2084. {(void)bif_translate3(yypvt[-5].l,yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].l);} break;
  2085. case 372:
  2086. # line 1730 "bifparse.y"
  2087. {(void)bif_scale3(yypvt[-5].l,yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].l);} break;
  2088. case 373:
  2089. # line 1749 "bifparse.y"
  2090. {
  2091.                      double amatrix[4][4];
  2092.                      amatrix[0][0] = yypvt[-24].f;
  2093.                      amatrix[0][1] = yypvt[-23].f;
  2094.                      amatrix[0][2] = yypvt[-22].f;
  2095.                      amatrix[0][3] = yypvt[-21].f;
  2096.  
  2097.                      amatrix[1][0] = yypvt[-18].f;
  2098.                      amatrix[1][1] = yypvt[-17].f;
  2099.                      amatrix[1][2] = yypvt[-16].f;
  2100.                      amatrix[1][3] = yypvt[-15].f;
  2101.  
  2102.                      amatrix[2][0] = yypvt[-12].f;
  2103.                      amatrix[2][1] = yypvt[-11].f;
  2104.                      amatrix[2][2] = yypvt[-10].f;
  2105.                      amatrix[2][3] = yypvt[-9].f;
  2106.  
  2107.                      amatrix[3][0] = yypvt[-6].f;
  2108.                      amatrix[3][1] = yypvt[-5].f;
  2109.                      amatrix[3][2] = yypvt[-4].f;
  2110.                      amatrix[3][3] = yypvt[-3].f;
  2111.                      (void)bif_matrix3(yypvt[-26].l,amatrix,yypvt[-1].l);
  2112.                     } break;
  2113. case 374:
  2114. # line 1779 "bifparse.y"
  2115. { 
  2116.                   (void)bif_getmatrix3(yypvt[-3].l,yypvt[-2].l,yypvt[-1].l);/* rev 0.8 */
  2117.                 } break;
  2118. case 375:
  2119. # line 1785 "bifparse.y"
  2120. { yyval.l = VIEW_MAPPING; } break;
  2121. case 376:
  2122. # line 1787 "bifparse.y"
  2123. { yyval.l = POSTCONCAT; } break;
  2124. case 377:
  2125. # line 1789 "bifparse.y"
  2126. { yyval.l = GLOBAL_MODELLING; } break;
  2127. case 378:
  2128. # line 1791 "bifparse.y"
  2129. { yyval.l = LOCAL_MODELLING; } break;
  2130. case 379:
  2131. # line 1793 "bifparse.y"
  2132. { yyval.l = COMPOSITE_MODELLING; } break;
  2133. case 380:
  2134. # line 1797 "bifparse.y"
  2135. {(void)bif_pushmatrix3(); } break;
  2136. case 381:
  2137. # line 1801 "bifparse.y"
  2138. {(void)bif_popmatrix3(); } break;
  2139. case 382:
  2140. # line 1818 "bifparse.y"
  2141. {
  2142.                      double amatrix[4][4];
  2143.                      amatrix[0][0] = yypvt[-23].f;
  2144.                      amatrix[0][1] = yypvt[-22].f;
  2145.                      amatrix[0][2] = yypvt[-21].f;
  2146.                      amatrix[0][3] = yypvt[-20].f;
  2147.  
  2148.                      amatrix[1][0] = yypvt[-17].f;
  2149.                      amatrix[1][1] = yypvt[-16].f;
  2150.                      amatrix[1][2] = yypvt[-15].f;
  2151.                      amatrix[1][3] = yypvt[-14].f;
  2152.  
  2153.                      amatrix[2][0] = yypvt[-11].f;
  2154.                      amatrix[2][1] = yypvt[-10].f;
  2155.                      amatrix[2][2] = yypvt[-9].f;
  2156.                      amatrix[2][3] = yypvt[-8].f;
  2157.  
  2158.                      amatrix[3][0] = yypvt[-5].f;
  2159.                      amatrix[3][1] = yypvt[-4].f;
  2160.                      amatrix[3][2] = yypvt[-3].f;
  2161.                      amatrix[3][3] = yypvt[-2].f;
  2162.  
  2163.                      (void)bif_gtransform3(amatrix);
  2164.                     } break;
  2165. case 383:
  2166. # line 1860 "bifparse.y"
  2167. {
  2168.                      double amatrix[4][4];
  2169.                      amatrix[0][0] = yypvt[-24].f;
  2170.                      amatrix[0][1] = yypvt[-23].f;
  2171.                      amatrix[0][2] = yypvt[-22].f;
  2172.                      amatrix[0][3] = yypvt[-21].f;
  2173.  
  2174.                      amatrix[1][0] = yypvt[-18].f;
  2175.                      amatrix[1][1] = yypvt[-17].f;
  2176.                      amatrix[1][2] = yypvt[-16].f;
  2177.                      amatrix[1][3] = yypvt[-15].f;
  2178.  
  2179.                      amatrix[2][0] = yypvt[-12].f;
  2180.                      amatrix[2][1] = yypvt[-11].f;
  2181.                      amatrix[2][2] = yypvt[-10].f;
  2182.                      amatrix[2][3] = yypvt[-9].f;
  2183.  
  2184.                      amatrix[3][0] = yypvt[-6].f;
  2185.                      amatrix[3][1] = yypvt[-5].f;
  2186.                      amatrix[3][2] = yypvt[-4].f;
  2187.                      amatrix[3][3] = yypvt[-3].f;
  2188.  
  2189.                      (void)bif_ltransform3(amatrix,yypvt[-1].l);
  2190.                     } break;
  2191. case 384:
  2192. # line 1891 "bifparse.y"
  2193. {(void)bif_applytoglobal3(yypvt[-1].l);} break;
  2194. case 385:
  2195. # line 1898 "bifparse.y"
  2196. {(void)bif_applytolocal3(yypvt[-2].l,yypvt[-1].l);} break;
  2197. case 386:
  2198. # line 1908 "bifparse.y"
  2199. {
  2200.                      double vrp[3],vpn[3],vup[3];
  2201.                      vrp[0] = yypvt[-9].f;
  2202.                      vrp[1] = yypvt[-8].f;
  2203.                      vrp[2] = yypvt[-7].f;
  2204.  
  2205.                      vpn[0] = yypvt[-6].f;
  2206.                      vpn[1] = yypvt[-5].f;
  2207.                      vpn[2] = yypvt[-4].f;
  2208.  
  2209.                      vup[0] = yypvt[-3].f;
  2210.                      vup[1] = yypvt[-2].f;
  2211.                      vup[2] = yypvt[-1].f;
  2212.  
  2213.                      (void)bif_vieworient3(yypvt[-10].l,vrp,vpn,vup);
  2214.                     } break;
  2215. case 387:
  2216. # line 1933 "bifparse.y"
  2217. {
  2218.                      double prp[3];
  2219.                      (void)bif_viewmap3(BIF_P_BEGIN);
  2220.                      prp[0] = yypvt[-4].f;
  2221.                      prp[1] = yypvt[-3].f;
  2222.                      prp[2] = yypvt[-2].f;
  2223.                      (void)bif_viewmapbasic(yypvt[-10].l, yypvt[-9].f, yypvt[-8].f,
  2224.                                yypvt[-7].f, yypvt[-6].f, yypvt[-5].l,prp,
  2225.                                yypvt[-1].f,yypvt[-0].f );
  2226.                     } break;
  2227. case 388:
  2228. # line 1945 "bifparse.y"
  2229. {(void)bif_viewmap3(BIF_P_END  );} break;
  2230. case 389:
  2231. # line 1948 "bifparse.y"
  2232. { yyval.l = PERSPECTIVE; } break;
  2233. case 390:
  2234. # line 1949 "bifparse.y"
  2235. { yyval.l = PARALLEL; } break;
  2236. case 392:
  2237. # line 1958 "bifparse.y"
  2238. {
  2239.                      (void)bif_viewmapmatch(yypvt[-5].f,yypvt[-4].f,yypvt[-3].f,yypvt[-2].f,yypvt[-1].l);
  2240.                     } break;
  2241. case 393:
  2242. # line 1963 "bifparse.y"
  2243. { yyval.l = ADJUST_X; } break;
  2244. case 394:
  2245. # line 1964 "bifparse.y"
  2246. { yyval.l = ADJUST_Y; } break;
  2247. case 395:
  2248. # line 1965 "bifparse.y"
  2249. { yyval.l = GROW; } break;
  2250. case 396:
  2251. # line 1966 "bifparse.y"
  2252. { yyval.l = SHRINK; } break;
  2253. case 397:
  2254. # line 1973 "bifparse.y"
  2255. {(void)bif_activeview(yypvt[-1].l);} break;
  2256. case 398:
  2257. # line 1980 "bifparse.y"
  2258. {(void)bif_execstr(yypvt[-1].l);} break;
  2259. case 399:
  2260. # line 1987 "bifparse.y"
  2261. {(void)bif_callstr(yypvt[-1].l);} break;
  2262. case 400:
  2263. # line 1992 "bifparse.y"
  2264. { 
  2265.                       char temp[STRLENGTH]; 
  2266.                       sprintf(temp,
  2267.                       "Unsupported entity (%s) ", yypvt[-0].str);
  2268.                        yyerror(temp);
  2269.                     } break;
  2270. case 401:
  2271. # line 2001 "bifparse.y"
  2272. { 
  2273.                       char temp[STRLENGTH]; 
  2274.                       sprintf(temp,
  2275.                       "End of Unsupported entity (%s) ", 
  2276.                        yypvt[-3].str);
  2277.                        yyerror(temp);
  2278.                     } break;
  2279. case 402:
  2280. # line 2017 "bifparse.y"
  2281. {(void)collapseAllStructures();} break;
  2282. case 403:
  2283. # line 2019 "bifparse.y"
  2284. {(void)expandAllStructures();} break;
  2285. case 405:
  2286. # line 2024 "bifparse.y"
  2287. {(void)bif_readgeom(yypvt[-0].str);} break;
  2288. case 407:
  2289. # line 2029 "bifparse.y"
  2290. {(void)bif_readgeom(yypvt[-0].str);} break;
  2291. case 409:
  2292. # line 2036 "bifparse.y"
  2293. {(void)bif_cleargeom();} break;
  2294. case 410:
  2295. # line 2043 "bifparse.y"
  2296. {(void)bif_reportfile(yypvt[-1].str);} break;
  2297. case 411:
  2298. # line 2048 "bifparse.y"
  2299. {(void)bif_pause();} break;
  2300. case 412:
  2301. # line 2055 "bifparse.y"
  2302. {(void)bif_sleep(yypvt[-1].l);} break;
  2303. case 415:
  2304. # line 2068 "bifparse.y"
  2305. { (void)bif_invokeatframe /* rev 0.8 */
  2306.                    (yypvt[-2].l,yypvt[-1].l,yypvt[-0].l,yypvt[-0].l); } break;
  2307. case 416:
  2308. # line 2075 "bifparse.y"
  2309. { (void)bif_invokeatframe /* rev 0.8 */
  2310.                    (yypvt[-4].l,yypvt[-3].l,yypvt[-2].l,yypvt[-0].l); } break;
  2311. case 417:
  2312. # line 2082 "bifparse.y"
  2313. { (void)bif_invokeatframe /* rev 0.8 */
  2314.                    (yypvt[-4].l,yypvt[-3].l,yypvt[-2].l,-1); } break;
  2315. case 418:
  2316. # line 2086 "bifparse.y"
  2317. { yyval.l = EXECUTE ; } break;
  2318. case 419:
  2319. # line 2087 "bifparse.y"
  2320. { yyval.l = CALL  ; } break;
  2321. case 421:
  2322. # line 2098 "bifparse.y"
  2323. {
  2324.                     (void) bif_definecolor /* rev 0.8 */
  2325.                        (yypvt[-3].l,yypvt[-2].f,yypvt[-1].f,yypvt[-0].f); 
  2326.                     } break;
  2327. case 422:
  2328. # line 2104 "bifparse.y"
  2329. {
  2330.                     (void) bif_definecolor
  2331.                        (yypvt[-3].l,yypvt[-2].f,yypvt[-1].f,yypvt[-0].f); 
  2332.                     } break;
  2333. case 423:
  2334. # line 2113 "bifparse.y"
  2335. {(void)bif_backgroundcolor /* rev 0.8 */
  2336.                        (yypvt[-3].f,yypvt[-2].f,yypvt[-1].f);} break;
  2337. case 424:
  2338. # line 2120 "bifparse.y"
  2339. {(void)bif_backgroundcolorindex(yypvt[-1].l);} break;
  2340. case 425:
  2341. # line 2131 "bifparse.y"
  2342. {(void)bif_viewspec(yypvt[-10].l, yypvt[-9].l,  yypvt[-8].l,
  2343.                                 /*  $5, $6,   */
  2344.                                 yypvt[-7].l, 
  2345.                                 yypvt[-6].l,
  2346.                                 yypvt[-5].l,
  2347.                                 yypvt[-4].f ,yypvt[-3].f , yypvt[-2].f,yypvt[-1].f);} break;
  2348. case 426:
  2349. # line 2139 "bifparse.y"
  2350. { yyval.l = XY_CLIP; } break;
  2351. case 427:
  2352. # line 2140 "bifparse.y"
  2353. { yyval.l = NO_XY_CLIP; } break;
  2354. case 428:
  2355. # line 2143 "bifparse.y"
  2356. { yyval.l = FRONT_CLIP; } break;
  2357. case 429:
  2358. # line 2144 "bifparse.y"
  2359. { yyval.l = NO_FRONT_CLIP; } break;
  2360. case 430:
  2361. # line 2147 "bifparse.y"
  2362. { yyval.l = BACK_CLIP; } break;
  2363. case 431:
  2364. # line 2148 "bifparse.y"
  2365. { yyval.l = NO_BACK_CLIP; } break;
  2366. case 432:
  2367. # line 2155 "bifparse.y"
  2368. {
  2369.                      (void)bif_defviewspec(yypvt[-3].l,yypvt[-2].f,yypvt[-1].l);
  2370.                     } break;
  2371. case 433:
  2372. # line 2161 "bifparse.y"
  2373. {(void)bif_definelight(BIF_P_BEGIN);} break;
  2374. case 434:
  2375. # line 2165 "bifparse.y"
  2376. {
  2377.                  (void)bif_lightbasic(yypvt[-6].l,yypvt[-5].f,yypvt[-4].f,yypvt[-3].f);
  2378.                  (void)bif_definelight(BIF_P_END  );
  2379.                 } break;
  2380. case 437:
  2381. # line 2177 "bifparse.y"
  2382. {
  2383.                  (void)
  2384.                  bif_lightoption(DIRECTIONAL_LIGHT, 
  2385.                      0., 0., 0.,
  2386.                      yypvt[-3].f, yypvt[-2].f, yypvt[-1].f,
  2387.                      0., 0.,
  2388.                      0., 0. );
  2389.                     } break;
  2390. case 438:
  2391. # line 2191 "bifparse.y"
  2392. {(void)
  2393.                  bif_lightoption(POSITIONAL_LIGHT, 
  2394.                      yypvt[-5].f, yypvt[-4].f, yypvt[-3].f,
  2395.                      0., 0., 0.,
  2396.                      0., 0.,
  2397.                      yypvt[-2].f, yypvt[-1].f );} break;
  2398. case 439:
  2399. # line 2202 "bifparse.y"
  2400. {(void)
  2401.                  bif_lightoption(SPOT_LIGHT, 
  2402.                      yypvt[-10].f, yypvt[-9].f, yypvt[-8].f,
  2403.                      yypvt[-7].f, yypvt[-6].f, yypvt[-5].f,
  2404.                      yypvt[-4].f, yypvt[-3].f,
  2405.                      yypvt[-2].f,yypvt[-1].f);} break;
  2406. case 441:
  2407. # line 2213 "bifparse.y"
  2408. { (void)bif_ldtransform(yypvt[-1].l); } break;
  2409. case 442:
  2410. # line 2219 "bifparse.y"
  2411. {(void)
  2412.                    bif_definedepthcue /* rev 0.8 CHANGED: JMZ */
  2413.                    (yypvt[-2].l, DISABLE, 0.,0., 0.,0., 0.,0.,0.0); } break;
  2414. case 443:
  2415. # line 2230 "bifparse.y"
  2416. {(void)
  2417.                    bif_definedepthcue /* rev 0.8 CHANGED: JMZ */
  2418.                    (yypvt[-11].l, ENABLE, yypvt[-8].f,yypvt[-7].f, yypvt[-6].f,yypvt[-5].f, yypvt[-4].f,yypvt[-3].f,yypvt[-2].f); } break;
  2419. case 444:
  2420. # line 2236 "bifparse.y"
  2421. {
  2422.                    bif_defaultconfig();
  2423.                    bif_openwk();
  2424.                 } break;
  2425. case 445:
  2426. # line 2243 "bifparse.y"
  2427. {
  2428.                    bif_defaultconfig();
  2429.                    bif_openwk();
  2430.                 } break;
  2431. case 446:
  2432. # line 2248 "bifparse.y"
  2433. {
  2434.                    (void)not_repeated(-1);
  2435.                    bif_defaultconfig();
  2436.                 } break;
  2437. case 447:
  2438. # line 2254 "bifparse.y"
  2439. {
  2440.                    bif_openwk();
  2441.                    (void)not_repeated(-1);
  2442.                 } break;
  2443. case 449:
  2444. # line 2262 "bifparse.y"
  2445. { 
  2446.                   if(not_repeated(1)) bif_colormodel(RGB);
  2447.                   else yyerror(CB_ERM1);
  2448.                 } break;
  2449. case 450:
  2450. # line 2267 "bifparse.y"
  2451. { 
  2452.                   if(not_repeated(1)) bif_colormodel(CIE);
  2453.                   else yyerror(CB_ERM1);
  2454.                 } break;
  2455. case 451:
  2456. # line 2272 "bifparse.y"
  2457. { 
  2458.                   if(not_repeated(1)) bif_colormodel(HSV);
  2459.                   else yyerror(CB_ERM1);
  2460.                 } break;
  2461. case 452:
  2462. # line 2277 "bifparse.y"
  2463. { 
  2464.                   if(not_repeated(1))
  2465.                      bif_colormodel(HLS); /* rev 0.8 mod. */
  2466.                   else yyerror(CB_ERM1);
  2467.                 } break;
  2468. case 453:
  2469. # line 2283 "bifparse.y"
  2470. { if(not_repeated(2))
  2471.                           bif_buffermode(DOUBLE_BUFFER); /*rev 0.8*/
  2472.                   else
  2473.                      yyerror(CB_ERM2);
  2474.                 } break;
  2475. case 454:
  2476. # line 2289 "bifparse.y"
  2477. { if(not_repeated(2))
  2478.                      bif_buffermode(SINGLE_BUFFER); 
  2479.                   else
  2480.                      yyerror(CB_ERM2);
  2481.                 } break;
  2482. case 455:
  2483. # line 2295 "bifparse.y"
  2484. { if(not_repeated(3))
  2485.                           bif_colormode(TRUE_COLOR); /* rev 0.8 */
  2486.                   else
  2487.                      yyerror(CB_ERM3);
  2488.                 } break;
  2489. case 456:
  2490. # line 2301 "bifparse.y"
  2491. { if(not_repeated(3))
  2492.                           bif_colormode(PSEUDO_COLOR); /* rev 0.8 */
  2493.                   else
  2494.                      yyerror(CB_ERM3);
  2495.                 } break;
  2496. case 457:
  2497. # line 2307 "bifparse.y"
  2498. { if(not_repeated(4))
  2499.                             (void)bif_window(yypvt[-1].l,yypvt[-0].l);
  2500.                   else
  2501.                      yyerror(CB_ERM4);
  2502.                 } break;
  2503. case 458:
  2504. # line 2317 "bifparse.y"
  2505. { yyval.f = yypvt[-0].f; } break;
  2506. case 459:
  2507. # line 2318 "bifparse.y"
  2508. { yyval.f = (double)yypvt[-0].l; } break;
  2509.         }
  2510.         goto yystack;  /* stack new state and value */
  2511.  
  2512.     }
  2513.