Fossil

#define TP_JMASK   0x0003  /* Mask for justification bits */
#define TP_ABOVE2  0x0004  /* Position text way above PElem.ptAt */
#define TP_ABOVE   0x0008  /* Position text above PElem.ptAt */
#define TP_CENTER  0x0010  /* On the line */
#define TP_BELOW   0x0020  /* Position text below PElem.ptAt */
#define TP_BELOW2  0x0040  /* Position text way below PElem.ptAt */
#define TP_VMASK   0x007c  /* Mask for text positioning flags */
#define TP_BIG     0x0100  /* Larger font */
#define TP_SMALL   0x0200  /* Smaller font */
#define TP_XTRA    0x0400  /* Amplify TP_BIG or TP_SMALL */
#define TP_SZMASK  0x0700  /* Font size mask */
#define TP_ITALIC  0x1000  /* Italic font */
#define TP_BOLD    0x2000  /* Bold font */
#define TP_FMASK   0x3000  /* Mask for font style */
#define TP_ALIGN   0x4000  /* Rotate to align with the line */

/* An object to hold a position in 2-D space */
struct PPoint {

static PPoint pik_position_at_hdg(Pik *p, PNum dist, PToken *pD, PPoint pt);
static void pik_same(Pik *p, PElem*, PToken*);
static PPoint pik_nth_vertex(Pik *p, PToken *pNth, PToken *pErr, PElem *pElem);
static PToken pik_next_semantic_token(Pik *p, PToken *pThis);
static void pik_compute_layout_settings(Pik*);


#line 453 "pikchr.c"
/**************** End of %include directives **********************************/
/* These constants specify the various numeric values for terminal symbols.
***************** Begin token definitions *************************************/
#ifndef T_ID
#define T_ID                              1
#define T_EDGEPT                          2
#define T_OF                              3

#define T_DASHED                         46
#define T_CW                             47
#define T_CCW                            48
#define T_LARROW                         49
#define T_RARROW                         50
#define T_LRARROW                        51
#define T_INVIS                          52
#define T_THICK                          53
#define T_THIN                           54
#define T_CENTER                         55
#define T_LJUST                          56
#define T_RJUST                          57
#define T_ABOVE                          58
#define T_BELOW                          59
#define T_ITALIC                         60
#define T_BOLD                           61
#define T_ALIGNED                        62
#define T_BIG                            63
#define T_SMALL                          64
#define T_LP                             65
#define T_RP                             66
#define T_HEADING                        67
#define T_WAY                            68
#define T_BETWEEN                        69
#define T_THE                            70
#define T_DOT_L                          71
#define T_START                          72
#define T_END                            73
#define T_NTH                            74
#define T_VERTEX                         75
#define T_IN                             76
#define T_DOT_U                          77
#define T_LAST                           78
#define T_NUMBER                         79
#define T_FUNC1                          80
#define T_FUNC2                          81
#define T_X                              82
#define T_Y                              83
#define T_TOP                            84
#define T_BOTTOM                         85
#endif
/**************** End token definitions ***************************************/

/* The next sections is a series of control #defines.
** various aspects of the generated parser.
**    YYCODETYPE         is the data type used to store the integer codes
**                       that represent terminal and non-terminal symbols.

**    YY_MAX_REDUCE      Maximum value for reduce actions
*/
#ifndef INTERFACE
# define INTERFACE 1
#endif
/************* Begin control #defines *****************************************/
#define YYCODETYPE unsigned char
#define YYNOCODE 119
#define YYACTIONTYPE unsigned short int
#define pik_parserTOKENTYPE PToken
typedef union {
  int yyinit;
  pik_parserTOKENTYPE yy0;
  PElem* yy26;
  int yy60;
  PEList* yy120;
  PPoint yy131;

  PNum yy191;
} YYMINORTYPE;
#ifndef YYSTACKDEPTH
#define YYSTACKDEPTH 100
#endif
#define pik_parserARG_SDECL
#define pik_parserARG_PDECL
#define pik_parserARG_PARAM
#define pik_parserARG_FETCH
#define pik_parserARG_STORE
#define pik_parserCTX_SDECL Pik *p;
#define pik_parserCTX_PDECL ,Pik *p
#define pik_parserCTX_PARAM ,p
#define pik_parserCTX_FETCH Pik *p=yypParser->p;
#define pik_parserCTX_STORE yypParser->p=p;
#define YYFALLBACK 1
#define YYNSTATE             153
#define YYNRULE              148
#define YYNRULE_WITH_ACTION  112
#define YYNTOKEN             86
#define YY_MAX_SHIFT         152
#define YY_MIN_SHIFTREDUCE   270
#define YY_MAX_SHIFTREDUCE   417
#define YY_ERROR_ACTION      418
#define YY_ACCEPT_ACTION     419
#define YY_NO_ACTION         420
#define YY_MIN_REDUCE        421
#define YY_MAX_REDUCE        568
/************* End control #defines *******************************************/
#define YY_NLOOKAHEAD ((int)(sizeof(yy_lookahead)/sizeof(yy_lookahead[0])))

/* Define the yytestcase() macro to be a no-op if is not already defined
** otherwise.
**
** Applications can choose to define yytestcase() in the %include section

**  yy_shift_ofst[]    For each state, the offset into yy_action for
**                     shifting terminals.
**  yy_reduce_ofst[]   For each state, the offset into yy_action for
**                     shifting non-terminals after a reduce.
**  yy_default[]       Default action for each state.
**
*********** Begin parsing tables **********************************************/
#define YY_ACTTAB_COUNT (859)
static const YYACTIONTYPE yy_action[] = {
 /*     0 */    64,  137,  129,   19,  139,  135,  141,   99,  101,  100,
 /*    10 */   151,  109,   38,   35,  405,  406,  315,  522,   72,  113,
 /*    20 */   523,  524,  521,  390,  391,  392,  393,  303,  304,   10,
 /*    30 */     9,  307,    8,   51,  111,  132,  312,   50,   49,   48,
 /*    40 */    47,  315,  315,  315,  315,  403,  404,  316,  317,  318,
 /*    50 */   319,  320,  321,  322,  323,  367,  413,  142,   45,   46,
 /*    60 */   352,  148,  405,  406,  315,   25,  350,   62,  405,  406,
 /*    70 */   315,  286,  427,   26,   65,   12,  129,  290,  112,  416,
 /*    80 */   417,  428,  101,  100,  151,  109,  413,   24,  112,  315,
 /*    90 */   315,  315,  315,  403,  404,  315,  315,  315,  315,  403,
 /*   100 */   404,  367,  114,  114,   45,   46,  461,  151,  109,  416,
 /*   110 */   417,   22,  350,  553,  405,  406,  315,   73,  108,    1,
 /*   120 */   342,  343,  332,   74,   66,   67,  131,  130,   89,   52,
 /*   130 */   412,  412,  107,  366,  144,  143,  412,  412,  414,  415,
 /*   140 */    62,  315,  315,  315,  315,  403,  404,  367,  413,    6,
 /*   150 */    45,   46,   50,   49,   48,   47,   30,    7,  350,   50,
 /*   160 */    49,   48,   47,   68,   71,    5,  288,   70,  414,  415,
 /*   170 */    63,  416,  417,  400,   94,  374,  375,   13,  107,  366,
 /*   180 */   144,  143,  412,  412,  367,  413,  421,   45,   46,   41,
 /*   190 */   399,   27,   40,   28,   31,  350,   25,  325,  325,  325,
 /*   200 */   325,  325,  325,  325,  325,  325,  325,  116,  416,  417,
 /*   210 */    11,    1,  547,  547,   50,   49,   48,   47,  131,  130,
 /*   220 */    89,  330,   48,   47,  107,  366,  144,  143,   77,   33,
 /*   230 */   414,  415,  367,  354,  147,   45,   46,  103,  151,  109,
 /*   240 */   331,   95,  410,   96,  120,  281,  282,  283,    1,  285,
 /*   250 */   103,  151,  109,  408,  435,  131,  130,   89,  121,   69,
 /*   260 */    69,  107,  366,  144,  143,   14,  382,  414,  415,   15,
 /*   270 */   124,  122,   50,   49,   48,   47,  365,  133,   16,  383,
 /*   280 */   384,  385,  387,   71,   53,  288,   70,   39,  390,  391,
 /*   290 */   392,  393,  106,  126,  125,   54,    5,  124,  122,   50,
 /*   300 */    49,   48,   47,  350,  367,   94,  102,   45,   46,  107,
 /*   310 */   366,  144,  143,    2,   39,  350,   50,   49,   48,   47,
 /*   320 */   126,  125,  380,  381,  353,  149,   18,   17,   55,  405,
 /*   330 */   406,  315,   56,  379,  365,   32,  123,  409,   95,  367,
 /*   340 */   117,  115,   45,   46,  378,  377,   57,  103,  151,  109,
 /*   350 */   350,  449,   58,   18,   17,   59,  315,  315,  315,  315,
 /*   360 */   403,  404,   32,  123,  409,   97,   60,  376,    5,  107,
 /*   370 */    43,  501,  110,  422,  429,   26,   44,   94,  329,  425,
 /*   380 */    61,  107,  366,  144,  143,  367,  358,  356,   45,   46,
 /*   390 */   152,  357,  419,   21,  150,  351,   96,  412,  412,   29,
 /*   400 */    75,  137,  501,    5,  139,  135,  141,  420,  501,  103,
 /*   410 */   151,  109,   94,  352,  148,  420,  107,  366,  144,  143,
 /*   420 */   367,  420,  420,   45,   46,  420,  420,   98,  422,  429,
 /*   430 */    26,  350,   76,  137,  425,  420,  139,  135,  141,  420,
 /*   440 */   420,  103,  151,  109,  420,  152,  420,  420,   21,    5,
 /*   450 */    88,  137,  420,  420,  139,  135,  141,  420,   94,  103,
 /*   460 */   151,  109,  107,  366,  144,  143,  367,  420,  128,   45,
 /*   470 */    46,  108,   65,  420,  129,  420,   95,  350,  420,  465,
 /*   480 */   101,  100,  151,  109,    3,  103,  151,  109,  420,  435,
 /*   490 */   127,  151,  109,   94,   65,  540,  129,  107,  366,  144,
 /*   500 */   143,  464,  101,  100,  151,  109,  420,   65,  420,  129,
 /*   510 */    82,  497,  151,  109,  459,  101,  100,  151,  109,  103,
 /*   520 */   151,  109,  420,  420,   65,   20,  129,   78,  420,  420,
 /*   530 */     4,  457,  101,  100,  151,  109,  103,  151,  109,   94,
 /*   540 */    65,  420,  129,  107,  366,  144,  143,  456,  101,  100,
 /*   550 */   151,  109,   65,  420,  129,  496,  151,  109,  420,  484,
 /*   560 */   101,  100,  151,  109,  420,   65,  420,  129,  420,  420,
 /*   570 */    95,  420,  119,  101,  100,  151,  109,  420,   84,  103,
 /*   580 */   151,  109,  420,  426,   65,  420,  129,  103,  151,  109,
 /*   590 */   420,  490,  101,  100,  151,  109,   65,  420,  129,  438,



 /*   600 */   420,   23,  420,  489,  101,  100,  151,  109,   65,  420,
 /*   610 */   129,   50,   49,   48,   47,  488,  101,  100,  151,  109,
 /*   620 */   420,   65,  420,  129,  420,  420,   36,  420,  487,  101,
 /*   630 */   100,  151,  109,   65,  420,  129,  420,  420,  413,  420,
 /*   640 */   486,  101,  100,  151,  109,   65,  420,  129,   50,   49,
 /*   650 */    48,   47,  485,  101,  100,  151,  109,  420,   65,  420,
 /*   660 */   129,  416,  417,   34,  420,  118,  101,  100,  151,  109,
 /*   670 */   495,  151,  109,  365,  420,   65,  420,  129,   50,   49,
 /*   680 */    48,   47,  453,  101,  100,  151,  109,   50,   49,   48,
 /*   690 */    47,  423,  429,   26,  134,  151,  109,  425,   50,   49,
 /*   700 */    48,   47,   37,   50,   49,   48,   47,  420,  152,  420,
 /*   710 */   420,   21,  420,   50,   49,   48,   47,  299,  420,  420,
 /*   720 */   414,  415,   50,   49,   48,   47,  294,   50,   49,   48,
 /*   730 */    47,  293,   50,   49,   48,   47,  420,  352,  148,   90,
 /*   740 */   369,  420,   79,  420,  420,   80,  420,   42,  103,  151,
 /*   750 */   109,  103,  151,  109,  103,  151,  109,   91,  420,  420,
 /*   760 */   368,  136,  151,  109,  420,  365,  103,  151,  109,   81,
 /*   770 */   420,  420,   92,  420,  420,   93,  420,  420,  103,  151,
 /*   780 */   109,  103,  151,  109,  103,  151,  109,  420,   83,  420,
 /*   790 */   420,   85,  146,  420,   86,  108,  420,  103,  151,  109,
 /*   800 */   103,  151,  109,  103,  151,  109,   87,  420,  420,  420,
 /*   810 */   420,  515,  420,  420,  514,  103,  151,  109,  420,  513,
 /*   820 */   103,  151,  109,  103,  151,  109,  512,  420,  103,  151,
 /*   830 */   109,  104,  138,  151,  109,  103,  151,  109,  105,  420,
 /*   840 */   103,  151,  109,  420,  420,  420,  420,  103,  151,  109,

 /*   850 */   140,  151,  109,  145,  151,  109,  500,  151,  109,
};
static const YYCODETYPE yy_lookahead[] = {
 /*     0 */    90,   91,   92,  118,   94,   95,   96,   97,   98,   99,
 /*    10 */   100,  101,    4,    5,   14,   15,   16,   91,   18,   92,
 /*    20 */    94,   95,   96,   23,   24,   25,   26,   27,   28,   29,
 /*    30 */    30,   31,   32,   33,   34,   92,   36,    4,    5,    6,
 /*    40 */     7,   41,   42,   43,   44,   45,   46,   47,   48,   49,
 /*    50 */    50,   51,   52,   53,   54,    1,    2,   92,    4,    5,
 /*    60 */    20,   21,   14,   15,   16,   10,   12,    3,   14,   15,
 /*    70 */    16,   19,   88,   89,   90,   19,   92,   22,   92,   25,
 /*    80 */    26,   97,   98,   99,  100,  101,    2,  110,   92,   41,
 /*    90 */    42,   43,   44,   45,   46,   41,   42,   43,   44,   45,
 /*   100 */    46,    1,  116,  117,    4,    5,   99,  100,  101,   25,
 /*   110 */    26,  112,   12,  117,   14,   15,   16,  102,   78,   65,
 /*   120 */    72,   73,   66,  102,   40,   40,   72,   73,   74,   35,
 /*   130 */    82,   83,   78,   79,   80,   81,   82,   83,   84,   85,
 /*   140 */    76,   41,   42,   43,   44,   45,   46,    1,    2,   32,
 /*   150 */     4,    5,    4,    5,    6,    7,   71,   32,   12,    4,
 /*   160 */     5,    6,    7,   40,   18,   65,   20,   21,   84,   85,
 /*   170 */    39,   25,   26,   33,   74,   82,   83,   29,   78,   79,
 /*   180 */    80,   81,   82,   83,    1,    2,    0,    4,    5,   91,
 /*   190 */    33,   93,   94,   95,   71,   12,   10,   55,   56,   57,
 /*   200 */    58,   59,   60,   61,   62,   63,   64,   38,   25,   26,
 /*   210 */    39,   65,  114,  115,    4,    5,    6,    7,   72,   73,
 /*   220 */    74,   66,    6,    7,   78,   79,   80,   81,   90,   19,



 /*   230 */    84,   85,    1,   20,   21,    4,    5,   99,  100,  101,
 /*   240 */    66,   90,   69,   12,   68,   14,   15,   16,   65,   18,
 /*   250 */    99,  100,  101,   69,  103,   72,   73,   74,   70,  108,
 /*   260 */   109,   78,   79,   80,   81,    3,    1,   84,   85,    3,
 /*   270 */     2,    3,    4,    5,    6,    7,   66,   12,    3,   14,
 /*   280 */    15,   16,   17,   18,    3,   20,   21,   19,   23,   24,
 /*   290 */    25,   26,   71,   25,   26,    3,   65,    2,    3,    4,
 /*   300 */     5,    6,    7,   12,    1,   74,   71,    4,    5,   78,
 /*   310 */    79,   80,   81,   13,   19,   12,    4,    5,    6,    7,
 /*   320 */    25,   26,   82,   83,   20,   21,   58,   59,    3,   14,
 /*   330 */    15,   16,    3,   66,   66,   67,   68,   69,   90,    1,
 /*   340 */    37,   38,    4,    5,   66,   66,    3,   99,  100,  101,
 /*   350 */    12,  103,    3,   58,   59,    3,   41,   42,   43,   44,
 /*   360 */    45,   46,   67,   68,   69,   74,    3,   66,   65,   78,
 /*   370 */    65,   40,   86,   87,   88,   89,   65,   74,   66,   93,
 /*   380 */     3,   78,   79,   80,   81,    1,   22,   22,    4,    5,
 /*   390 */   104,   22,  106,  107,   77,   12,   12,   82,   83,   11,
 /*   400 */    90,   91,   71,   65,   94,   95,   96,  119,   77,   99,
 /*   410 */   100,  101,   74,   20,   21,  119,   78,   79,   80,   81,
 /*   420 */     1,  119,  119,    4,    5,  119,  119,   86,   87,   88,
 /*   430 */    89,   12,   90,   91,   93,  119,   94,   95,   96,  119,
 /*   440 */   119,   99,  100,  101,  119,  104,  119,  119,  107,   65,
 /*   450 */    90,   91,  119,  119,   94,   95,   96,  119,   74,   99,
 /*   460 */   100,  101,   78,   79,   80,   81,    1,  119,   75,    4,
 /*   470 */     5,   78,   90,  119,   92,  119,   90,   12,  119,   97,
 /*   480 */    98,   99,  100,  101,   65,   99,  100,  101,  119,  103,
 /*   490 */    99,  100,  101,   74,   90,  109,   92,   78,   79,   80,
 /*   500 */    81,   97,   98,   99,  100,  101,  119,   90,  119,   92,
 /*   510 */    90,   99,  100,  101,   97,   98,   99,  100,  101,   99,
 /*   520 */   100,  101,  119,  119,   90,  105,   92,   90,  119,  119,
 /*   530 */    65,   97,   98,   99,  100,  101,   99,  100,  101,   74,
 /*   540 */    90,  119,   92,   78,   79,   80,   81,   97,   98,   99,
 /*   550 */   100,  101,   90,  119,   92,   99,  100,  101,  119,   97,
 /*   560 */    98,   99,  100,  101,  119,   90,  119,   92,  119,  119,
 /*   570 */    90,  119,   97,   98,   99,  100,  101,  119,   90,   99,
 /*   580 */   100,  101,  119,  103,   90,  119,   92,   99,  100,  101,
 /*   590 */   119,   97,   98,   99,  100,  101,   90,  119,   92,  111,
 /*   600 */   119,  113,  119,   97,   98,   99,  100,  101,   90,  119,
 /*   610 */    92,    4,    5,    6,    7,   97,   98,   99,  100,  101,
 /*   620 */   119,   90,  119,   92,  119,  119,   19,  119,   97,   98,
 /*   630 */    99,  100,  101,   90,  119,   92,  119,  119,    2,  119,
 /*   640 */    97,   98,   99,  100,  101,   90,  119,   92,    4,    5,
 /*   650 */     6,    7,   97,   98,   99,  100,  101,  119,   90,  119,
 /*   660 */    92,   25,   26,   19,  119,   97,   98,   99,  100,  101,
 /*   670 */    99,  100,  101,   66,  119,   90,  119,   92,    4,    5,
 /*   680 */     6,    7,   97,   98,   99,  100,  101,    4,    5,    6,
 /*   690 */     7,   87,   88,   89,   99,  100,  101,   93,    4,    5,
 /*   700 */     6,    7,   19,    4,    5,    6,    7,  119,  104,  119,

 /*   710 */   119,  107,  119,    4,    5,    6,    7,    8,  119,  119,
 /*   720 */    84,   85,    4,    5,    6,    7,    8,    4,    5,    6,
 /*   730 */     7,    8,    4,    5,    6,    7,  119,   20,   21,   90,
 /*   740 */    66,  119,   90,  119,  119,   90,  119,   19,   99,  100,
 /*   750 */   101,   99,  100,  101,   99,  100,  101,   90,  119,  119,
 /*   760 */    66,   99,  100,  101,  119,   66,   99,  100,  101,   90,
 /*   770 */   119,  119,   90,  119,  119,   90,  119,  119,   99,  100,
 /*   780 */   101,   99,  100,  101,   99,  100,  101,  119,   90,  119,
 /*   790 */   119,   90,   75,  119,   90,   78,  119,   99,  100,  101,
 /*   800 */    99,  100,  101,   99,  100,  101,   90,  119,  119,  119,
 /*   810 */   119,   90,  119,  119,   90,   99,  100,  101,  119,   90,
 /*   820 */    99,  100,  101,   99,  100,  101,   90,  119,   99,  100,
 /*   830 */   101,   90,   99,  100,  101,   99,  100,  101,   90,  119,
 /*   840 */    99,  100,  101,  119,  119,  119,  119,   99,  100,  101,
 /*   850 */    99,  100,  101,   99,  100,  101,   99,  100,  101,   86,
 /*   860 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   870 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   880 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   890 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   900 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   910 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   920 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   930 */    86,   86,   86,   86,   86,   86,   86,   86,   86,   86,
 /*   940 */    86,   86,   86,   86,   86,
};
#define YY_SHIFT_COUNT    (152)
#define YY_SHIFT_MIN      (0)
#define YY_SHIFT_MAX      (728)
static const unsigned short int yy_shift_ofst[] = {
 /*     0 */   265,   54,  146,  100,  100,  100,  183,  183,  183,  183,
 /*    10 */   183,  183,  183,  183,  183,  183,  183,  183,  183,  183,
 /*    20 */   183,  231,  265,    0,  231,  265,  338,  303,  384,  384,
 /*    30 */    48,  315,  338,  338,  338,  419,  338,  338,  465,  338,
 /*    40 */   338,  338,  338,  338,  338,  338,  338,  338,  338,  338,
 /*    50 */   338,   84,  291,  291,  291,  291,  291,  291,  291,  291,
 /*    60 */   291,  291,  291,   84,  268,  295,  636,  636,  636,   52,
 /*    70 */   859,  859,  859,  142,  142,  210,  607,  148,  155,  644,
 /*    80 */   312,  683,  709,  718,  723,  674,  728,  694,  699,  393,
 /*    90 */    33,   33,   33,   33,  717,   33,  331,   40,   55,   56,
 /*   100 */    85,    8,   93,  123,  216,  216,  240,  213,  304,   64,
 /*   110 */   186,   94,  117,  125,  131,  140,  157,  169,  171,  174,
 /*   120 */   173,  176,  188,  184,  262,  266,  275,  221,  281,  292,
 /*   130 */   325,  329,  235,  300,  267,  343,  278,  349,  279,  352,
 /*   140 */   301,  363,  235,  305,  311,  221,  377,  364,  365,  369,
 /*   150 */   383,  317,  388,
};
#define YY_REDUCE_COUNT (72)
#define YY_REDUCE_MIN   (-115)
#define YY_REDUCE_MAX   (757)
static const short yy_reduce_ofst[] = {
 /*     0 */   286,  -90,  -16,  310,  342,  360,  382,  404,  417,  434,
 /*    10 */   450,  462,  475,  494,  506,  518,  531,  543,  555,  568,
 /*    20 */   585,  151,  341,   98,  386,  604,  488,  420,  248,  480,
 /*    30 */   -74,  -74,  138,  437,  649,  652,  655,  667,  679,  682,
 /*    40 */   685,  698,  701,  704,  716,  721,  724,  729,  736,  741,
 /*    50 */   748,  -14,    7,  391,  412,  456,  571,  595,  662,  733,
 /*    60 */   751,  754,  757,   -4, -115, -115,  -73,  -57,  -35,  -23,
 /*    70 */    -1,   15,   21,
};
static const YYACTIONTYPE yy_default[] = {
 /*     0 */   424,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*    10 */   418,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*    20 */   418,  418,  424,  545,  418,  424,  546,  452,  418,  418,
 /*    30 */   418,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*    40 */   448,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*    50 */   418,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*    60 */   418,  418,  418,  418,  418,  418,  418,  418,  418,  430,
 /*    70 */   442,  475,  475,  440,  462,  418,  418,  418,  418,  418,
 /*    80 */   418,  418,  451,  446,  443,  418,  418,  418,  418,  418,
 /*    90 */   479,  478,  477,  447,  418,  537,  431,  418,  418,  418,
 /*   100 */   491,  558,  418,  418,  511,  510,  418,  506,  418,  499,
 /*   110 */   418,  460,  418,  418,  549,  418,  418,  418,  418,  418,
 /*   120 */   418,  418,  418,  418,  418,  418,  418,  498,  418,  418,
 /*   130 */   418,  418,  492,  418,  418,  418,  418,  418,  418,  418,
 /*   140 */   418,  418,  418,  418,  418,  418,  418,  418,  418,  418,
 /*   150 */   418,  562,  418,
};
/********** End of lemon-generated parsing tables *****************************/

/* The next table maps tokens (terminal symbols) into fallback tokens.  
** If a construct like the following:
** 
**      %fallback ID X Y Z.

    0,  /*     DASHED => nothing */
    0,  /*         CW => nothing */
    0,  /*        CCW => nothing */
    0,  /*     LARROW => nothing */
    0,  /*     RARROW => nothing */
    0,  /*    LRARROW => nothing */
    0,  /*      INVIS => nothing */
    0,  /*      THICK => nothing */
    0,  /*       THIN => nothing */
    0,  /*     CENTER => nothing */
    0,  /*      LJUST => nothing */
    0,  /*      RJUST => nothing */
    0,  /*      ABOVE => nothing */
    0,  /*      BELOW => nothing */
    0,  /*     ITALIC => nothing */
    0,  /*       BOLD => nothing */
    0,  /*    ALIGNED => nothing */
    0,  /*        BIG => nothing */
    0,  /*      SMALL => nothing */
    0,  /*         LP => nothing */
    0,  /*         RP => nothing */
    0,  /*    HEADING => nothing */
    0,  /*        WAY => nothing */
    0,  /*    BETWEEN => nothing */
    0,  /*        THE => nothing */
    0,  /*      DOT_L => nothing */

  /*   46 */ "DASHED",
  /*   47 */ "CW",
  /*   48 */ "CCW",
  /*   49 */ "LARROW",
  /*   50 */ "RARROW",
  /*   51 */ "LRARROW",
  /*   52 */ "INVIS",
  /*   53 */ "THICK",
  /*   54 */ "THIN",
  /*   55 */ "CENTER",
  /*   56 */ "LJUST",
  /*   57 */ "RJUST",
  /*   58 */ "ABOVE",
  /*   59 */ "BELOW",
  /*   60 */ "ITALIC",
  /*   61 */ "BOLD",
  /*   62 */ "ALIGNED",
  /*   63 */ "BIG",
  /*   64 */ "SMALL",
  /*   65 */ "LP",
  /*   66 */ "RP",
  /*   67 */ "HEADING",
  /*   68 */ "WAY",
  /*   69 */ "BETWEEN",
  /*   70 */ "THE",
  /*   71 */ "DOT_L",
  /*   72 */ "START",
  /*   73 */ "END",
  /*   74 */ "NTH",
  /*   75 */ "VERTEX",
  /*   76 */ "IN",
  /*   77 */ "DOT_U",
  /*   78 */ "LAST",
  /*   79 */ "NUMBER",
  /*   80 */ "FUNC1",
  /*   81 */ "FUNC2",
  /*   82 */ "X",
  /*   83 */ "Y",
  /*   84 */ "TOP",
  /*   85 */ "BOTTOM",
  /*   86 */ "element_list",
  /*   87 */ "element",
  /*   88 */ "unnamed_element",
  /*   89 */ "basetype",
  /*   90 */ "expr",
  /*   91 */ "numproperty",
  /*   92 */ "edge",
  /*   93 */ "direction",
  /*   94 */ "dashproperty",
  /*   95 */ "colorproperty",
  /*   96 */ "locproperty",
  /*   97 */ "position",
  /*   98 */ "place",
  /*   99 */ "object",
  /*  100 */ "objectname",
  /*  101 */ "nth",
  /*  102 */ "textposition",
  /*  103 */ "rvalue",
  /*  104 */ "lvalue",
  /*  105 */ "even",
  /*  106 */ "document",
  /*  107 */ "print",
  /*  108 */ "prlist",
  /*  109 */ "pritem",
  /*  110 */ "prsep",
  /*  111 */ "attribute_list",
  /*  112 */ "savelist",
  /*  113 */ "alist",
  /*  114 */ "attribute",
  /*  115 */ "boolproperty",
  /*  116 */ "withclause",
  /*  117 */ "with",
  /*  118 */ "between",
};
#endif /* defined(YYCOVERAGE) || !defined(NDEBUG) */

#ifndef NDEBUG
/* For tracing reduce actions, the names of all rules are required.
*/
static const char *const yyRuleName[] = {

 /*  45 */ "numproperty ::= HEIGHT|WIDTH|RADIUS|DIAMETER|THICKNESS",
 /*  46 */ "boolproperty ::= CW",
 /*  47 */ "boolproperty ::= CCW",
 /*  48 */ "boolproperty ::= LARROW",
 /*  49 */ "boolproperty ::= RARROW",
 /*  50 */ "boolproperty ::= LRARROW",
 /*  51 */ "boolproperty ::= INVIS",
 /*  52 */ "boolproperty ::= THICK",
 /*  53 */ "boolproperty ::= THIN",
 /*  54 */ "textposition ::=",
 /*  55 */ "textposition ::= textposition CENTER|LJUST|RJUST|ABOVE|BELOW|ITALIC|BOLD|ALIGNED|BIG|SMALL",
 /*  56 */ "position ::= expr COMMA expr",
 /*  57 */ "position ::= place PLUS expr COMMA expr",
 /*  58 */ "position ::= place MINUS expr COMMA expr",
 /*  59 */ "position ::= place PLUS LP expr COMMA expr RP",
 /*  60 */ "position ::= place MINUS LP expr COMMA expr RP",
 /*  61 */ "position ::= LP position COMMA position RP",
 /*  62 */ "position ::= LP position RP",
 /*  63 */ "position ::= expr between position AND position",
 /*  64 */ "position ::= expr ABOVE position",
 /*  65 */ "position ::= expr BELOW position",
 /*  66 */ "position ::= expr LEFT OF position",
 /*  67 */ "position ::= expr RIGHT OF position",
 /*  68 */ "position ::= expr EDGEPT OF position",
 /*  69 */ "position ::= expr HEADING expr FROM position",
 /*  70 */ "place ::= object",
 /*  71 */ "place ::= object DOT_E edge",
 /*  72 */ "place ::= object DOT_L START",
 /*  73 */ "place ::= object DOT_L END",
 /*  74 */ "place ::= START OF object",
 /*  75 */ "place ::= END OF object",
 /*  76 */ "place ::= edge OF object",
 /*  77 */ "place ::= NTH VERTEX OF object",
 /*  78 */ "object ::= nth",
 /*  79 */ "object ::= nth OF|IN object",
 /*  80 */ "objectname ::= PLACENAME",
 /*  81 */ "objectname ::= objectname DOT_U PLACENAME",


 /*  82 */ "nth ::= NTH CLASSNAME",
 /*  83 */ "nth ::= NTH LAST CLASSNAME",
 /*  84 */ "nth ::= LAST CLASSNAME",
 /*  85 */ "nth ::= LAST",
 /*  86 */ "nth ::= NTH LB RB",
 /*  87 */ "nth ::= NTH LAST LB RB",
 /*  88 */ "nth ::= LAST LB RB",
 /*  89 */ "expr ::= expr PLUS expr",
 /*  90 */ "expr ::= expr MINUS expr",
 /*  91 */ "expr ::= expr STAR expr",
 /*  92 */ "expr ::= expr SLASH expr",
 /*  93 */ "expr ::= MINUS expr",
 /*  94 */ "expr ::= PLUS expr",
 /*  95 */ "expr ::= LP expr RP",
 /*  96 */ "expr ::= NUMBER",
 /*  97 */ "expr ::= ID",
 /*  98 */ "expr ::= FUNC1 LP expr RP",
 /*  99 */ "expr ::= FUNC2 LP expr COMMA expr RP",
 /* 100 */ "expr ::= object DOT_L locproperty",
 /* 101 */ "expr ::= object DOT_L numproperty",
 /* 102 */ "expr ::= object DOT_L dashproperty",
 /* 103 */ "expr ::= object DOT_L colorproperty",
 /* 104 */ "expr ::= object DOT_E edge DOT_L X",
 /* 105 */ "expr ::= object DOT_E edge DOT_L Y",
 /* 106 */ "expr ::= LP locproperty OF object RP",
 /* 107 */ "expr ::= LP dashproperty OF object RP",
 /* 108 */ "expr ::= LP numproperty OF object RP",
 /* 109 */ "expr ::= LP colorproperty OF object RP",
 /* 110 */ "expr ::= NTH VERTEX OF object DOT_L X",
 /* 111 */ "expr ::= NTH VERTEX OF object DOT_L Y",
 /* 112 */ "lvalue ::= ID",
 /* 113 */ "lvalue ::= FILL",
 /* 114 */ "lvalue ::= COLOR",
 /* 115 */ "lvalue ::= THICKNESS",
 /* 116 */ "rvalue ::= expr",
 /* 117 */ "print ::= PRINT",
 /* 118 */ "prlist ::= pritem",
 /* 119 */ "prlist ::= prlist prsep pritem",
 /* 120 */ "direction ::= UP",
 /* 121 */ "direction ::= DOWN",
 /* 122 */ "direction ::= LEFT",
 /* 123 */ "direction ::= RIGHT",
 /* 124 */ "attribute_list ::= alist",
 /* 125 */ "alist ::=",
 /* 126 */ "alist ::= alist attribute",
 /* 127 */ "attribute ::= boolproperty",
 /* 128 */ "attribute ::= WITH withclause",
 /* 129 */ "even ::= UNTIL EVEN WITH",
 /* 130 */ "even ::= EVEN WITH",
 /* 131 */ "withclause ::= with",
 /* 132 */ "withclause ::= withclause AND with",
 /* 133 */ "dashproperty ::= DOTTED",
 /* 134 */ "dashproperty ::= DASHED",
 /* 135 */ "colorproperty ::= FILL",
 /* 136 */ "colorproperty ::= COLOR",
 /* 137 */ "position ::= place",
 /* 138 */ "between ::= WAY BETWEEN",
 /* 139 */ "between ::= BETWEEN",
 /* 140 */ "between ::= OF THE WAY BETWEEN",
 /* 141 */ "object ::= objectname",
 /* 142 */ "locproperty ::= X|Y",
 /* 143 */ "edge ::= EDGEPT",
 /* 144 */ "edge ::= TOP",
 /* 145 */ "edge ::= BOTTOM",
 /* 146 */ "edge ::= LEFT",
 /* 147 */ "edge ::= RIGHT",
};
#endif /* NDEBUG */


#if YYSTACKDEPTH<=0
/*
** Try to increase the size of the parser stack.  Return the number

    ** being destroyed before it is finished parsing.
    **
    ** Note: during a reduce, the only symbols destroyed are those
    ** which appear on the RHS of the rule, but which are *not* used
    ** inside the C code.
    */
/********* Begin destructor definitions ***************************************/
    case 86: /* element_list */
{
#line 442 "pikchr.y"
pik_elist_free(p,(yypminor->yy120));
#line 1538 "pikchr.c"
}
      break;
    case 87: /* element */
    case 88: /* unnamed_element */
    case 89: /* basetype */
{
#line 444 "pikchr.y"
pik_elem_free(p,(yypminor->yy26));
#line 1547 "pikchr.c"
}
      break;
/********* End destructor definitions *****************************************/
    default:  break;   /* If no destructor action specified: do nothing */
  }
}

     fprintf(yyTraceFILE,"%sStack Overflow!\n",yyTracePrompt);
   }
#endif
   while( yypParser->yytos>yypParser->yystack ) yy_pop_parser_stack(yypParser);
   /* Here code is inserted which will execute if the parser
   ** stack every overflows */
/******** Begin %stack_overflow code ******************************************/
#line 473 "pikchr.y"

  pik_error(p, 0, "parser stack overflow");
#line 1768 "pikchr.c"
/******** End %stack_overflow code ********************************************/
   pik_parserARG_STORE /* Suppress warning about unused %extra_argument var */
   pik_parserCTX_STORE
}

/*
** Print tracing information for a SHIFT action

  yytos->minor.yy0 = yyMinor;
  yyTraceShift(yypParser, yyNewState, "Shift");
}

/* For rule J, yyRuleInfoLhs[J] contains the symbol on the left-hand side
** of that rule */
static const YYCODETYPE yyRuleInfoLhs[] = {
   106,  /* (0) document ::= element_list */
    86,  /* (1) element_list ::= element */
    86,  /* (2) element_list ::= element_list EOL element */
    87,  /* (3) element ::= */
    87,  /* (4) element ::= direction */
    87,  /* (5) element ::= lvalue ASSIGN rvalue */
    87,  /* (6) element ::= PLACENAME COLON unnamed_element */
    87,  /* (7) element ::= PLACENAME COLON position */
    87,  /* (8) element ::= unnamed_element */
    87,  /* (9) element ::= print prlist */
   103,  /* (10) rvalue ::= PLACENAME */
   109,  /* (11) pritem ::= FILL */
   109,  /* (12) pritem ::= COLOR */
   109,  /* (13) pritem ::= THICKNESS */
   109,  /* (14) pritem ::= rvalue */
   109,  /* (15) pritem ::= STRING */
   110,  /* (16) prsep ::= COMMA */
    88,  /* (17) unnamed_element ::= basetype attribute_list */
    89,  /* (18) basetype ::= CLASSNAME */
    89,  /* (19) basetype ::= STRING textposition */
    89,  /* (20) basetype ::= LB savelist element_list RB */
   112,  /* (21) savelist ::= */
   111,  /* (22) attribute_list ::= expr */
   111,  /* (23) attribute_list ::= expr PERCENT */
   114,  /* (24) attribute ::= numproperty expr PERCENT */
   114,  /* (25) attribute ::= numproperty expr */
   114,  /* (26) attribute ::= dashproperty expr */
   114,  /* (27) attribute ::= dashproperty */
   114,  /* (28) attribute ::= colorproperty rvalue */
   114,  /* (29) attribute ::= direction expr PERCENT */
   114,  /* (30) attribute ::= direction expr */
   114,  /* (31) attribute ::= direction */
   114,  /* (32) attribute ::= direction even position */
   114,  /* (33) attribute ::= CLOSE */
   114,  /* (34) attribute ::= CHOP */
   114,  /* (35) attribute ::= FROM position */
   114,  /* (36) attribute ::= TO position */
   114,  /* (37) attribute ::= THEN */
   114,  /* (38) attribute ::= AT position */
   114,  /* (39) attribute ::= SAME */
   114,  /* (40) attribute ::= SAME AS object */
   114,  /* (41) attribute ::= STRING textposition */
   114,  /* (42) attribute ::= FIT */
   117,  /* (43) with ::= DOT_E edge AT position */
   117,  /* (44) with ::= edge AT position */
    91,  /* (45) numproperty ::= HEIGHT|WIDTH|RADIUS|DIAMETER|THICKNESS */
   115,  /* (46) boolproperty ::= CW */
   115,  /* (47) boolproperty ::= CCW */
   115,  /* (48) boolproperty ::= LARROW */
   115,  /* (49) boolproperty ::= RARROW */
   115,  /* (50) boolproperty ::= LRARROW */
   115,  /* (51) boolproperty ::= INVIS */
   115,  /* (52) boolproperty ::= THICK */
   115,  /* (53) boolproperty ::= THIN */
   102,  /* (54) textposition ::= */
   102,  /* (55) textposition ::= textposition CENTER|LJUST|RJUST|ABOVE|BELOW|ITALIC|BOLD|ALIGNED|BIG|SMALL */
    97,  /* (56) position ::= expr COMMA expr */
    97,  /* (57) position ::= place PLUS expr COMMA expr */
    97,  /* (58) position ::= place MINUS expr COMMA expr */
    97,  /* (59) position ::= place PLUS LP expr COMMA expr RP */
    97,  /* (60) position ::= place MINUS LP expr COMMA expr RP */
    97,  /* (61) position ::= LP position COMMA position RP */
    97,  /* (62) position ::= LP position RP */
    97,  /* (63) position ::= expr between position AND position */
    97,  /* (64) position ::= expr ABOVE position */
    97,  /* (65) position ::= expr BELOW position */
    97,  /* (66) position ::= expr LEFT OF position */
    97,  /* (67) position ::= expr RIGHT OF position */
    97,  /* (68) position ::= expr EDGEPT OF position */
    97,  /* (69) position ::= expr HEADING expr FROM position */
    98,  /* (70) place ::= object */
    98,  /* (71) place ::= object DOT_E edge */
    98,  /* (72) place ::= object DOT_L START */
    98,  /* (73) place ::= object DOT_L END */
    98,  /* (74) place ::= START OF object */
    98,  /* (75) place ::= END OF object */
    98,  /* (76) place ::= edge OF object */
    98,  /* (77) place ::= NTH VERTEX OF object */
    99,  /* (78) object ::= nth */
    99,  /* (79) object ::= nth OF|IN object */
   100,  /* (80) objectname ::= PLACENAME */
   100,  /* (81) objectname ::= objectname DOT_U PLACENAME */
   101,  /* (82) nth ::= NTH CLASSNAME */
   101,  /* (83) nth ::= NTH LAST CLASSNAME */
   101,  /* (84) nth ::= LAST CLASSNAME */
   101,  /* (85) nth ::= LAST */
   101,  /* (86) nth ::= NTH LB RB */
   101,  /* (87) nth ::= NTH LAST LB RB */
   101,  /* (88) nth ::= LAST LB RB */
    90,  /* (89) expr ::= expr PLUS expr */
    90,  /* (90) expr ::= expr MINUS expr */
    90,  /* (91) expr ::= expr STAR expr */
    90,  /* (92) expr ::= expr SLASH expr */
    90,  /* (93) expr ::= MINUS expr */
    90,  /* (94) expr ::= PLUS expr */
    90,  /* (95) expr ::= LP expr RP */
    90,  /* (96) expr ::= NUMBER */
    90,  /* (97) expr ::= ID */
    90,  /* (98) expr ::= FUNC1 LP expr RP */
    90,  /* (99) expr ::= FUNC2 LP expr COMMA expr RP */
    90,  /* (100) expr ::= object DOT_L locproperty */
    90,  /* (101) expr ::= object DOT_L numproperty */
    90,  /* (102) expr ::= object DOT_L dashproperty */
    90,  /* (103) expr ::= object DOT_L colorproperty */
    90,  /* (104) expr ::= object DOT_E edge DOT_L X */
    90,  /* (105) expr ::= object DOT_E edge DOT_L Y */
    90,  /* (106) expr ::= LP locproperty OF object RP */
    90,  /* (107) expr ::= LP dashproperty OF object RP */
    90,  /* (108) expr ::= LP numproperty OF object RP */
    90,  /* (109) expr ::= LP colorproperty OF object RP */
    90,  /* (110) expr ::= NTH VERTEX OF object DOT_L X */
    90,  /* (111) expr ::= NTH VERTEX OF object DOT_L Y */
   104,  /* (112) lvalue ::= ID */
   104,  /* (113) lvalue ::= FILL */
   104,  /* (114) lvalue ::= COLOR */
   104,  /* (115) lvalue ::= THICKNESS */
   103,  /* (116) rvalue ::= expr */
   107,  /* (117) print ::= PRINT */
   108,  /* (118) prlist ::= pritem */
   108,  /* (119) prlist ::= prlist prsep pritem */
    93,  /* (120) direction ::= UP */
    93,  /* (121) direction ::= DOWN */
    93,  /* (122) direction ::= LEFT */
    93,  /* (123) direction ::= RIGHT */
   111,  /* (124) attribute_list ::= alist */
   113,  /* (125) alist ::= */
   113,  /* (126) alist ::= alist attribute */
   114,  /* (127) attribute ::= boolproperty */
   114,  /* (128) attribute ::= WITH withclause */
   105,  /* (129) even ::= UNTIL EVEN WITH */
   105,  /* (130) even ::= EVEN WITH */
   116,  /* (131) withclause ::= with */
   116,  /* (132) withclause ::= withclause AND with */
    94,  /* (133) dashproperty ::= DOTTED */
    94,  /* (134) dashproperty ::= DASHED */
    95,  /* (135) colorproperty ::= FILL */
    95,  /* (136) colorproperty ::= COLOR */
    97,  /* (137) position ::= place */
   118,  /* (138) between ::= WAY BETWEEN */
   118,  /* (139) between ::= BETWEEN */
   118,  /* (140) between ::= OF THE WAY BETWEEN */
    99,  /* (141) object ::= objectname */
    96,  /* (142) locproperty ::= X|Y */
    92,  /* (143) edge ::= EDGEPT */
    92,  /* (144) edge ::= TOP */
    92,  /* (145) edge ::= BOTTOM */
    92,  /* (146) edge ::= LEFT */
    92,  /* (147) edge ::= RIGHT */
};

/* For rule J, yyRuleInfoNRhs[J] contains the negative of the number
** of symbols on the right-hand side of that rule. */
static const signed char yyRuleInfoNRhs[] = {
   -1,  /* (0) document ::= element_list */
   -1,  /* (1) element_list ::= element */

   -1,  /* (45) numproperty ::= HEIGHT|WIDTH|RADIUS|DIAMETER|THICKNESS */
   -1,  /* (46) boolproperty ::= CW */
   -1,  /* (47) boolproperty ::= CCW */
   -1,  /* (48) boolproperty ::= LARROW */
   -1,  /* (49) boolproperty ::= RARROW */
   -1,  /* (50) boolproperty ::= LRARROW */
   -1,  /* (51) boolproperty ::= INVIS */
   -1,  /* (52) boolproperty ::= THICK */
   -1,  /* (53) boolproperty ::= THIN */
    0,  /* (54) textposition ::= */
   -2,  /* (55) textposition ::= textposition CENTER|LJUST|RJUST|ABOVE|BELOW|ITALIC|BOLD|ALIGNED|BIG|SMALL */
   -3,  /* (56) position ::= expr COMMA expr */
   -5,  /* (57) position ::= place PLUS expr COMMA expr */
   -5,  /* (58) position ::= place MINUS expr COMMA expr */
   -7,  /* (59) position ::= place PLUS LP expr COMMA expr RP */
   -7,  /* (60) position ::= place MINUS LP expr COMMA expr RP */
   -5,  /* (61) position ::= LP position COMMA position RP */
   -3,  /* (62) position ::= LP position RP */
   -5,  /* (63) position ::= expr between position AND position */
   -3,  /* (64) position ::= expr ABOVE position */
   -3,  /* (65) position ::= expr BELOW position */
   -4,  /* (66) position ::= expr LEFT OF position */
   -4,  /* (67) position ::= expr RIGHT OF position */
   -4,  /* (68) position ::= expr EDGEPT OF position */
   -5,  /* (69) position ::= expr HEADING expr FROM position */
   -1,  /* (70) place ::= object */
   -3,  /* (71) place ::= object DOT_E edge */
   -3,  /* (72) place ::= object DOT_L START */
   -3,  /* (73) place ::= object DOT_L END */
   -3,  /* (74) place ::= START OF object */
   -3,  /* (75) place ::= END OF object */
   -3,  /* (76) place ::= edge OF object */
   -4,  /* (77) place ::= NTH VERTEX OF object */
   -1,  /* (78) object ::= nth */
   -3,  /* (79) object ::= nth OF|IN object */
   -1,  /* (80) objectname ::= PLACENAME */
   -3,  /* (81) objectname ::= objectname DOT_U PLACENAME */
   -2,  /* (82) nth ::= NTH CLASSNAME */
   -3,  /* (83) nth ::= NTH LAST CLASSNAME */
   -2,  /* (84) nth ::= LAST CLASSNAME */
   -1,  /* (85) nth ::= LAST */
   -3,  /* (86) nth ::= NTH LB RB */
   -4,  /* (87) nth ::= NTH LAST LB RB */
   -3,  /* (88) nth ::= LAST LB RB */
   -3,  /* (89) expr ::= expr PLUS expr */
   -3,  /* (90) expr ::= expr MINUS expr */
   -3,  /* (91) expr ::= expr STAR expr */
   -3,  /* (92) expr ::= expr SLASH expr */
   -2,  /* (93) expr ::= MINUS expr */
   -2,  /* (94) expr ::= PLUS expr */
   -3,  /* (95) expr ::= LP expr RP */
   -1,  /* (96) expr ::= NUMBER */
   -1,  /* (97) expr ::= ID */
   -4,  /* (98) expr ::= FUNC1 LP expr RP */
   -6,  /* (99) expr ::= FUNC2 LP expr COMMA expr RP */


   -3,  /* (100) expr ::= object DOT_L locproperty */
   -3,  /* (101) expr ::= object DOT_L numproperty */
   -3,  /* (102) expr ::= object DOT_L dashproperty */
   -3,  /* (103) expr ::= object DOT_L colorproperty */
   -5,  /* (104) expr ::= object DOT_E edge DOT_L X */
   -5,  /* (105) expr ::= object DOT_E edge DOT_L Y */
   -5,  /* (106) expr ::= LP locproperty OF object RP */
   -5,  /* (107) expr ::= LP dashproperty OF object RP */
   -5,  /* (108) expr ::= LP numproperty OF object RP */
   -5,  /* (109) expr ::= LP colorproperty OF object RP */
   -6,  /* (110) expr ::= NTH VERTEX OF object DOT_L X */
   -6,  /* (111) expr ::= NTH VERTEX OF object DOT_L Y */
   -1,  /* (112) lvalue ::= ID */
   -1,  /* (113) lvalue ::= FILL */
   -1,  /* (114) lvalue ::= COLOR */
   -1,  /* (115) lvalue ::= THICKNESS */
   -1,  /* (116) rvalue ::= expr */
   -1,  /* (117) print ::= PRINT */
   -1,  /* (118) prlist ::= pritem */
   -3,  /* (119) prlist ::= prlist prsep pritem */
   -1,  /* (120) direction ::= UP */
   -1,  /* (121) direction ::= DOWN */
   -1,  /* (122) direction ::= LEFT */
   -1,  /* (123) direction ::= RIGHT */
   -1,  /* (124) attribute_list ::= alist */
    0,  /* (125) alist ::= */
   -2,  /* (126) alist ::= alist attribute */
   -1,  /* (127) attribute ::= boolproperty */
   -2,  /* (128) attribute ::= WITH withclause */
   -3,  /* (129) even ::= UNTIL EVEN WITH */
   -2,  /* (130) even ::= EVEN WITH */
   -1,  /* (131) withclause ::= with */
   -3,  /* (132) withclause ::= withclause AND with */
   -1,  /* (133) dashproperty ::= DOTTED */
   -1,  /* (134) dashproperty ::= DASHED */
   -1,  /* (135) colorproperty ::= FILL */
   -1,  /* (136) colorproperty ::= COLOR */
   -1,  /* (137) position ::= place */
   -2,  /* (138) between ::= WAY BETWEEN */
   -1,  /* (139) between ::= BETWEEN */
   -4,  /* (140) between ::= OF THE WAY BETWEEN */
   -1,  /* (141) object ::= objectname */
   -1,  /* (142) locproperty ::= X|Y */
   -1,  /* (143) edge ::= EDGEPT */
   -1,  /* (144) edge ::= TOP */
   -1,  /* (145) edge ::= BOTTOM */
   -1,  /* (146) edge ::= LEFT */
   -1,  /* (147) edge ::= RIGHT */
};

static void yy_accept(yyParser*);  /* Forward Declaration */

/*
** Perform a reduce action and the shift that must immediately
** follow the reduce.

  **     { ... }           // User supplied code
  **  #line <lineno> <thisfile>
  **     break;
  */
/********** Begin reduce actions **********************************************/
        YYMINORTYPE yylhsminor;
      case 0: /* document ::= element_list */
#line 477 "pikchr.y"
{pik_render(p,yymsp[0].minor.yy120);}
#line 2233 "pikchr.c"
        break;
      case 1: /* element_list ::= element */
#line 480 "pikchr.y"
{ yylhsminor.yy120 = pik_elist_append(p,0,yymsp[0].minor.yy26); }
#line 2238 "pikchr.c"
  yymsp[0].minor.yy120 = yylhsminor.yy120;
        break;
      case 2: /* element_list ::= element_list EOL element */
#line 482 "pikchr.y"
{ yylhsminor.yy120 = pik_elist_append(p,yymsp[-2].minor.yy120,yymsp[0].minor.yy26); }
#line 2244 "pikchr.c"
  yymsp[-2].minor.yy120 = yylhsminor.yy120;
        break;
      case 3: /* element ::= */
#line 485 "pikchr.y"
{ yymsp[1].minor.yy26 = 0; }
#line 2250 "pikchr.c"
        break;
      case 4: /* element ::= direction */
#line 486 "pikchr.y"
{ pik_set_direction(p,yymsp[0].minor.yy0.eCode);  yylhsminor.yy26=0; }
#line 2255 "pikchr.c"
  yymsp[0].minor.yy26 = yylhsminor.yy26;
        break;
      case 5: /* element ::= lvalue ASSIGN rvalue */
#line 487 "pikchr.y"
{pik_set_var(p,&yymsp[-2].minor.yy0,yymsp[0].minor.yy191,&yymsp[-1].minor.yy0); yylhsminor.yy26=0;}
#line 2261 "pikchr.c"
  yymsp[-2].minor.yy26 = yylhsminor.yy26;
        break;
      case 6: /* element ::= PLACENAME COLON unnamed_element */
#line 489 "pikchr.y"
{ yylhsminor.yy26 = yymsp[0].minor.yy26;  pik_elem_setname(p,yymsp[0].minor.yy26,&yymsp[-2].minor.yy0); }
#line 2267 "pikchr.c"
  yymsp[-2].minor.yy26 = yylhsminor.yy26;
        break;
      case 7: /* element ::= PLACENAME COLON position */
#line 491 "pikchr.y"
{ yylhsminor.yy26 = pik_elem_new(p,0,0,0);
                 if(yylhsminor.yy26){ yylhsminor.yy26->ptAt = yymsp[0].minor.yy131; pik_elem_setname(p,yylhsminor.yy26,&yymsp[-2].minor.yy0); }}
#line 2274 "pikchr.c"
  yymsp[-2].minor.yy26 = yylhsminor.yy26;
        break;
      case 8: /* element ::= unnamed_element */
#line 493 "pikchr.y"
{yylhsminor.yy26 = yymsp[0].minor.yy26;}
#line 2280 "pikchr.c"
  yymsp[0].minor.yy26 = yylhsminor.yy26;
        break;
      case 9: /* element ::= print prlist */
#line 494 "pikchr.y"
{pik_append(p,"<br>\n",5); yymsp[-1].minor.yy26=0;}
#line 2286 "pikchr.c"
        break;
      case 10: /* rvalue ::= PLACENAME */
#line 505 "pikchr.y"
{yylhsminor.yy191 = pik_lookup_color(p,&yymsp[0].minor.yy0);}
#line 2291 "pikchr.c"
  yymsp[0].minor.yy191 = yylhsminor.yy191;
        break;
      case 11: /* pritem ::= FILL */
      case 12: /* pritem ::= COLOR */ yytestcase(yyruleno==12);
      case 13: /* pritem ::= THICKNESS */ yytestcase(yyruleno==13);
#line 510 "pikchr.y"
{pik_append_num(p,"",pik_value(p,yymsp[0].minor.yy0.z,yymsp[0].minor.yy0.n,0));}
#line 2299 "pikchr.c"
        break;
      case 14: /* pritem ::= rvalue */
#line 513 "pikchr.y"
{pik_append_num(p,"",yymsp[0].minor.yy191);}
#line 2304 "pikchr.c"
        break;
      case 15: /* pritem ::= STRING */
#line 514 "pikchr.y"
{pik_append_text(p,yymsp[0].minor.yy0.z+1,yymsp[0].minor.yy0.n-2,0);}
#line 2309 "pikchr.c"
        break;
      case 16: /* prsep ::= COMMA */
#line 515 "pikchr.y"
{pik_append(p, " ", 1);}
#line 2314 "pikchr.c"
        break;
      case 17: /* unnamed_element ::= basetype attribute_list */
#line 518 "pikchr.y"
{yylhsminor.yy26 = yymsp[-1].minor.yy26; pik_after_adding_attributes(p,yylhsminor.yy26);}
#line 2319 "pikchr.c"
  yymsp[-1].minor.yy26 = yylhsminor.yy26;
        break;
      case 18: /* basetype ::= CLASSNAME */
#line 520 "pikchr.y"
{yylhsminor.yy26 = pik_elem_new(p,&yymsp[0].minor.yy0,0,0); }
#line 2325 "pikchr.c"
  yymsp[0].minor.yy26 = yylhsminor.yy26;
        break;
      case 19: /* basetype ::= STRING textposition */
#line 522 "pikchr.y"
{yymsp[-1].minor.yy0.eCode = yymsp[0].minor.yy60; yylhsminor.yy26 = pik_elem_new(p,0,&yymsp[-1].minor.yy0,0); }
#line 2331 "pikchr.c"
  yymsp[-1].minor.yy26 = yylhsminor.yy26;
        break;
      case 20: /* basetype ::= LB savelist element_list RB */
#line 524 "pikchr.y"
{ p->list = yymsp[-2].minor.yy120; yymsp[-3].minor.yy26 = pik_elem_new(p,0,0,yymsp[-1].minor.yy120); if(yymsp[-3].minor.yy26) yymsp[-3].minor.yy26->errTok = yymsp[0].minor.yy0; }
#line 2337 "pikchr.c"
        break;
      case 21: /* savelist ::= */
#line 529 "pikchr.y"
{yymsp[1].minor.yy120 = p->list; p->list = 0;}
#line 2342 "pikchr.c"
        break;
      case 22: /* attribute_list ::= expr */
#line 536 "pikchr.y"
{ pik_add_direction(p,0,&yymsp[0].minor.yy191,0);}
#line 2347 "pikchr.c"
        break;
      case 23: /* attribute_list ::= expr PERCENT */
#line 537 "pikchr.y"
{ pik_add_direction(p,0,&yymsp[-1].minor.yy191,1);}
#line 2352 "pikchr.c"
        break;
      case 24: /* attribute ::= numproperty expr PERCENT */
#line 542 "pikchr.y"
{ pik_set_numprop(p,&yymsp[-2].minor.yy0,0.0,yymsp[-1].minor.yy191/100.0); }
#line 2357 "pikchr.c"
        break;
      case 25: /* attribute ::= numproperty expr */
      case 28: /* attribute ::= colorproperty rvalue */ yytestcase(yyruleno==28);
#line 543 "pikchr.y"
{ pik_set_numprop(p,&yymsp[-1].minor.yy0,yymsp[0].minor.yy191,0.0); }
#line 2363 "pikchr.c"
        break;
      case 26: /* attribute ::= dashproperty expr */
#line 544 "pikchr.y"
{ pik_set_dashed(p,&yymsp[-1].minor.yy0,&yymsp[0].minor.yy191); }
#line 2368 "pikchr.c"
        break;
      case 27: /* attribute ::= dashproperty */
#line 545 "pikchr.y"
{ pik_set_dashed(p,&yymsp[0].minor.yy0,0);  }
#line 2373 "pikchr.c"
        break;
      case 29: /* attribute ::= direction expr PERCENT */
#line 548 "pikchr.y"
{ pik_add_direction(p,&yymsp[-2].minor.yy0,&yymsp[-1].minor.yy191,1);}
#line 2378 "pikchr.c"
        break;
      case 30: /* attribute ::= direction expr */
#line 549 "pikchr.y"
{ pik_add_direction(p,&yymsp[-1].minor.yy0,&yymsp[0].minor.yy191,0);}
#line 2383 "pikchr.c"
        break;
      case 31: /* attribute ::= direction */
#line 550 "pikchr.y"
{ pik_add_direction(p,&yymsp[0].minor.yy0,0,0); }
#line 2388 "pikchr.c"
        break;
      case 32: /* attribute ::= direction even position */
#line 551 "pikchr.y"
{pik_evenwith(p,&yymsp[-2].minor.yy0,&yymsp[0].minor.yy131);}
#line 2393 "pikchr.c"
        break;
      case 33: /* attribute ::= CLOSE */
#line 552 "pikchr.y"
{ pik_close_path(p,&yymsp[0].minor.yy0); }
#line 2398 "pikchr.c"
        break;
      case 34: /* attribute ::= CHOP */
#line 553 "pikchr.y"
{ p->cur->bChop = 1; }
#line 2403 "pikchr.c"
        break;
      case 35: /* attribute ::= FROM position */
#line 554 "pikchr.y"
{ pik_set_from(p,p->cur,&yymsp[-1].minor.yy0,&yymsp[0].minor.yy131); }
#line 2408 "pikchr.c"
        break;
      case 36: /* attribute ::= TO position */
#line 555 "pikchr.y"
{ pik_add_to(p,p->cur,&yymsp[-1].minor.yy0,&yymsp[0].minor.yy131); }
#line 2413 "pikchr.c"
        break;
      case 37: /* attribute ::= THEN */
#line 556 "pikchr.y"
{ pik_then(p, &yymsp[0].minor.yy0, p->cur); }
#line 2418 "pikchr.c"
        break;
      case 38: /* attribute ::= AT position */
#line 558 "pikchr.y"
{ pik_set_at(p,0,&yymsp[0].minor.yy131,&yymsp[-1].minor.yy0); }
#line 2423 "pikchr.c"
        break;
      case 39: /* attribute ::= SAME */
#line 560 "pikchr.y"
{pik_same(p,0,&yymsp[0].minor.yy0);}
#line 2428 "pikchr.c"
        break;
      case 40: /* attribute ::= SAME AS object */
#line 561 "pikchr.y"
{pik_same(p,yymsp[0].minor.yy26,&yymsp[-2].minor.yy0);}
#line 2433 "pikchr.c"
        break;
      case 41: /* attribute ::= STRING textposition */
#line 562 "pikchr.y"
{pik_add_txt(p,&yymsp[-1].minor.yy0,yymsp[0].minor.yy60);}
#line 2438 "pikchr.c"
        break;
      case 42: /* attribute ::= FIT */
#line 563 "pikchr.y"
{pik_size_to_fit(p,&yymsp[0].minor.yy0); }
#line 2443 "pikchr.c"
        break;
      case 43: /* with ::= DOT_E edge AT position */
      case 44: /* with ::= edge AT position */ yytestcase(yyruleno==44);
#line 570 "pikchr.y"
{ pik_set_at(p,&yymsp[-2].minor.yy0,&yymsp[0].minor.yy131,&yymsp[-1].minor.yy0); }
#line 2449 "pikchr.c"
        break;
      case 45: /* numproperty ::= HEIGHT|WIDTH|RADIUS|DIAMETER|THICKNESS */
#line 574 "pikchr.y"
{yylhsminor.yy0 = yymsp[0].minor.yy0;}
#line 2454 "pikchr.c"
  yymsp[0].minor.yy0 = yylhsminor.yy0;
        break;
      case 46: /* boolproperty ::= CW */
#line 585 "pikchr.y"
{p->cur->cw = 1;}
#line 2460 "pikchr.c"
        break;
      case 47: /* boolproperty ::= CCW */
#line 586 "pikchr.y"
{p->cur->cw = 0;}
#line 2465 "pikchr.c"
        break;
      case 48: /* boolproperty ::= LARROW */
#line 587 "pikchr.y"
{p->cur->larrow=1; p->cur->rarrow=0; }
#line 2470 "pikchr.c"
        break;
      case 49: /* boolproperty ::= RARROW */
#line 588 "pikchr.y"
{p->cur->larrow=0; p->cur->rarrow=1; }
#line 2475 "pikchr.c"
        break;
      case 50: /* boolproperty ::= LRARROW */
#line 589 "pikchr.y"
{p->cur->larrow=1; p->cur->rarrow=1; }
#line 2480 "pikchr.c"
        break;
      case 51: /* boolproperty ::= INVIS */
#line 590 "pikchr.y"
{p->cur->sw = 0.0;}
#line 2485 "pikchr.c"
        break;
      case 52: /* boolproperty ::= THICK */





#line 591 "pikchr.y"
{p->cur->sw *= 1.5;}
#line 2490 "pikchr.c"

        break;
      case 53: /* boolproperty ::= THIN */
#line 592 "pikchr.y"

{p->cur->sw *= 0.67;}
#line 2495 "pikchr.c"

        break;
      case 54: /* textposition ::= */
#line 594 "pikchr.y"
{yymsp[1].minor.yy60 = 0;}
#line 2500 "pikchr.c"

        break;
      case 55: /* textposition ::= textposition CENTER|LJUST|RJUST|ABOVE|BELOW|ITALIC|BOLD|ALIGNED|BIG|SMALL */
#line 597 "pikchr.y"
{yylhsminor.yy60 = pik_text_position(p,yymsp[-1].minor.yy60,&yymsp[0].minor.yy0);}
#line 2505 "pikchr.c"
  yymsp[-1].minor.yy60 = yylhsminor.yy60;
        break;
      case 56: /* position ::= expr COMMA expr */
#line 600 "pikchr.y"
{yylhsminor.yy131.x=yymsp[-2].minor.yy191; yylhsminor.yy131.y=yymsp[0].minor.yy191;}
#line 2511 "pikchr.c"
  yymsp[-2].minor.yy131 = yylhsminor.yy131;
        break;
      case 57: /* position ::= place PLUS expr COMMA expr */






#line 602 "pikchr.y"
{yylhsminor.yy131.x=yymsp[-4].minor.yy131.x+yymsp[-2].minor.yy191; yylhsminor.yy131.y=yymsp[-4].minor.yy131.y+yymsp[0].minor.yy191;}
#line 2517 "pikchr.c"
  yymsp[-4].minor.yy131 = yylhsminor.yy131;
        break;
      case 58: /* position ::= place MINUS expr COMMA expr */
#line 603 "pikchr.y"
{yylhsminor.yy131.x=yymsp[-4].minor.yy131.x-yymsp[-2].minor.yy191; yylhsminor.yy131.y=yymsp[-4].minor.yy131.y-yymsp[0].minor.yy191;}
#line 2523 "pikchr.c"
  yymsp[-4].minor.yy131 = yylhsminor.yy131;
        break;
      case 59: /* position ::= place PLUS LP expr COMMA expr RP */
#line 605 "pikchr.y"


{yylhsminor.yy131.x=yymsp[-6].minor.yy131.x+yymsp[-3].minor.yy191; yylhsminor.yy131.y=yymsp[-6].minor.yy131.y+yymsp[-1].minor.yy191;}




#line 2529 "pikchr.c"
  yymsp[-6].minor.yy131 = yylhsminor.yy131;
        break;
      case 60: /* position ::= place MINUS LP expr COMMA expr RP */
#line 607 "pikchr.y"
{yylhsminor.yy131.x=yymsp[-6].minor.yy131.x-yymsp[-3].minor.yy191; yylhsminor.yy131.y=yymsp[-6].minor.yy131.y-yymsp[-1].minor.yy191;}
#line 2535 "pikchr.c"
  yymsp[-6].minor.yy131 = yylhsminor.yy131;
        break;
      case 61: /* position ::= LP position COMMA position RP */
#line 608 "pikchr.y"
{yymsp[-4].minor.yy131.x=yymsp[-3].minor.yy131.x; yymsp[-4].minor.yy131.y=yymsp[-1].minor.yy131.y;}
#line 2541 "pikchr.c"

        break;
      case 62: /* position ::= LP position RP */
#line 609 "pikchr.y"
{yymsp[-2].minor.yy131=yymsp[-1].minor.yy131;}
#line 2546 "pikchr.c"

        break;
      case 63: /* position ::= expr between position AND position */
#line 611 "pikchr.y"
{yylhsminor.yy131 = pik_position_between(p,yymsp[-4].minor.yy191,yymsp[-2].minor.yy131,yymsp[0].minor.yy131);}
#line 2551 "pikchr.c"
  yymsp[-4].minor.yy131 = yylhsminor.yy131;
        break;
      case 64: /* position ::= expr ABOVE position */
#line 612 "pikchr.y"
{yylhsminor.yy131=yymsp[0].minor.yy131; yylhsminor.yy131.y += yymsp[-2].minor.yy191;}
#line 2557 "pikchr.c"
  yymsp[-2].minor.yy131 = yylhsminor.yy131;
        break;
      case 65: /* position ::= expr BELOW position */
#line 613 "pikchr.y"
{yylhsminor.yy131=yymsp[0].minor.yy131; yylhsminor.yy131.y -= yymsp[-2].minor.yy191;}
#line 2563 "pikchr.c"
  yymsp[-2].minor.yy131 = yylhsminor.yy131;
        break;
      case 66: /* position ::= expr LEFT OF position */
#line 614 "pikchr.y"
{yylhsminor.yy131=yymsp[0].minor.yy131; yylhsminor.yy131.x -= yymsp[-3].minor.yy191;}
#line 2569 "pikchr.c"
  yymsp[-3].minor.yy131 = yylhsminor.yy131;
        break;
      case 67: /* position ::= expr RIGHT OF position */
#line 615 "pikchr.y"
{yylhsminor.yy131=yymsp[0].minor.yy131; yylhsminor.yy131.x += yymsp[-3].minor.yy191;}
#line 2575 "pikchr.c"
  yymsp[-3].minor.yy131 = yylhsminor.yy131;
        break;
      case 68: /* position ::= expr EDGEPT OF position */
#line 617 "pikchr.y"
{yylhsminor.yy131 = pik_position_at_hdg(p,yymsp[-3].minor.yy191,&yymsp[-2].minor.yy0,yymsp[0].minor.yy131);}
#line 2581 "pikchr.c"
  yymsp[-3].minor.yy131 = yylhsminor.yy131;
        break;
      case 69: /* position ::= expr HEADING expr FROM position */
#line 619 "pikchr.y"
{yylhsminor.yy131 = pik_position_at_angle(p,yymsp[-4].minor.yy191,yymsp[-2].minor.yy191,yymsp[0].minor.yy131);}
#line 2587 "pikchr.c"
  yymsp[-4].minor.yy131 = yylhsminor.yy131;
        break;
      case 70: /* place ::= object */
#line 625 "pikchr.y"
{yylhsminor.yy131 = pik_place_of_elem(p,yymsp[0].minor.yy26,0);}
#line 2593 "pikchr.c"
  yymsp[0].minor.yy131 = yylhsminor.yy131;
        break;
      case 71: /* place ::= object DOT_E edge */
      case 72: /* place ::= object DOT_L START */ yytestcase(yyruleno==72);
      case 73: /* place ::= object DOT_L END */ yytestcase(yyruleno==73);
#line 626 "pikchr.y"
{yylhsminor.yy131 = pik_place_of_elem(p,yymsp[-2].minor.yy26,&yymsp[0].minor.yy0);}
#line 2601 "pikchr.c"
  yymsp[-2].minor.yy131 = yylhsminor.yy131;
        break;
      case 74: /* place ::= START OF object */
      case 75: /* place ::= END OF object */ yytestcase(yyruleno==75);
      case 76: /* place ::= edge OF object */ yytestcase(yyruleno==76);
#line 629 "pikchr.y"
{yylhsminor.yy131 = pik_place_of_elem(p,yymsp[0].minor.yy26,&yymsp[-2].minor.yy0);}
#line 2609 "pikchr.c"
  yymsp[-2].minor.yy131 = yylhsminor.yy131;
        break;
      case 77: /* place ::= NTH VERTEX OF object */


















#line 632 "pikchr.y"
{yylhsminor.yy131 = pik_nth_vertex(p,&yymsp[-3].minor.yy0,&yymsp[-2].minor.yy0,yymsp[0].minor.yy26);}
#line 2615 "pikchr.c"
  yymsp[-3].minor.yy131 = yylhsminor.yy131;
        break;
      case 78: /* object ::= nth */
#line 635 "pikchr.y"
{yylhsminor.yy26 = pik_find_nth(p,0,&yymsp[0].minor.yy0);}
#line 2621 "pikchr.c"
  yymsp[0].minor.yy26 = yylhsminor.yy26;
        break;
      case 79: /* object ::= nth OF|IN object */
#line 636 "pikchr.y"
{yylhsminor.yy26 = pik_find_nth(p,yymsp[0].minor.yy26,&yymsp[-2].minor.yy0);}
#line 2627 "pikchr.c"
  yymsp[-2].minor.yy26 = yylhsminor.yy26;
        break;
      case 80: /* objectname ::= PLACENAME */
#line 638 "pikchr.y"
{yylhsminor.yy26 = pik_find_byname(p,0,&yymsp[0].minor.yy0);}
#line 2633 "pikchr.c"
  yymsp[0].minor.yy26 = yylhsminor.yy26;
        break;
      case 81: /* objectname ::= objectname DOT_U PLACENAME */
#line 640 "pikchr.y"
{yylhsminor.yy26 = pik_find_byname(p,yymsp[-2].minor.yy26,&yymsp[0].minor.yy0);}
#line 2639 "pikchr.c"
  yymsp[-2].minor.yy26 = yylhsminor.yy26;
        break;
      case 82: /* nth ::= NTH CLASSNAME */
#line 642 "pikchr.y"
{yylhsminor.yy0=yymsp[0].minor.yy0; yylhsminor.yy0.eCode = pik_nth_value(p,&yymsp[-1].minor.yy0); }
#line 2645 "pikchr.c"
  yymsp[-1].minor.yy0 = yylhsminor.yy0;
        break;
      case 83: /* nth ::= NTH LAST CLASSNAME */
#line 643 "pikchr.y"
{yylhsminor.yy0=yymsp[0].minor.yy0; yylhsminor.yy0.eCode = -pik_nth_value(p,&yymsp[-2].minor.yy0); }
#line 2651 "pikchr.c"
  yymsp[-2].minor.yy0 = yylhsminor.yy0;
        break;
      case 84: /* nth ::= LAST CLASSNAME */
#line 644 "pikchr.y"
{yymsp[-1].minor.yy0=yymsp[0].minor.yy0; yymsp[-1].minor.yy0.eCode = -1;}
#line 2657 "pikchr.c"
        break;
      case 85: /* nth ::= LAST */
#line 645 "pikchr.y"
{yylhsminor.yy0=yymsp[0].minor.yy0; yylhsminor.yy0.eCode = -1;}
#line 2662 "pikchr.c"
  yymsp[0].minor.yy0 = yylhsminor.yy0;
        break;
      case 86: /* nth ::= NTH LB RB */
#line 646 "pikchr.y"
{yylhsminor.yy0=yymsp[-1].minor.yy0; yylhsminor.yy0.eCode = pik_nth_value(p,&yymsp[-2].minor.yy0);}
#line 2668 "pikchr.c"
  yymsp[-2].minor.yy0 = yylhsminor.yy0;
        break;
      case 87: /* nth ::= NTH LAST LB RB */
#line 647 "pikchr.y"
{yylhsminor.yy0=yymsp[-1].minor.yy0; yylhsminor.yy0.eCode = -pik_nth_value(p,&yymsp[-3].minor.yy0);}
#line 2674 "pikchr.c"
  yymsp[-3].minor.yy0 = yylhsminor.yy0;
        break;
      case 88: /* nth ::= LAST LB RB */
#line 648 "pikchr.y"
{yymsp[-2].minor.yy0=yymsp[-1].minor.yy0; yymsp[-2].minor.yy0.eCode = -1; }
#line 2680 "pikchr.c"
        break;
      case 89: /* expr ::= expr PLUS expr */
#line 650 "pikchr.y"
{yylhsminor.yy191=yymsp[-2].minor.yy191+yymsp[0].minor.yy191;}
#line 2685 "pikchr.c"
  yymsp[-2].minor.yy191 = yylhsminor.yy191;
        break;
      case 90: /* expr ::= expr MINUS expr */
#line 651 "pikchr.y"
{yylhsminor.yy191=yymsp[-2].minor.yy191-yymsp[0].minor.yy191;}
#line 2691 "pikchr.c"
  yymsp[-2].minor.yy191 = yylhsminor.yy191;
        break;
      case 91: /* expr ::= expr STAR expr */
#line 652 "pikchr.y"
{yylhsminor.yy191=yymsp[-2].minor.yy191*yymsp[0].minor.yy191;}
#line 2697 "pikchr.c"
  yymsp[-2].minor.yy191 = yylhsminor.yy191;
        break;
      case 92: /* expr ::= expr SLASH expr */
#line 653 "pikchr.y"
{
  if( yymsp[0].minor.yy191==0.0 ){ pik_error(p, &yymsp[-1].minor.yy0, "division by zero"); yylhsminor.yy191 = 0.0; }
  else{ yylhsminor.yy191 = yymsp[-2].minor.yy191/yymsp[0].minor.yy191; }
}
#line 2706 "pikchr.c"
  yymsp[-2].minor.yy191 = yylhsminor.yy191;
        break;
      case 93: /* expr ::= MINUS expr */
#line 657 "pikchr.y"
{yymsp[-1].minor.yy191=-yymsp[0].minor.yy191;}
#line 2712 "pikchr.c"
        break;
      case 94: /* expr ::= PLUS expr */
#line 658 "pikchr.y"
{yymsp[-1].minor.yy191=yymsp[0].minor.yy191;}
#line 2717 "pikchr.c"
        break;
      case 95: /* expr ::= LP expr RP */
#line 659 "pikchr.y"
{yymsp[-2].minor.yy191=yymsp[-1].minor.yy191;}
#line 2722 "pikchr.c"
        break;
      case 96: /* expr ::= NUMBER */
#line 660 "pikchr.y"
{yylhsminor.yy191=pik_atof(p,&yymsp[0].minor.yy0);}
#line 2727 "pikchr.c"
  yymsp[0].minor.yy191 = yylhsminor.yy191;
        break;
      case 97: /* expr ::= ID */
#line 661 "pikchr.y"
{yylhsminor.yy191=pik_get_var(p,&yymsp[0].minor.yy0);}
#line 2733 "pikchr.c"
  yymsp[0].minor.yy191 = yylhsminor.yy191;
        break;
      case 98: /* expr ::= FUNC1 LP expr RP */
#line 662 "pikchr.y"
{yylhsminor.yy191 = pik_func(p,&yymsp[-3].minor.yy0,yymsp[-1].minor.yy191,0.0);}
#line 2739 "pikchr.c"
  yymsp[-3].minor.yy191 = yylhsminor.yy191;
        break;
      case 99: /* expr ::= FUNC2 LP expr COMMA expr RP */
#line 663 "pikchr.y"
{yylhsminor.yy191 = pik_func(p,&yymsp[-5].minor.yy0,yymsp[-3].minor.yy191,yymsp[-1].minor.yy191);}
#line 2745 "pikchr.c"
  yymsp[-5].minor.yy191 = yylhsminor.yy191;
        break;
      case 100: /* expr ::= object DOT_L locproperty */
      case 101: /* expr ::= object DOT_L numproperty */ yytestcase(yyruleno==101);
      case 102: /* expr ::= object DOT_L dashproperty */ yytestcase(yyruleno==102);
      case 103: /* expr ::= object DOT_L colorproperty */ yytestcase(yyruleno==103);
#line 665 "pikchr.y"
{yylhsminor.yy191=pik_property_of(p,yymsp[-2].minor.yy26,&yymsp[0].minor.yy0);}
#line 2754 "pikchr.c"
  yymsp[-2].minor.yy191 = yylhsminor.yy191;
        break;
      case 104: /* expr ::= object DOT_E edge DOT_L X */
#line 669 "pikchr.y"
{yylhsminor.yy191=pik_place_of_elem(p,yymsp[-4].minor.yy26,&yymsp[-2].minor.yy0).x;}
#line 2760 "pikchr.c"
  yymsp[-4].minor.yy191 = yylhsminor.yy191;
        break;
      case 105: /* expr ::= object DOT_E edge DOT_L Y */
#line 670 "pikchr.y"
{yylhsminor.yy191=pik_place_of_elem(p,yymsp[-4].minor.yy26,&yymsp[-2].minor.yy0).y;}
#line 2766 "pikchr.c"
  yymsp[-4].minor.yy191 = yylhsminor.yy191;
        break;
      case 106: /* expr ::= LP locproperty OF object RP */
      case 107: /* expr ::= LP dashproperty OF object RP */ yytestcase(yyruleno==107);
      case 108: /* expr ::= LP numproperty OF object RP */ yytestcase(yyruleno==108);
      case 109: /* expr ::= LP colorproperty OF object RP */ yytestcase(yyruleno==109);
#line 671 "pikchr.y"
{yymsp[-4].minor.yy191=pik_property_of(p,yymsp[-1].minor.yy26,&yymsp[-3].minor.yy0);}
#line 2775 "pikchr.c"
        break;
      case 110: /* expr ::= NTH VERTEX OF object DOT_L X */
#line 677 "pikchr.y"
{yylhsminor.yy191 = pik_nth_vertex(p,&yymsp[-5].minor.yy0,&yymsp[-4].minor.yy0,yymsp[-2].minor.yy26).x;}
#line 2780 "pikchr.c"
  yymsp[-5].minor.yy191 = yylhsminor.yy191;
        break;
      case 111: /* expr ::= NTH VERTEX OF object DOT_L Y */
#line 679 "pikchr.y"
{yylhsminor.yy191 = pik_nth_vertex(p,&yymsp[-5].minor.yy0,&yymsp[-4].minor.yy0,yymsp[-2].minor.yy26).y;}
#line 2786 "pikchr.c"
  yymsp[-5].minor.yy191 = yylhsminor.yy191;
        break;
      default:
      /* (112) lvalue ::= ID */ yytestcase(yyruleno==112);
      /* (113) lvalue ::= FILL */ yytestcase(yyruleno==113);
      /* (114) lvalue ::= COLOR */ yytestcase(yyruleno==114);
      /* (115) lvalue ::= THICKNESS */ yytestcase(yyruleno==115);
      /* (116) rvalue ::= expr */ yytestcase(yyruleno==116);
      /* (117) print ::= PRINT */ yytestcase(yyruleno==117);
      /* (118) prlist ::= pritem (OPTIMIZED OUT) */ assert(yyruleno!=118);
      /* (119) prlist ::= prlist prsep pritem */ yytestcase(yyruleno==119);
      /* (120) direction ::= UP */ yytestcase(yyruleno==120);
      /* (121) direction ::= DOWN */ yytestcase(yyruleno==121);
      /* (122) direction ::= LEFT */ yytestcase(yyruleno==122);
      /* (123) direction ::= RIGHT */ yytestcase(yyruleno==123);
      /* (124) attribute_list ::= alist */ yytestcase(yyruleno==124);
      /* (125) alist ::= */ yytestcase(yyruleno==125);
      /* (126) alist ::= alist attribute */ yytestcase(yyruleno==126);
      /* (127) attribute ::= boolproperty (OPTIMIZED OUT) */ assert(yyruleno!=127);
      /* (128) attribute ::= WITH withclause */ yytestcase(yyruleno==128);
      /* (129) even ::= UNTIL EVEN WITH */ yytestcase(yyruleno==129);
      /* (130) even ::= EVEN WITH */ yytestcase(yyruleno==130);
      /* (131) withclause ::= with (OPTIMIZED OUT) */ assert(yyruleno!=131);
      /* (132) withclause ::= withclause AND with */ yytestcase(yyruleno==132);
      /* (133) dashproperty ::= DOTTED */ yytestcase(yyruleno==133);
      /* (134) dashproperty ::= DASHED */ yytestcase(yyruleno==134);
      /* (135) colorproperty ::= FILL */ yytestcase(yyruleno==135);
      /* (136) colorproperty ::= COLOR */ yytestcase(yyruleno==136);
      /* (137) position ::= place */ yytestcase(yyruleno==137);
      /* (138) between ::= WAY BETWEEN */ yytestcase(yyruleno==138);
      /* (139) between ::= BETWEEN */ yytestcase(yyruleno==139);
      /* (140) between ::= OF THE WAY BETWEEN */ yytestcase(yyruleno==140);
      /* (141) object ::= objectname */ yytestcase(yyruleno==141);
      /* (142) locproperty ::= X|Y */ yytestcase(yyruleno==142);
      /* (143) edge ::= EDGEPT */ yytestcase(yyruleno==143);
      /* (144) edge ::= TOP */ yytestcase(yyruleno==144);
      /* (145) edge ::= BOTTOM */ yytestcase(yyruleno==145);
      /* (146) edge ::= LEFT */ yytestcase(yyruleno==146);
      /* (147) edge ::= RIGHT */ yytestcase(yyruleno==147);
        break;
/********** End reduce actions ************************************************/
  };
  assert( yyruleno<sizeof(yyRuleInfoLhs)/sizeof(yyRuleInfoLhs[0]) );
  yygoto = yyRuleInfoLhs[yyruleno];
  yysize = yyRuleInfoNRhs[yyruleno];
  yyact = yy_find_reduce_action(yymsp[yysize].stateno,(YYCODETYPE)yygoto);

  int yymajor,                   /* The major type of the error token */
  pik_parserTOKENTYPE yyminor         /* The minor type of the error token */
){
  pik_parserARG_FETCH
  pik_parserCTX_FETCH
#define TOKEN yyminor
/************ Begin %syntax_error code ****************************************/
#line 466 "pikchr.y"

  if( TOKEN.z && TOKEN.z[0] ){
    pik_error(p, &TOKEN, "syntax error");
  }else{
    pik_error(p, 0, "syntax error");
  }
#line 2892 "pikchr.c"
/************ End %syntax_error code ******************************************/
  pik_parserARG_STORE /* Suppress warning about unused %extra_argument variable */
  pik_parserCTX_STORE
}

/*
** The following is executed when the parser accepts

  assert( iToken<(int)(sizeof(yyFallback)/sizeof(yyFallback[0])) );
  return yyFallback[iToken];
#else
  (void)iToken;
  return 0;
#endif
}
#line 689 "pikchr.y"



/* Chart of the 140 official HTML color names with their
** corresponding RGB value.
**
** Two new names "None" and "Off" are added with a value

  snprintf(buf, sizeof(buf)-1, "%s%d,%d", z1,
       (int)(p->rScale*x), (int)(p->rScale*y));
  buf[sizeof(buf)-1] = 0;
  pik_append(p, buf, -1);
}
static void pik_append_dis(Pik *p, const char *z1, PNum v, const char *z2){
  char buf[200];
  snprintf(buf, sizeof(buf)-1, "%s%g%s", z1, p->rScale*v, z2);
  buf[sizeof(buf)-1] = 0;
  pik_append(p, buf, -1);
}
static void pik_append_clr(Pik *p, const char *z1, PNum v, const char *z2){
  char buf[200];
  int x = (int)v;
  int r = (x>>16) & 0xff;

  if( pElem->fill>=0 ){
    pik_append_clr(p, "fill:", pElem->fill, ";");
  }else{
    pik_append(p,"fill:none;",-1);
  }
  if( pElem->sw>0.0 && pElem->color>=0.0 ){
    PNum sw = pElem->sw;

    pik_append_dis(p, "stroke-width:", sw, ";");
    pik_append_clr(p, "stroke:",pElem->color,";");
    if( pElem->dotted>0.0 ){
      PNum v = pElem->dotted;
      if( sw<2.1/p->rScale ) sw = 2.1/p->rScale;
      pik_append_dis(p,"stroke-dasharray:",sw,"");
      pik_append_dis(p,",",v,";");

  }else if( pElem->type->isLine ){
    dy2 = pElem->sw;
  }else{
    dy2 = 0.0;
  }
  for(i=0; i<n; i++){
    PToken *t = &aTxt[i];
    PNum xtraFontScale = 1.0;
    orig_y = y = pElem->ptAt.y;
    if( t->eCode & TP_ABOVE2 ) y += dy2 + 3*dy;
    if( t->eCode & TP_ABOVE  ) y += dy2 + dy;
    if( t->eCode & TP_BELOW  ) y -= dy2 + dy;
    if( t->eCode & TP_BELOW2 ) y -= dy2 + 3*dy;
    if( t->eCode & TP_BIG    ) xtraFontScale *= 1.25;
    if( t->eCode & TP_SMALL  ) xtraFontScale *= 0.8;
    if( t->eCode & TP_XTRA   ) xtraFontScale *= xtraFontScale;

    if( pBox!=0 ){
      /* If pBox is not NULL, do not draw any <text>.  Instead, just expand
      ** pBox to include the text */
      PNum cw = pik_text_length(t)*p->charWidth*xtraFontScale;
      PNum ch = p->charHeight*0.5*xtraFontScale;
      if( t->eCode & TP_RJUST ){
        pik_bbox_add_xy(pBox, x, y-ch);
        pik_bbox_add_xy(pBox, x-cw, y+ch);
      }else if( t->eCode & TP_LJUST ){
        pik_bbox_add_xy(pBox, x, y-ch);
        pik_bbox_add_xy(pBox, x+cw, y+ch);
      }else{

    }
    if( t->eCode & TP_BOLD ){
      pik_append(p, " font-weight=\"bold\"", -1);
    }
    if( pElem->color>=0.0 ){
      pik_append_clr(p, " fill=\"", pElem->color, "\"");
    }
    xtraFontScale *= p->fontScale;
    if( xtraFontScale<=0.99 || xtraFontScale>=1.01 ){
      pik_append_num(p, " font-size=\"", xtraFontScale*100.0);
      pik_append(p, "%\"", 2);
    }
    if( (t->eCode & TP_ALIGN)!=0 && pElem->nPath>=2 ){
      int n = pElem->nPath;
      PNum dx = pElem->aPath[n-1].x - pElem->aPath[0].x;
      PNum dy = pElem->aPath[n-1].y - pElem->aPath[0].y;
      PNum ang = atan2(dy,dx)*-180/M_PI;

    case T_CENTER:   /* no-op */                          break;
    case T_LJUST:    iRes = (iRes&~TP_JMASK) | TP_LJUST;  break;
    case T_RJUST:    iRes = (iRes&~TP_JMASK) | TP_RJUST;  break;
    case T_ABOVE:    iRes = (iRes&~TP_VMASK) | TP_ABOVE;  break;
    case T_BELOW:    iRes = (iRes&~TP_VMASK) | TP_BELOW;  break;
    case T_ITALIC:   iRes |= TP_ITALIC;                   break; 
    case T_BOLD:     iRes |= TP_BOLD;                     break; 
    case T_ALIGNED:  iRes |= TP_ALIGN;                    break;
    case T_BIG:      if( iRes & TP_BIG ) iRes |= TP_XTRA;
                     else iRes = (iRes &~TP_SZMASK)|TP_BIG;   break;
    case T_SMALL:    if( iRes & TP_SMALL ) iRes |= TP_XTRA;
                     else iRes = (iRes &~TP_SZMASK)|TP_SMALL; break;
  }
  return iRes;
}

/* Return an estimate of the actually number of displayed characters
** in a character string.
**

  { "abs",        3,   T_FUNC1,     FN_ABS,    0       },
  { "aligned",    7,   T_ALIGNED,   0,         0       },
  { "and",        3,   T_AND,       0,         0       },
  { "as",         2,   T_AS,        0,         0       },
  { "at",         2,   T_AT,        0,         0       },
  { "below",      5,   T_BELOW,     0,         0       },
  { "between",    7,   T_BETWEEN,   0,         0       },
  { "big",        3,   T_BIG,       0,         0       },
  { "bold",       4,   T_BOLD,      0,         0       },
  { "bot",        3,   T_EDGEPT,    0,         CP_S    },
  { "bottom",     6,   T_BOTTOM,    0,         CP_S    },
  { "c",          1,   T_EDGEPT,    0,         CP_C    },
  { "ccw",        3,   T_CCW,       0,         0       },
  { "center",     6,   T_CENTER,    0,         0       },
  { "chop",       4,   T_CHOP,      0,         0       },

  { "radius",     6,   T_RADIUS,    0,         0       },
  { "right",      5,   T_RIGHT,     DIR_RIGHT, CP_E    },
  { "rjust",      5,   T_RJUST,     0,         0       },
  { "s",          1,   T_EDGEPT,    0,         CP_S    },
  { "same",       4,   T_SAME,      0,         0       },
  { "se",         2,   T_EDGEPT,    0,         CP_SE   },
  { "sin",        3,   T_FUNC1,     FN_SIN,    0       },
  { "small",      5,   T_SMALL,     0,         0       },
  { "south",      5,   T_EDGEPT,    0,         CP_S    },
  { "sqrt",       4,   T_FUNC1,     FN_SQRT,   0       },
  { "start",      5,   T_START,     0,         0       },
  { "sw",         2,   T_EDGEPT,    0,         CP_SW   },
  { "t",          1,   T_TOP,       0,         CP_N    },
  { "the",        3,   T_THE,       0,         0       },
  { "then",       4,   T_THEN,      0,         0       },
  { "thick",      5,   T_THICK,     0,         0       },
  { "thickness",  9,   T_THICKNESS, 0,         0       },
  { "thin",       4,   T_THIN,      0,         0       },
  { "to",         2,   T_TO,        0,         0       },
  { "top",        3,   T_TOP,       0,         CP_N    },
  { "until",      5,   T_UNTIL,     0,         0       },
  { "up",         2,   T_UP,        DIR_UP,    0       },
  { "vertex",     6,   T_VERTEX,    0,         0       },
  { "w",          1,   T_EDGEPT,    0,         CP_W    },
  { "way",        3,   T_WAY,       0,         0       },

    }
  }
  printf("</body></html>\n");
  return 0; 
}
#endif /* PIKCHR_SHELL */

#line 6558 "pikchr.c"