#line 2 "input_lexer.cc"

#line 4 "input_lexer.cc"

#define  YY_INT_ALIGNED short int

/* A lexical scanner generated by flex */

#define FLEX_SCANNER
#define YY_FLEX_MAJOR_VERSION 2
#define YY_FLEX_MINOR_VERSION 6
#define YY_FLEX_SUBMINOR_VERSION 4
#if YY_FLEX_SUBMINOR_VERSION > 0
#define FLEX_BETA
#endif

#ifdef yy_create_buffer
#define giac_yy_create_buffer_ALREADY_DEFINED
#else
#define yy_create_buffer giac_yy_create_buffer
#endif

#ifdef yy_delete_buffer
#define giac_yy_delete_buffer_ALREADY_DEFINED
#else
#define yy_delete_buffer giac_yy_delete_buffer
#endif

#ifdef yy_scan_buffer
#define giac_yy_scan_buffer_ALREADY_DEFINED
#else
#define yy_scan_buffer giac_yy_scan_buffer
#endif

#ifdef yy_scan_string
#define giac_yy_scan_string_ALREADY_DEFINED
#else
#define yy_scan_string giac_yy_scan_string
#endif

#ifdef yy_scan_bytes
#define giac_yy_scan_bytes_ALREADY_DEFINED
#else
#define yy_scan_bytes giac_yy_scan_bytes
#endif

#ifdef yy_init_buffer
#define giac_yy_init_buffer_ALREADY_DEFINED
#else
#define yy_init_buffer giac_yy_init_buffer
#endif

#ifdef yy_flush_buffer
#define giac_yy_flush_buffer_ALREADY_DEFINED
#else
#define yy_flush_buffer giac_yy_flush_buffer
#endif

#ifdef yy_load_buffer_state
#define giac_yy_load_buffer_state_ALREADY_DEFINED
#else
#define yy_load_buffer_state giac_yy_load_buffer_state
#endif

#ifdef yy_switch_to_buffer
#define giac_yy_switch_to_buffer_ALREADY_DEFINED
#else
#define yy_switch_to_buffer giac_yy_switch_to_buffer
#endif

#ifdef yypush_buffer_state
#define giac_yypush_buffer_state_ALREADY_DEFINED
#else
#define yypush_buffer_state giac_yypush_buffer_state
#endif

#ifdef yypop_buffer_state
#define giac_yypop_buffer_state_ALREADY_DEFINED
#else
#define yypop_buffer_state giac_yypop_buffer_state
#endif

#ifdef yyensure_buffer_stack
#define giac_yyensure_buffer_stack_ALREADY_DEFINED
#else
#define yyensure_buffer_stack giac_yyensure_buffer_stack
#endif

#ifdef yylex
#define giac_yylex_ALREADY_DEFINED
#else
#define yylex giac_yylex
#endif

#ifdef yyrestart
#define giac_yyrestart_ALREADY_DEFINED
#else
#define yyrestart giac_yyrestart
#endif

#ifdef yylex_init
#define giac_yylex_init_ALREADY_DEFINED
#else
#define yylex_init giac_yylex_init
#endif

#ifdef yylex_init_extra
#define giac_yylex_init_extra_ALREADY_DEFINED
#else
#define yylex_init_extra giac_yylex_init_extra
#endif

#ifdef yylex_destroy
#define giac_yylex_destroy_ALREADY_DEFINED
#else
#define yylex_destroy giac_yylex_destroy
#endif

#ifdef yyget_debug
#define giac_yyget_debug_ALREADY_DEFINED
#else
#define yyget_debug giac_yyget_debug
#endif

#ifdef yyset_debug
#define giac_yyset_debug_ALREADY_DEFINED
#else
#define yyset_debug giac_yyset_debug
#endif

#ifdef yyget_extra
#define giac_yyget_extra_ALREADY_DEFINED
#else
#define yyget_extra giac_yyget_extra
#endif

#ifdef yyset_extra
#define giac_yyset_extra_ALREADY_DEFINED
#else
#define yyset_extra giac_yyset_extra
#endif

#ifdef yyget_in
#define giac_yyget_in_ALREADY_DEFINED
#else
#define yyget_in giac_yyget_in
#endif

#ifdef yyset_in
#define giac_yyset_in_ALREADY_DEFINED
#else
#define yyset_in giac_yyset_in
#endif

#ifdef yyget_out
#define giac_yyget_out_ALREADY_DEFINED
#else
#define yyget_out giac_yyget_out
#endif

#ifdef yyset_out
#define giac_yyset_out_ALREADY_DEFINED
#else
#define yyset_out giac_yyset_out
#endif

#ifdef yyget_leng
#define giac_yyget_leng_ALREADY_DEFINED
#else
#define yyget_leng giac_yyget_leng
#endif

#ifdef yyget_text
#define giac_yyget_text_ALREADY_DEFINED
#else
#define yyget_text giac_yyget_text
#endif

#ifdef yyget_lineno
#define giac_yyget_lineno_ALREADY_DEFINED
#else
#define yyget_lineno giac_yyget_lineno
#endif

#ifdef yyset_lineno
#define giac_yyset_lineno_ALREADY_DEFINED
#else
#define yyset_lineno giac_yyset_lineno
#endif

#ifdef yyget_column
#define giac_yyget_column_ALREADY_DEFINED
#else
#define yyget_column giac_yyget_column
#endif

#ifdef yyset_column
#define giac_yyset_column_ALREADY_DEFINED
#else
#define yyset_column giac_yyset_column
#endif

#ifdef yywrap
#define giac_yywrap_ALREADY_DEFINED
#else
#define yywrap giac_yywrap
#endif

#ifdef yyget_lval
#define giac_yyget_lval_ALREADY_DEFINED
#else
#define yyget_lval giac_yyget_lval
#endif

#ifdef yyset_lval
#define giac_yyset_lval_ALREADY_DEFINED
#else
#define yyset_lval giac_yyset_lval
#endif

#ifdef yyalloc
#define giac_yyalloc_ALREADY_DEFINED
#else
#define yyalloc giac_yyalloc
#endif

#ifdef yyrealloc
#define giac_yyrealloc_ALREADY_DEFINED
#else
#define yyrealloc giac_yyrealloc
#endif

#ifdef yyfree
#define giac_yyfree_ALREADY_DEFINED
#else
#define yyfree giac_yyfree
#endif

/* First, we deal with  platform-specific or compiler-specific issues. */

/* begin standard C headers. */
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>

/* end standard C headers. */

/* flex integer type definitions */

#ifndef FLEXINT_H
#define FLEXINT_H

/* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */

#if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L

/* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
 * if you want the limit (max/min) macros for int types. 
 */
#ifndef __STDC_LIMIT_MACROS
#define __STDC_LIMIT_MACROS 1
#endif

#include <inttypes.h>
typedef int8_t flex_int8_t;
typedef uint8_t flex_uint8_t;
typedef int16_t flex_int16_t;
typedef uint16_t flex_uint16_t;
typedef int32_t flex_int32_t;
typedef uint32_t flex_uint32_t;
#else
typedef signed char flex_int8_t;
typedef short int flex_int16_t;
typedef int flex_int32_t;
typedef unsigned char flex_uint8_t; 
typedef unsigned short int flex_uint16_t;
typedef unsigned int flex_uint32_t;

/* Limits of integral types. */
#ifndef INT8_MIN
#define INT8_MIN               (-128)
#endif
#ifndef INT16_MIN
#define INT16_MIN              (-32767-1)
#endif
#ifndef INT32_MIN
#define INT32_MIN              (-2147483647-1)
#endif
#ifndef INT8_MAX
#define INT8_MAX               (127)
#endif
#ifndef INT16_MAX
#define INT16_MAX              (32767)
#endif
#ifndef INT32_MAX
#define INT32_MAX              (2147483647)
#endif
#ifndef UINT8_MAX
#define UINT8_MAX              (255U)
#endif
#ifndef UINT16_MAX
#define UINT16_MAX             (65535U)
#endif
#ifndef UINT32_MAX
#define UINT32_MAX             (4294967295U)
#endif

#ifndef SIZE_MAX
#define SIZE_MAX               (~(size_t)0)
#endif

#endif /* ! C99 */

#endif /* ! FLEXINT_H */

/* begin standard C++ headers. */

/* TODO: this is always defined, so inline it */
#define yyconst const

#if defined(__GNUC__) && __GNUC__ >= 3
#define yynoreturn __attribute__((__noreturn__))
#else
#define yynoreturn
#endif

/* Returned upon end-of-file. */
#define YY_NULL 0

/* Promotes a possibly negative, possibly signed char to an
 *   integer in range [0..255] for use as an array index.
 */
#define YY_SC_TO_UI(c) ((YY_CHAR) (c))

/* An opaque pointer. */
#ifndef YY_TYPEDEF_YY_SCANNER_T
#define YY_TYPEDEF_YY_SCANNER_T
typedef void* yyscan_t;
#endif

/* For convenience, these vars (plus the bison vars far below)
   are macros in the reentrant scanner. */
#define yyin yyg->yyin_r
#define yyout yyg->yyout_r
#define yyextra yyg->yyextra_r
#define yyleng yyg->yyleng_r
#define yytext yyg->yytext_r
#define yylineno (YY_CURRENT_BUFFER_LVALUE->yy_bs_lineno)
#define yycolumn (YY_CURRENT_BUFFER_LVALUE->yy_bs_column)
#define yy_flex_debug yyg->yy_flex_debug_r

/* Enter a start condition.  This macro really ought to take a parameter,
 * but we do it the disgusting crufty way forced on us by the ()-less
 * definition of BEGIN.
 */
#define BEGIN yyg->yy_start = 1 + 2 *
/* Translate the current start state into a value that can be later handed
 * to BEGIN to return to the state.  The YYSTATE alias is for lex
 * compatibility.
 */
#define YY_START ((yyg->yy_start - 1) / 2)
#define YYSTATE YY_START
/* Action number for EOF rule of a given start state. */
#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
/* Special action meaning "start processing a new file". */
#define YY_NEW_FILE yyrestart( yyin , yyscanner )
#define YY_END_OF_BUFFER_CHAR 0

/* Size of default input buffer. */
#ifndef YY_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k.
 * Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case.
 * Ditto for the __ia64__ case accordingly.
 */
#define YY_BUF_SIZE 32768
#else
#define YY_BUF_SIZE 16384
#endif /* __ia64__ */
#endif

/* The state buf must be large enough to hold one state per character in the main buffer.
 */
#define YY_STATE_BUF_SIZE   ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))

#ifndef YY_TYPEDEF_YY_BUFFER_STATE
#define YY_TYPEDEF_YY_BUFFER_STATE
typedef struct yy_buffer_state *YY_BUFFER_STATE;
#endif

#ifndef YY_TYPEDEF_YY_SIZE_T
#define YY_TYPEDEF_YY_SIZE_T
typedef size_t yy_size_t;
#endif

#define EOB_ACT_CONTINUE_SCAN 0
#define EOB_ACT_END_OF_FILE 1
#define EOB_ACT_LAST_MATCH 2
    
    #define YY_LESS_LINENO(n)
    #define YY_LINENO_REWIND_TO(ptr)
    
/* Return all but the first "n" matched characters back to the input stream. */
#define yyless(n) \
	do \
		{ \
		/* Undo effects of setting up yytext. */ \
        int yyless_macro_arg = (n); \
        YY_LESS_LINENO(yyless_macro_arg);\
		*yy_cp = yyg->yy_hold_char; \
		YY_RESTORE_YY_MORE_OFFSET \
		yyg->yy_c_buf_p = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
		YY_DO_BEFORE_ACTION; /* set up yytext again */ \
		} \
	while ( 0 )
#define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner )

#ifndef YY_STRUCT_YY_BUFFER_STATE
#define YY_STRUCT_YY_BUFFER_STATE
struct yy_buffer_state
	{
	FILE *yy_input_file;

	char *yy_ch_buf;		/* input buffer */
	char *yy_buf_pos;		/* current position in input buffer */

	/* Size of input buffer in bytes, not including room for EOB
	 * characters.
	 */
	int yy_buf_size;

	/* Number of characters read into yy_ch_buf, not including EOB
	 * characters.
	 */
	int yy_n_chars;

	/* Whether we "own" the buffer - i.e., we know we created it,
	 * and can realloc() it to grow it, and should free() it to
	 * delete it.
	 */
	int yy_is_our_buffer;

	/* Whether this is an "interactive" input source; if so, and
	 * if we're using stdio for input, then we want to use getc()
	 * instead of fread(), to make sure we stop fetching input after
	 * each newline.
	 */
	int yy_is_interactive;

	/* Whether we're considered to be at the beginning of a line.
	 * If so, '^' rules will be active on the next match, otherwise
	 * not.
	 */
	int yy_at_bol;

    int yy_bs_lineno; /**< The line count. */
    int yy_bs_column; /**< The column count. */

	/* Whether to try to fill the input buffer when we reach the
	 * end of it.
	 */
	int yy_fill_buffer;

	int yy_buffer_status;

#define YY_BUFFER_NEW 0
#define YY_BUFFER_NORMAL 1
	/* When an EOF's been seen but there's still some text to process
	 * then we mark the buffer as YY_EOF_PENDING, to indicate that we
	 * shouldn't try reading from the input source any more.  We might
	 * still have a bunch of tokens to match, though, because of
	 * possible backing-up.
	 *
	 * When we actually see the EOF, we change the status to "new"
	 * (via yyrestart()), so that the user can continue scanning by
	 * just pointing yyin at a new input file.
	 */
#define YY_BUFFER_EOF_PENDING 2

	};
#endif /* !YY_STRUCT_YY_BUFFER_STATE */

/* We provide macros for accessing buffer states in case in the
 * future we want to put the buffer states in a more general
 * "scanner state".
 *
 * Returns the top of the stack, or NULL.
 */
#define YY_CURRENT_BUFFER ( yyg->yy_buffer_stack \
                          ? yyg->yy_buffer_stack[yyg->yy_buffer_stack_top] \
                          : NULL)
/* Same as previous macro, but useful when we know that the buffer stack is not
 * NULL or when we need an lvalue. For internal use only.
 */
#define YY_CURRENT_BUFFER_LVALUE yyg->yy_buffer_stack[yyg->yy_buffer_stack_top]

void yyrestart ( FILE *input_file , yyscan_t yyscanner );
void yy_switch_to_buffer ( YY_BUFFER_STATE new_buffer , yyscan_t yyscanner );
YY_BUFFER_STATE yy_create_buffer ( FILE *file, int size , yyscan_t yyscanner );
void yy_delete_buffer ( YY_BUFFER_STATE b , yyscan_t yyscanner );
void yy_flush_buffer ( YY_BUFFER_STATE b , yyscan_t yyscanner );
void yypush_buffer_state ( YY_BUFFER_STATE new_buffer , yyscan_t yyscanner );
void yypop_buffer_state ( yyscan_t yyscanner );

static void yyensure_buffer_stack ( yyscan_t yyscanner );
static void yy_load_buffer_state ( yyscan_t yyscanner );
static void yy_init_buffer ( YY_BUFFER_STATE b, FILE *file , yyscan_t yyscanner );
#define YY_FLUSH_BUFFER yy_flush_buffer( YY_CURRENT_BUFFER , yyscanner)

YY_BUFFER_STATE yy_scan_buffer ( char *base, yy_size_t size , yyscan_t yyscanner );
YY_BUFFER_STATE yy_scan_string ( const char *yy_str , yyscan_t yyscanner );
YY_BUFFER_STATE yy_scan_bytes ( const char *bytes, int len , yyscan_t yyscanner );

void *yyalloc ( yy_size_t , yyscan_t yyscanner );
void *yyrealloc ( void *, yy_size_t , yyscan_t yyscanner );
void yyfree ( void * , yyscan_t yyscanner );

#define yy_new_buffer yy_create_buffer
#define yy_set_interactive(is_interactive) \
	{ \
	if ( ! YY_CURRENT_BUFFER ){ \
        yyensure_buffer_stack (yyscanner); \
		YY_CURRENT_BUFFER_LVALUE =    \
            yy_create_buffer( yyin, YY_BUF_SIZE , yyscanner); \
	} \
	YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
	}
#define yy_set_bol(at_bol) \
	{ \
	if ( ! YY_CURRENT_BUFFER ){\
        yyensure_buffer_stack (yyscanner); \
		YY_CURRENT_BUFFER_LVALUE =    \
            yy_create_buffer( yyin, YY_BUF_SIZE , yyscanner); \
	} \
	YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
	}
#define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)

/* Begin user sect3 */

#define giac_yywrap(yyscanner) (/*CONSTCOND*/1)
#define YY_SKIP_YYWRAP
typedef flex_uint8_t YY_CHAR;

typedef int yy_state_type;

#define yytext_ptr yytext_r

static yy_state_type yy_get_previous_state ( yyscan_t yyscanner );
static yy_state_type yy_try_NUL_trans ( yy_state_type current_state  , yyscan_t yyscanner);
static int yy_get_next_buffer ( yyscan_t yyscanner );
static void yynoreturn yy_fatal_error ( const char* msg , yyscan_t yyscanner );

/* Done after the current pattern has been matched and before the
 * corresponding action - sets up yytext.
 */
#define YY_DO_BEFORE_ACTION \
	yyg->yytext_ptr = yy_bp; \
	yyleng = (int) (yy_cp - yy_bp); \
	yyg->yy_hold_char = *yy_cp; \
	*yy_cp = '\0'; \
	yyg->yy_c_buf_p = yy_cp;
#define YY_NUM_RULES 453
#define YY_END_OF_BUFFER 454
/* This struct is not used in this scanner,
   but its presence is necessary. */
struct yy_trans_info
	{
	flex_int32_t yy_verify;
	flex_int32_t yy_nxt;
	};
static const flex_int16_t yy_accept[1428] =
    {   0,
        0,    0,   23,   23,    0,    0,    0,    0,    0,    0,
      454,  452,    1,    2,  208,    3,  450,  153,  266,  220,
       31,   99,  100,  241,  210,   97,  236,  245,  251,  423,
      423,   34,   32,   91,  150,   92,   29,  168,  448,  448,
      448,  317,  448,  448,  448,  448,   44,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  101,
      102,  274,   30,   16,  448,  448,  448,  448,  318,  448,
      448,  448,   38,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  120,  181,  121,  221,
       42,  448,  448,  448,  448,  448,  452,  448,  448,   23,

       25,   24,  453,  451,  453,   15,    6,    5,  453,   18,
       17,   19,    1,    0,    0,  137,    0,    0,    0,    0,
        0,    0,    0,    0,  154,  267,  253,  151,  449,  104,
      105,    0,   46,   45,  449,  122,  123,  174,  246,  256,
      247,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,  277,
      243,  211,  212,   98,  103,  216,    0,  131,  217,  130,
      248,  219,  238,  198,  263,  444,  278,  252,   22,    0,
      261,  119,  442,  423,  424,    0,    0,    0,    0,    0,

        0,   36,   35,  157,    0,    0,    0,  128,  144,  139,
      164,    0,  165,  132,  163,  148,  129,  167,  169,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  389,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  335,  399,  448,  448,  448,  448,  186,   51,
      448,  448,   50,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  275,  258,  188,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,  448,  448,  448,  448,  448,  307,  448,  448,
      448,  448,  448,  448,  448,  390,  448,  448,  448,  448,

      448,  448,  448,  448,  448,  448,  448,  448,  448,   67,
      334,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,   57,  359,  448,   48,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  118,  257,  182,   33,  448,  224,  225,  448,
       62,  196,   39,   37,   49,  448,  448,  448,  448,  448,
      448,  448,    0,  448,  448,   23,   24,   24,   26,    0,
      451,   15,    4,   14,    7,    8,   12,   13,    9,   11,
       10,   18,  199,  201,    0,    0,  434,  435,  433,  437,

      436,  438,  268,  112,  113,  106,  107,  124,  125,  255,
      449,  110,  111,   47,    0,    0,    0,    0,  155,  269,
        0,    0,  249,  234,  239,    0,  264,    0,  145,    0,
        0,  152,    0,  147,    0,  172,    0,  279,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,  214,  134,  200,  205,  445,    0,  254,    0,
       21,  442,  443,    0,    0,    0,  446,    0,  440,  439,
      441,  425,    0,    0,    0,    0,  260,    0,  133,  259,
      176,  209,  448,  448,  448,  412,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  329,  403,  448,  448,

      448,  448,  448,  448,  448,  448,  448,  408,  448,  352,
      448,  448,  448,  448,  448,  448,  448,  448,  411,  448,
      378,  448,  448,  448,  448,  448,  193,    0,    0,    0,
        0,    0,    0,  340,    0,    0,    0,    0,    0,    0,
      185,    0,    0,    0,    0,    0,    0,    0,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  328,  448,  448,  448,  448,  448,  448,   56,
      448,  448,  203,  448,  448,  345,  448,  448,  271,  354,
      448,  351,  448,  448,  448,  448,  448,  448,  448,  448,

      448,  276,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      189,    0,  448,   43,  233,  226,  227,  228,  229,  230,
      231,  319,  162,  197,  417,  422,  237,  222,   54,  223,
      177,  187,  195,  194,  418,  420,  419,  421,  242,  190,
      161,  160,  232,   41,  320,  448,    7,    8,    0,    0,
        0,    0,    0,  114,  115,  108,  109,  126,  127,    0,
       95,   93,  138,  270,  178,  206,  158,  142,  140,  135,
      149,  170,    0,    0,  339,    0,    0,    0,    0,    0,

      358,  184,    0,    0,    0,    0,  183,    0,    0,  444,
        0,  443,    0,    0,    0,  442,    0,    0,  447,    0,
      426,    0,   20,    0,    0,    0,    0,  448,  313,  314,
      448,  448,  448,  448,  448,  448,  406,  448,  448,  401,
      409,  330,  448,  448,  448,  448,  448,  337,  344,  402,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      391,  448,  386,  448,  448,  180,    0,    0,    0,    0,
        0,    0,    0,    0,    0,  273,    0,  356,    0,    0,
        0,    0,    0,    0,    0,  191,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  311,  448,  448,  448,  448,

      448,    0,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  336,  448,
      448,  448,  448,  448,   64,  448,  448,  448,  448,    0,
      448,  448,  448,  448,  448,  448,   74,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  376,  448,  377,
      448,   65,   66,  448,  448,  448,  380,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,    0,  448,
       40,    7,    0,    0,  116,  117,    0,   96,   94,  179,
        0,    0,    0,    0,  272,  355,    0,    0,    0,  192,
        0,  445,    0,    0,    0,  442,    0,    0,  443,    0,

        0,  397,  396,  398,  166,  312,  405,  315,  448,  448,
      448,  448,  448,  324,  448,  448,  448,  448,  448,  448,
      367,  407,  393,  448,  448,  448,  448,  415,  448,  395,
      388,  404,    0,    0,    0,    0,    0,    0,    0,  146,
        0,  250,  235,    0,    0,    0,    0,    0,    0,  448,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,    0,    0,    0,  448,  321,  323,  322,
      448,  448,  448,  448,  448,  448,  448,  448,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  448,   71,   68,
       83,  448,  448,  448,    0,  448,  448,  448,  362,  448,

      448,  448,  448,  448,  448,  365,  448,  448,  448,  448,
      448,  448,  448,   87,  448,  448,  448,  448,  448,  448,
      448,  448,  204,  448,  448,   61,  448,  448,  448,  448,
      387,    0,  448,   27,   28,    0,  304,  338,    0,    0,
        0,    0,    0,    0,  443,    0,    0,  448,  287,  410,
      281,  448,  283,  448,  448,  448,  448,  414,  371,  374,
      448,  400,  448,  379,    0,    0,  136,    0,  171,    0,
        0,  350,  280,  207,    0,    0,    0,  383,  448,  448,
      448,  301,  305,  308,  448,  448,  448,  448,  347,   79,
      316,  448,  332,  331,    0,  448,  448,  448,  448,  448,

      325,  326,  448,  448,  448,  448,  448,   70,  448,  448,
      448,  448,  448,  448,  448,  448,  448,  353,  294,  448,
      361,  448,  448,   77,   81,  448,  448,  448,  448,  448,
      369,  448,  448,  372,  448,  448,  346,  448,  448,  381,
      348,  448,   78,  448,  448,  448,  448,  448,   55,   89,
       90,    0,    0,  349,    0,    0,  382,  427,  448,  448,
      448,  282,  284,  448,  394,  448,  159,  265,    0,    0,
        0,  156,    0,    0,  448,  448,  448,  303,  306,  309,
       82,  448,  448,  448,  448,    0,  299,  448,  448,  448,
      448,  448,  360,   85,   75,  448,  448,  448,  448,  448,

      448,  448,   73,  448,  357,  448,  448,  448,  448,  448,
      448,  448,  448,  370,  448,  448,  448,  448,  448,  288,
      448,  448,  448,   72,  385,    0,    0,  375,    0,  428,
      448,  392,  285,  448,  448,  173,    0,  143,    0,  141,
      448,  448,  448,  448,  448,  448,  448,  333,  448,  448,
      448,  448,  327,   76,  448,  341,  448,   53,  202,  448,
      448,   63,  448,   59,  448,  448,  302,  368,   88,  373,
      448,  448,  448,  448,  366,  448,  448,    0,    0,    0,
        0,    0,  413,  286,  416,    0,  240,  448,  448,  448,
      448,  310,  448,  448,  448,  448,  448,  448,  448,   80,

      448,  448,   60,  448,   86,  448,   69,  448,  448,  448,
      448,  448,  175,    0,    0,  431,    0,  343,  448,  448,
      448,  448,  448,  448,  218,  448,  448,  448,  448,  448,
      448,  363,  448,  448,  448,  448,  448,  448,  342,    0,
        0,  429,  448,  448,  291,  213,  448,  448,  448,  448,
      448,   52,  448,  297,  448,  448,  448,  448,  448,  448,
        0,    0,  430,  448,  290,  295,  448,  448,  448,  448,
      448,  448,  448,   84,  448,   58,  448,    0,  432,  448,
      448,  448,  448,  448,  448,  300,  448,  448,  364,    0,
      448,  448,  262,  448,  448,  448,  448,  296,    0,  448,

      448,  448,  448,  448,  448,    0,  448,  448,  448,  448,
      293,  448,    0,  448,  298,  448,  244,  289,    0,  292,
      448,    0,  215,    0,    0,  384,    0
    } ;

static const YY_CHAR yy_ec[256] =
    {   0,
        1,    1,    1,    1,    1,    1,    1,    1,    2,    3,
        1,    1,    2,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    4,    5,    6,    7,    8,    9,   10,   11,   12,
       13,   14,   15,   16,   17,   18,   19,   20,   21,   22,
       23,   23,   23,   23,   23,   24,   24,   25,   26,   27,
       28,   29,   30,   31,   32,   33,   34,   35,   36,   37,
       38,   39,   40,   41,   42,   43,   44,   45,   46,   47,
       41,   48,   49,   50,   51,   52,   53,   54,   41,   41,
       55,   56,   57,   58,   59,   60,   61,   62,   63,   64,

       65,   66,   67,   68,   69,   41,   70,   71,   72,   73,
       74,   75,   76,   77,   78,   79,   80,   81,   82,   83,
       84,   41,   85,   86,   87,   88,    1,   89,   90,   91,
       92,   93,   94,   95,   41,   96,   97,   98,   41,   41,
       41,   41,   99,  100,   41,  101,   41,  102,   41,  103,
      104,   41,   41,  105,   41,   41,  106,  107,   41,  108,
      109,  110,   41,  111,  112,  113,  114,  115,  116,  117,
      118,   41,   41,   41,  119,  120,  121,  122,  123,  124,
      125,  126,  127,  128,  129,  130,  131,   41,   41,   41,
      132,   41,   41,  133,  134,   41,   41,   41,   41,   41,

       41,   41,   41,   41,   41,  135,  136,   41,   41,   41,
       41,   41,   41,   41,   41,   41,   41,   41,   41,   41,
       41,   41,   41,   41,   41,  137,   41,   41,   41,   41,
       41,   41,   41,   41,   41,   41,   41,  138,  139,  140,
       41,   41,   41,   41,   41,   41,   41,   41,   41,   41,
       41,   41,   41,   41,    1
    } ;

static const YY_CHAR yy_meta[141] =
    {   0,
        1,    1,    2,    1,    1,    3,    1,    4,    4,    1,
        1,    1,    1,    5,    1,    1,    1,    1,    4,    6,
        6,    6,    6,    6,    1,    1,    1,    4,    1,    6,
        1,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    4,    3,    4,    1,    7,    8,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    4,    1,    4,    6,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,

        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
        7,    7,    7,    7,    7,    7,    7,    1,    7,    7
    } ;

static const flex_int16_t yy_base[1445] =
    {   0,
        0,    0,  138,  139,  140,  141,  142,  143,  144,  147,
     2092, 2093,  154, 2093,  146, 2093,  155, 2093,  175,  187,
      258, 2093, 2093,  143,  145,  143,  195,  276,  227,  285,
      331,  292, 2093,  134,  199,  137, 2093,  302,  122, 2043,
      296,  211,  148,  139, 2016,  328,  145,    0, 2049,  106,
     2042, 2039,  305,  304,  153,  168, 2054,  167, 2039, 2093,
     2093,  211,  320, 2093,  331,  181,  169,  196,  339,  308,
      197, 2023,  291, 2018,  112,  210,  355,  207,  362,  363,
      380,  385,  270,  318, 2014, 2007, 2061,  362, 2093, 2093,
        0,  347,  146,  338, 1990,  381, 1989, 1988, 1970,    0,

     2093,  407, 2072, 2093, 2093,    0, 2093, 2068,  465,    0,
     2093, 2093,  448, 2055, 2067, 2093, 2056, 2053,  485,  534,
      552,  601,  460,  619, 2093,  524, 2041, 2093,    0, 2093,
     2093,  289,    0,    0, 1999, 2093, 2093, 2093, 2093, 2093,
     2093, 1995, 1987, 1986, 2036, 2052,  377, 2052, 2050, 2049,
     2048, 2040, 2046, 2028,  462,  416,  447,  281, 2044,  374,
      390,  398, 1980,  426, 1988, 1968, 1978, 1976, 1963, 2020,
     2093, 2093, 2093, 2093, 2093, 2093, 2030, 2093, 2093, 2093,
     2093, 2093, 2093,  492, 2093,  666, 2093, 2018, 2093, 2042,
     2093, 2093,  671,  688,  458,  478,  355,  540,  693, 1924,

     2024, 2093, 2093, 2093, 1962, 1964, 1960, 2011, 2093, 2093,
     2093, 1967, 2093, 2009, 2093, 2093, 2008,  570, 2093,    0,
     2000, 1956, 1997, 1983, 1986, 1959, 1966,  380, 1990,    0,
      463, 1953, 1978, 1956, 1976, 1946, 1943,  334, 1947, 1951,
     1945, 1957, 1967,    0, 1973, 1944, 1940, 1963,    0, 1969,
     1963, 1930,    0, 1934,  263,  436, 1926, 1969, 1956, 1922,
     1925, 1955, 1962, 1932, 1952, 2093, 2093, 2093,  438, 1930,
     1922,  462,  466, 1932,  460, 1922, 1918,  506, 1933,  448,
     1920, 1918, 1920, 1923, 1914, 1925, 1909,    0, 1919, 1922,
     1910,  181, 1906, 1905, 1909,    0, 1916, 1901, 1898,  542,

     1898, 1905, 1900, 1905, 1893,  530, 1910, 1897, 1899, 2093,
      503,  565, 1904,  532, 1901, 1888, 1893, 1901, 1897,  322,
     1892,    0,  547, 1888,    0,  594, 1882,  576, 1886, 1882,
     1885,  571, 1895, 1882, 1882, 1882, 1884,  551, 1879, 1874,
     1885, 1887, 1875, 1870, 1877, 1870,  659, 1879, 1880, 1865,
     1872, 1863, 2093, 2093, 2093,    0, 1935,    0,    0, 1805,
        0,    0,    0,    0,    0,  617, 1818, 1835,  661,  549,
      544,  546, 1842,  433, 1834,    0,  564,  659, 2093, 1930,
     2093,    0, 2093, 2093,  760,  765, 2093, 2093, 2093, 2093,
     2093,    0, 2093, 2093, 1917, 1914,  770, 2093, 2093,  790,

      677,  839,  760, 2093, 2093, 2093, 2093, 2093, 2093, 2093,
        0, 2093, 2093,    0, 1855, 1903, 1902, 1916, 2093, 2093,
     1915, 1914, 2093, 2093, 2093, 1913, 2093, 1912, 2093, 1911,
     1910, 2093, 1909, 2093, 1908, 2093, 1907, 2093, 1853, 1849,
      668, 1836, 1841, 1849, 1833, 1900, 1899, 1830, 1836, 1838,
     1829, 1894, 2093, 2093, 2093, 2093,  667,  862, 2093, 1901,
     2093,  886,  668,  897,  908,  775,  819,  872,  650,  844,
      932,  914, 1900, 1829, 1834, 1827, 2093, 1820, 2093, 2093,
        0,    0, 1866, 1861, 1846,    0, 1824, 1843, 1843, 1852,
     1820, 1821, 1814, 1813, 1841, 1807,    0,    0, 1811, 1834,

     1816, 1810, 1814, 1803, 1806, 1842, 1834,    0, 1801,    0,
     1835, 1836, 1795, 1792, 1835, 1819, 1789, 1788,    0, 1823,
     1807, 1786, 1793, 1814, 1819, 1790,    0, 1796, 1781, 1777,
     1777, 1782, 1790, 2093, 1775,  656, 1780, 1788, 1780, 1771,
     2093, 1769, 1766, 1774, 1770, 1783,  696, 1767, 1784, 1771,
     1764,  685, 1760, 1767, 1768, 1774, 1761, 1696, 1753, 1764,
     1763, 1827, 1761, 1768, 1750, 1753, 1767, 1760,  661, 1746,
     1754, 1758,    0,  769, 1741, 1754, 1756, 1753, 1740, 1747,
     1750, 1739,    0, 1748, 1733, 1737, 1733, 1729,    0,    0,
     1736, 1803, 1747, 1728, 1735, 1738, 1723, 1723, 1745, 1726,

     1714,    0, 1735, 1729, 1731, 1723, 1728,  817, 1731, 1712,
     1731, 1724, 1723, 1732, 1731, 1646, 1719, 1708, 1704, 1642,
     1715, 1714, 1707, 1699, 1711, 1706, 1697, 1694, 1705, 1700,
        0, 1633, 1656,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0, 2093,    0,    0, 1658,  919,  925, 1752, 1751,
     1748, 1747,  737, 2093, 2093, 2093, 2093, 2093, 2093, 1737,
     1734, 1733, 2093, 2093, 2093, 2093, 2093, 2093, 2093, 2093,
     2093, 2093, 1749, 1681, 2093, 1693, 1692, 1676, 1744, 1743,

     2093, 2093, 1673, 1680, 1677, 1739, 2093,  955,  937,  960,
      984,  735,  994, 1004,  965, 1011, 1021, 1026, 1031, 1041,
     1050, 1746, 2093, 1685, 1675, 1683, 1719, 1702,    0,    0,
     1678, 1704, 1709, 1690, 1665, 1659,    0, 1702, 1688,    0,
        0,    0, 1664, 1659, 1664, 1660, 1664,    0,    0,    0,
     1681, 1693, 1663, 1652, 1694, 1677, 1659, 1646, 1690, 1681,
        0, 1655,    0, 1683, 1653, 2093, 1648, 1647, 1654, 1641,
     1635, 1647, 1635, 1632, 1629, 2093, 1629, 2093, 1629, 1641,
     1638, 1637, 1624, 1626, 1627, 2093, 1621, 1634, 1624, 1623,
     1627, 1634, 1622, 1628, 1616,    0, 1620, 1601, 1624, 1607,

     1614, 1011, 1615, 1614, 1619, 1606,  744, 1605, 1608, 1603,
     1600, 1607, 1612, 1603, 1610, 1599, 1602, 1593,    0, 1606,
     1597, 1592, 1609, 1612, 1611, 1610, 1595, 1585, 1601, 1592,
     1586, 1598, 1584, 1591, 1590, 1596, 2093, 1575,  753, 1592,
     1587, 1003, 1573,  598, 1570, 1572, 1593,    0, 1581,    0,
     1573, 2093, 2093, 1556, 1583, 1584, 1568, 1552, 1579, 1562,
     1573, 1559, 1570, 1568, 1575, 1559, 1552, 1566, 1534, 1496,
        0, 1067,  813,  812, 2093, 2093, 1618, 2093, 2093, 2093,
     1616, 1615, 1548, 1546, 2093, 2093, 1546, 1557, 1537, 2093,
     1072, 1077, 1087, 1097, 1102, 1107, 1117, 1122, 1127, 1137,

     1513, 2093, 2093, 2093, 2093,    0,    0,    0, 1539, 1518,
     1499, 1483, 1476,    0, 1480, 1471, 1458, 1475, 1421, 1450,
        0,    0,    0, 1449, 1453, 1419, 1423, 1452, 1449,    0,
        0,    0, 1426, 1428, 1420, 1427, 1410, 1411, 1407, 2093,
     1408, 2093, 2093, 1408,  104,  140,  227,  257,  359,  377,
      437,  443,  467,  533,  556,  584,  632,  639,  675,  673,
      746,  765,  757,  772,  782,  772,  783,    0,    0,    0,
      799,  798,  790,  819,  816,  802,  811,  819,  822,  832,
      850,  860,  855,  852,  889,  894,  890,  913, 2093, 2093,
     2093,  907,  933,  929,  929,  930,  931,  939,    0,  933,

      953,  968,  974,  973,  980,    0,  983,  995, 1001,  988,
     1003, 1000, 1005, 2093,  999, 1003,  989, 1020, 1016, 1028,
     1011, 1042,    0, 1058, 1046,    0, 1043, 1061, 1059, 1082,
        0, 1048, 1071, 1141, 1148, 1105, 2093, 2093, 1089, 1157,
     1096, 1091, 1160, 1152, 1157, 1168, 1060, 1144,    0,    0,
        0, 1104,    0, 1128, 1116, 1116, 1135,    0,    0,    0,
     1118,    0, 1158,    0, 1126, 1135, 2093, 1140, 2093, 1124,
     1142, 2093, 2093, 2093, 1131, 1144, 1145, 2093, 1138, 1131,
     1150, 1142, 1143, 1144, 1158, 1135, 1141, 1133,    0, 2093,
        0, 1152, 2093, 2093, 1144, 1146, 1139, 1156, 1151, 1156,

        0,    0, 1155, 1160, 1171, 1172, 1149, 2093, 1156, 1153,
     1153, 1153, 1172, 1163, 1180, 1167, 1171, 2093,    0, 1164,
        0, 1166, 1167, 2093, 2093, 1164, 1177, 1166, 1179, 1166,
        0, 1169, 1174,    0, 1175, 1180,    0, 1172, 1178,    0,
        0, 1174, 2093, 1186, 1189, 1180, 1201, 1192, 2093,    0,
        0, 1186, 1194, 2093, 1249, 1184, 2093, 1242, 1218, 1195,
     1186,    0,    0, 1203,    0, 1222, 2093, 2093, 1193, 1208,
     1203, 2093, 1212, 1205, 1210, 1217, 1207,    0,    0,    0,
     2093, 1215, 1202, 1223, 1224, 1221,    0, 1216, 1205, 1208,
     1227, 1227,    0, 2093, 2093, 1235, 1226, 1214, 1224, 1210,

     1224, 1229, 2093, 1224,    0, 1221, 1236, 1234, 1236, 1227,
     1231, 1240, 1250,    0, 1241, 1244, 1242, 1241, 1244,    0,
     1238, 1248, 1248, 2093,    0, 1239, 1252, 2093, 1247, 1299,
     1268,    0,    0, 1259, 1275, 2093, 1263, 2093, 1248, 2093,
     1269, 1265, 1256, 1272, 1267, 1261, 1270, 2093, 1257, 1271,
     1268, 1266,    0, 2093, 1284,    0, 1267,    0,    0, 1276,
     1277,    0, 1322,    0, 1290, 1268,    0,    0, 2093,    0,
     1292, 1279, 1284, 1276,    0, 1292, 1275, 1327, 1275, 1292,
     1336, 1272,    0,    0,    0, 1283, 2093, 1285, 1295, 1301,
     1302,    0, 1293, 1307, 1304, 1305, 1312, 1297, 1301, 2093,

     1307, 1292,    0, 1312, 2093, 1308, 2093, 1315, 1314, 1309,
     1312, 1321, 2093, 1372, 1325, 1365, 1267, 2093, 1317, 1331,
     1328, 1329, 1331, 1319,    0, 1338, 1323, 1328, 1339, 1342,
     1323,    0, 1332, 1345, 1326, 1341, 1334, 1329, 2093, 1345,
     1321, 1391, 1345, 1344,    0,    0, 1353, 1350, 1345, 1341,
     1353,    0, 1348,    0, 1350, 1359, 1371, 1346, 1362, 1355,
     1361, 1308, 1417, 1352,    0,    0, 1372, 1373, 1366, 1377,
     1369, 1371, 1371, 2093, 1381,    0, 1370, 1382, 2093, 1370,
     1388, 1374, 1374, 1394, 1372,    0, 1378, 1385,    0, 1391,
     1389, 1388,    0, 1382, 1386, 1397, 1391,    0, 1399, 1391,

     1401, 1406, 1407, 1392, 1409, 1394, 1399, 1395, 1401, 1398,
        0, 1397, 1412, 1400,    0, 1416,    0,    0, 1407,    0,
     1416, 1419,    0, 1418, 1473, 2093, 2093, 1502, 1510, 1518,
     1526, 1531, 1533, 1540, 1548, 1556, 1564, 1572, 1580, 1582,
     1589, 1597, 1605, 1613
    } ;

static const flex_int16_t yy_def[1445] =
    {   0,
     1427,    1, 1428, 1428, 1429, 1429, 1430, 1430, 1431, 1431,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1432, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,
     1427, 1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433, 1434,

     1427, 1435, 1436, 1427, 1427, 1437, 1427, 1427, 1438, 1439,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1440, 1427,
     1427, 1427, 1440, 1440, 1440, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1441,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1433, 1433, 1434, 1435, 1435, 1427, 1436,
     1427, 1437, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1439, 1427, 1427, 1442, 1443, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1440, 1427, 1427, 1440, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1441,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1444, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1433, 1433, 1433, 1427, 1427, 1442, 1442,
     1443, 1443, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1444, 1427, 1427, 1427, 1427, 1427, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,

     1433, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433,
     1433, 1427, 1442, 1443, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1427, 1427, 1427, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427,
     1427, 1433, 1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1427, 1433, 1442, 1443, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,
     1433, 1433, 1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433,
     1433, 1433, 1433, 1427, 1427, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433, 1427, 1433,
     1433, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433,
     1427, 1433, 1433, 1433, 1433, 1427, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1427, 1427, 1433, 1433, 1433, 1433, 1433,

     1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1427, 1433, 1427, 1427, 1427, 1427, 1427,
     1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427, 1427, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433,
     1433, 1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427, 1427,
     1427, 1427, 1433, 1433, 1433, 1427, 1427, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,

     1433, 1433, 1433, 1433, 1427, 1433, 1427, 1433, 1433, 1433,
     1433, 1433, 1427, 1427, 1427, 1427, 1427, 1427, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1427,
     1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1427, 1427, 1427, 1433, 1433, 1433, 1433, 1433, 1433, 1433,
     1433, 1433, 1433, 1427, 1433, 1433, 1433, 1427, 1427, 1433,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427,
     1433, 1433, 1433, 1433, 1433, 1433, 1433, 1433, 1427, 1433,

     1433, 1433, 1433, 1433, 1433, 1427, 1433, 1433, 1433, 1433,
     1433, 1433, 1427, 1433, 1433, 1433, 1433, 1433, 1427, 1433,
     1433, 1427, 1433, 1427, 1427, 1427,    0, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427
    } ;

static const flex_int16_t yy_nxt[2234] =
    {   0,
       12,   13,   14,   13,   15,   16,   17,   18,   19,   20,
       21,   22,   23,   24,   25,   26,   27,   28,   29,   30,
       31,   31,   31,   31,   32,   33,   34,   35,   36,   37,
       38,   39,   40,   41,   42,   43,   44,   45,   46,   47,
       48,   49,   50,   48,   51,   52,   53,   54,   55,   56,
       48,   57,   58,   59,   60,   13,   61,   62,   63,   64,
       65,   66,   67,   68,   69,   70,   71,   72,   73,   74,
       75,   76,   77,   78,   79,   48,   80,   81,   82,   83,
       84,   85,   86,   48,   87,   88,   89,   90,   48,   48,
       48,   48,   48,   48,   48,   48,   48,   48,   48,   48,

       48,   48,   48,   48,   48,   48,   48,   48,   91,   48,
       48,   48,   48,   48,   48,   48,   48,   48,   48,   48,
       48,   48,   48,   48,   48,   48,   48,   48,   48,   48,
       48,   48,   92,   93,   94,   95,   96,   97,   98,   99,
      101,  101,  104,  104,  107,  107,  111,  108,  108,  111,
      114,  102,  102,  105,  105,  113,  170,  113,  174,  172,
      208,  209,  210,  115,  216,  217,  221,  246, 1074,  117,
      171,  118,  173,  116,  119,  119,  120,  120,  121,  247,
      314,  243,  125,  126,  235,  315,  121,  121,  121,  121,
      121,  121,  258,  127,  222,  233,  138,  109,  109,  175,

      139,  259,  128,  112, 1075,  263,  112,  211,  212,  113,
      244,  176,  236,  177,  140,  121,  122,  121,  121,  121,
      121,  178,  179,  180,  266,  213,  214,  215,  123,  130,
      234,  131,  260,  132,  264,  188,  261,  124,  267,  133,
      189,  290,  292,  134,  141,  190,  228,  142,  293,  135,
      229,  291,  557,  143,  191,  360,  230,  144,  558,  136,
      294,  137,  145,  307,  295,  146,  147,  148,  268,  296,
      316,  149,  150,  308,  151,  152,  153,  361,  317,  231,
      322,  323,  154,  318,  155,  156,  157,  232,  158,  181,
      182,  436,  183,  184,  185,  186,  186,  186,  186,  186,

      412,  413,  193, 1076,  194,  194,  194,  194,  194,  515,
      201,  437,  516,  192,  195,  159,  202,  203,  160,  204,
      196,  218,  218,  218,  218,  218,  161,  224,  205,  162,
      163,  164,  219,  187,  165,  166, 1077,  167,  206,  255,
      168,  225,  347,  169,  250,  310,  197,  348,  193,  196,
      194,  194,  194,  194,  194,  251,  311,  207,  198,  238,
      195,  239,  240,  312,  241,  252,  196,  199,  256,  226,
      242,  304,  305,  253,  469,  469,  500,  257,  254,  227,
      269,  306,  349,  270,  271,  272,  350,  420,  273,  354,
      274,  275,  276,  277,  278,  196,  279,  280,  591,  281,

      592,  283,  282,  284,  421,  285,  501,  286,  287,  288,
      289,  297,  488,  298,  299,  300,  301,  200,  302,  319,
      378,  303,  489,  331,  324,  379,  432,  332,  320,  333,
      325, 1078,  326,  321,  327,  328,  334,  335,  329,  362,
      336,  330,  337,  433,  338,  343,  439,  355,  339,  113,
      440,  113,  344, 1079,  340,  441,  363,  434,  341,  342,
      356,  345,  442,  200,  346,  364,  443,  357,  358,  359,
      366,  444,  429,  367,  435,  368,  369,  370,  371,  401,
      401,  401,  401,  372,  385,  385,  385,  385,  386,  430,
      431,  446,  466,  465,  466, 1080,  455,  467,  467,  467,

      467,  467,  447,  113,  119,  119,  120,  120,  121,  456,
      528,  517,  545,  468,  518,  529,  121,  121,  121,  121,
      121,  121,  465,  491,  532, 1081,  387,  546,  537,  492,
      388,  534,  403,  538,  533,  404,  405,  389,  535,  539,
      493,  390,  468,  391, 1082,  121,  397,  121,  121,  121,
      121,  664,  398,  120,  120,  120,  120,  121,  399,  470,
      470,  470,  470,  577,  665,  121,  121,  121,  121,  121,
      121,  121,  121,  121,  121,  121,  542, 1427,  406,  543,
      407,  578, 1427,  121,  121,  121,  121,  121,  121,  218,
      218,  218,  218,  218,  121,  121,  121,  121,  121,  121,

      572,  398,  565,  583,  584, 1083,  573,  399,  408,  585,
      409,  594,  121,  121,  121,  121,  121,  121,  566,  398,
      400,  400,  121,  121,  121,  595,  614,  579, 1084,  615,
      580,  606,  121,  121,  121,  121,  121,  121,  402,  402,
      402,  402,  402,  581,  600,  607,  601,  659, 1085,  608,
      402,  402,  402,  402,  402,  402,  656,  602, 1010,  657,
      658,  121,  121,  121,  121,  121,  121,  597,  398,  469,
      469,  661,  378,  598,  660,  662, 1011,  379,  695,  402,
      402,  402,  402,  402,  402,  186,  186,  186,  186,  186,
      462,  462,  462,  462,  462,  457,  401,  401,  401,  401,

      463,  458,  708,  714, 1086,  193,  464,  194,  194,  194,
      194,  194,  471,  471,  471,  471,  471,  195, 1087,  624,
      773,  809,  625,  196,  471,  471,  471,  471,  471,  471,
      458,  708,  714,  774,  810,  464,  626,  634,  635, 1088,
      636,  637,  638,  639,  640,  641,  696,  790,  875,  876,
      644,  645,  196,  471,  471,  471,  471,  471,  471,  646,
      784,  647,  791,  792,  785,  648, 1089,  649,  673,  650,
      894,  674,  675, 1003,  651,  652,  653,  654,  655,  667,
      667,  667,  667,  668,  668,  668,  668,  668,  668,  121,
      121,  121,  121,  121,  467,  467,  467,  467,  467,  894,

     1090,  121,  121,  121,  121,  121,  121,  971,  972,  400,
      400,  121,  121,  121,  676,  973,  677, 1004, 1035, 1034,
      200,  121,  121,  121,  121,  121,  121,  873,  874, 1091,
      121,  121,  121,  121,  121,  121, 1092,  398,  467,  467,
      467,  467,  467,  814,  678, 1093,  679, 1094, 1095,  815,
      121,  121,  121,  121,  121,  121, 1096,  398,  402,  402,
      402,  402,  402,  470,  470,  470,  470, 1097, 1098, 1099,
      402,  402,  402,  402,  402,  402,  709, 1100,  709, 1101,
     1102,  710,  710,  710,  710,  710,  466, 1103,  466, 1104,
      845,  467,  467,  467,  467,  467,  846,  711, 1105,  402,

      402,  402,  402,  402,  402,  462,  462,  462,  462,  462,
     1106,  715, 1107,  715, 1108,  712,  716,  716,  716,  716,
      716,  713,  718, 1109,  718, 1110,  711,  719,  719,  719,
      719,  719,  717,  721,  721,  721,  721,  721,  872,  872,
      872,  872,  668,  720,  668,  668,  668,  668,  668, 1111,
      713,  471,  471,  471,  471,  471,  710,  710,  710,  710,
      710,  717, 1112,  471,  471,  471,  471,  471,  471,  891,
     1113,  891,  720, 1114,  892,  892,  892,  892,  892,  710,
      710,  710,  710,  710,  716,  716,  716,  716,  716, 1115,
      893, 1116,  471,  471,  471,  471,  471,  471,  709, 1117,

      709, 1118, 1119,  710,  710,  710,  710,  710,  895, 1120,
      895, 1121, 1122,  896,  896,  896,  896,  896,  898,  893,
      898, 1123, 1124,  899,  899,  899,  899,  899, 1125,  897,
      716,  716,  716,  716,  716,  715, 1126,  715, 1127,  900,
      716,  716,  716,  716,  716,  719,  719,  719,  719,  719,
      719,  719,  719,  719,  719,  718, 1128,  718,  897, 1129,
      719,  719,  719,  719,  719, 1130, 1131, 1132,  900,  721,
      721,  721,  721,  721,  964, 1007, 1133, 1134, 1135,  965,
     1008, 1136, 1137, 1138, 1139,  966,  668,  668,  668,  668,
      668,  892,  892,  892,  892,  892,  892,  892,  892,  892,

      892,  891, 1140,  891, 1141, 1142,  892,  892,  892,  892,
      892, 1044, 1143, 1044, 1144, 1145, 1045, 1045, 1045, 1045,
     1045,  896,  896,  896,  896,  896,  896,  896,  896,  896,
      896,  895, 1046,  895, 1146, 1147,  896,  896,  896,  896,
      896,  899,  899,  899,  899,  899,  899,  899,  899,  899,
      899,  898, 1148,  898, 1149,  670,  899,  899,  899,  899,
      899, 1046, 1150, 1151,  672, 1152, 1153, 1154, 1155, 1156,
     1157, 1045, 1045, 1045, 1045, 1045, 1045, 1045, 1045, 1045,
     1045, 1158, 1044, 1159, 1044, 1160,  901, 1045, 1045, 1045,
     1045, 1045, 1161, 1162, 1163, 1164, 1165, 1166, 1167, 1168,

     1169, 1170, 1171, 1172, 1173, 1174, 1175, 1176, 1177, 1178,
     1179, 1180, 1181, 1182, 1183, 1184, 1185, 1186, 1187, 1188,
     1189, 1190, 1191, 1192, 1193, 1194, 1195, 1196, 1197, 1198,
     1199, 1200, 1201, 1202, 1203, 1204, 1205, 1206, 1207, 1208,
     1209, 1210, 1211, 1212, 1213, 1214, 1215, 1216, 1217, 1218,
     1219, 1220, 1221, 1222, 1223, 1224, 1225, 1226, 1227, 1228,
     1229, 1230, 1230, 1230, 1230, 1230, 1231, 1232, 1233, 1234,
     1235, 1236, 1237, 1238, 1239, 1240, 1241, 1242, 1243, 1244,
     1245, 1246, 1247, 1248, 1249, 1250, 1251, 1252, 1253, 1254,
     1255, 1256, 1257, 1258, 1259, 1260, 1261, 1262, 1263, 1264,

     1265, 1266, 1267, 1268, 1269, 1270, 1271, 1272, 1273, 1274,
     1275, 1276, 1277, 1278, 1279, 1280, 1281, 1283, 1230, 1230,
     1230, 1230, 1230, 1284, 1285, 1286, 1287, 1288, 1289, 1290,
     1291, 1292, 1293, 1295, 1296, 1297, 1298, 1299, 1300, 1301,
     1302, 1294, 1303, 1304, 1305, 1306, 1307, 1308, 1309, 1310,
     1311, 1312, 1313, 1314, 1315, 1316, 1316, 1316, 1316, 1316,
     1317, 1318, 1319, 1320, 1321, 1322, 1323, 1324, 1325, 1326,
     1327, 1328, 1329, 1330, 1331, 1332, 1333, 1334, 1335, 1336,
     1337, 1338, 1339, 1340, 1316, 1316, 1316, 1316, 1316, 1342,
     1343, 1344, 1345, 1346, 1347, 1348, 1349, 1350, 1351, 1352,

     1353, 1354, 1355, 1356, 1357, 1358, 1359, 1360, 1361, 1362,
     1363, 1363, 1363, 1363, 1363, 1364, 1365, 1366, 1367, 1368,
     1369, 1370, 1371, 1372, 1373, 1374, 1375, 1376, 1377, 1378,
     1379, 1380, 1381, 1382, 1383, 1282, 1363, 1363, 1363, 1363,
     1363, 1384, 1385, 1386, 1387, 1388, 1389, 1390, 1391, 1392,
     1393, 1394, 1395, 1396, 1397, 1398, 1399, 1400, 1401, 1402,
     1403, 1404, 1405, 1406, 1407, 1408, 1409, 1410, 1411, 1412,
     1413, 1414, 1415, 1416, 1417, 1418, 1419, 1420, 1421, 1422,
     1423, 1424, 1425, 1426, 1073, 1072, 1071, 1070, 1069, 1068,
     1067, 1066, 1065, 1064, 1063, 1062, 1061, 1060, 1059, 1058,

     1057, 1341,  100,  100,  100,  100,  100,  100,  100,  100,
      103,  103,  103,  103,  103,  103,  103,  103,  106,  106,
      106,  106,  106,  106,  106,  106,  110,  110,  110,  110,
      110,  110,  110,  110,  129, 1056, 1055,  129,  220,  220,
      376, 1054,  376,  376, 1053,  376,  376,  376,  377, 1052,
      377,  377,  377,  377,  377,  377,  380,  380,  380,  380,
     1051,  380,  380,  380,  382, 1050, 1049,  382,  382,  382,
      382,  382,  384,  384,  384,  384,  384,  384,  384,  384,
      392, 1048,  392,  392,  392,  392,  392,  411,  411,  460,
      460,  460,  460,  460,  460,  460,  460,  669,  669,  669,

      669, 1047,  669,  669,  669,  671,  671,  671,  671, 1043,
      671,  671,  671,  722,  722,  722,  722,  722,  722,  722,
      722, 1042, 1041, 1040, 1039, 1038, 1037, 1036, 1033, 1032,
     1031, 1030, 1029, 1028, 1027, 1026, 1025, 1024, 1023, 1022,
     1021, 1020, 1019, 1018, 1017, 1016, 1015, 1014, 1013, 1012,
     1009, 1006, 1005, 1002, 1001, 1000,  999,  998,  997,  996,
      995,  994,  993,  992,  991,  990,  989,  988,  987,  986,
      985,  984,  983,  982,  981,  980,  979,  978,  977,  976,
      975,  974,  970,  969,  968,  967,  963,  962,  961,  960,
      959,  958,  957,  956,  955,  954,  953,  952,  951,  950,

      949,  948,  947,  946,  945,  944,  943,  942,  941,  940,
      939,  938,  937,  936,  935,  934,  933,  932,  931,  930,
      929,  928,  927,  926,  925,  924,  923,  922,  921,  920,
      919,  918,  917,  916,  915,  914,  913,  912,  911,  910,
      909,  908,  907,  906,  905,  904,  903,  902,  723,  890,
      889,  888,  887,  886,  885,  884,  883,  882,  881,  880,
      879,  878,  877,  874,  672,  873,  670,  871,  870,  869,
      868,  867,  866,  865,  864,  863,  862,  861,  860,  859,
      858,  857,  856,  855,  854,  853,  852,  851,  850,  849,
      848,  847,  844,  843,  842,  841,  840,  839,  838,  837,

      836,  835,  834,  833,  832,  831,  830,  829,  828,  827,
      826,  825,  824,  823,  822,  821,  820,  819,  818,  817,
      816,  813,  812,  811,  808,  807,  806,  805,  804,  803,
      802,  801,  800,  799,  798,  797,  796,  795,  794,  793,
      789,  788,  787,  786,  783,  782,  781,  780,  779,  778,
      777,  776,  775,  772,  771,  770,  769,  768,  767,  766,
      765,  764,  763,  762,  761,  760,  759,  758,  757,  756,
      755,  754,  753,  752,  751,  750,  749,  748,  747,  746,
      745,  744,  743,  742,  741,  740,  739,  738,  737,  736,
      735,  734,  733,  732,  731,  730,  729,  728,  727,  726,

      725,  724,  723,  461,  707,  706,  705,  704,  703,  702,
      701,  700,  699,  698,  697,  694,  693,  692,  691,  690,
      689,  688,  687,  686,  685,  684,  683,  682,  681,  680,
      672,  670,  381,  666,  663,  643,  642,  633,  632,  631,
      630,  629,  628,  627,  623,  622,  621,  620,  619,  618,
      617,  616,  613,  612,  611,  610,  609,  605,  604,  603,
      599,  596,  593,  590,  589,  588,  587,  586,  582,  576,
      575,  574,  571,  570,  569,  568,  567,  564,  563,  562,
      561,  560,  559,  556,  555,  554,  553,  552,  551,  550,
      549,  548,  547,  544,  541,  540,  536,  531,  530,  527,

      526,  525,  524,  523,  522,  521,  520,  519,  514,  513,
      512,  511,  510,  509,  508,  507,  506,  505,  504,  503,
      502,  499,  498,  497,  496,  495,  494,  490,  487,  486,
      485,  484,  483,  482,  481,  480,  479,  478,  477,  476,
      475,  474,  473,  472,  461,  459,  454,  453,  452,  451,
      450,  449,  448,  445,  438,  428,  427,  426,  425,  424,
      423,  422,  419,  418,  417,  416,  415,  414,  410,  396,
      395,  394,  393,  383,  381,  375,  374,  373,  365,  353,
      352,  351,  313,  309,  265,  262,  249,  248,  245,  237,
      223, 1427,   11, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427
    } ;

static const flex_int16_t yy_chk[2234] =
    {   0,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,

        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        3,    4,    5,    6,    7,    8,    9,    7,    8,   10,
       15,    3,    4,    5,    6,   13,   24,   13,   26,   25,
       34,   34,   34,   15,   36,   36,   39,   50,  945,   17,
       24,   17,   25,   15,   17,   17,   17,   17,   17,   50,
       75,   47,   19,   19,   44,   75,   17,   17,   17,   17,
       17,   17,   55,   19,   39,   43,   20,    7,    8,   26,

       20,   55,   19,    9,  946,   58,   10,   35,   35,   13,
       47,   27,   44,   27,   20,   17,   17,   17,   17,   17,
       17,   27,   27,   27,   62,   35,   35,   35,   17,   19,
       43,   19,   56,   19,   58,   29,   56,   17,   62,   19,
       29,   66,   67,   19,   20,   29,   42,   20,   67,   19,
       42,   66,  292,   20,   29,   93,   42,   20,  292,   19,
       68,   19,   21,   71,   68,   21,   21,   21,   62,   68,
       76,   21,   21,   71,   21,   21,   21,   93,   76,   42,
       78,   78,   21,   76,   21,   21,   21,   42,   21,   28,
       28,  158,   28,   28,   28,   28,   28,   28,   28,   28,

      132,  132,   30,  947,   30,   30,   30,   30,   30,  255,
       32,  158,  255,   29,   30,   21,   32,   32,   21,   32,
       30,   38,   38,   38,   38,   38,   21,   41,   32,   21,
       21,   21,   38,   28,   21,   21,  948,   21,   32,   54,
       21,   41,   83,   21,   53,   73,   30,   83,   31,   30,
       31,   31,   31,   31,   31,   53,   73,   32,   30,   46,
       31,   46,   46,   73,   46,   53,   31,   30,   54,   41,
       46,   70,   70,   53,  197,  197,  238,   54,   53,   41,
       63,   70,   84,   63,   63,   63,   84,  147,   63,   88,
       63,   63,   63,   63,   63,   31,   63,   63,  320,   63,

      320,   65,   63,   65,  147,   65,  238,   65,   65,   65,
       65,   69,  228,   69,   69,   69,   69,   30,   69,   77,
      102,   69,  228,   80,   79,  102,  156,   80,   77,   80,
       79,  949,   79,   77,   79,   79,   80,   80,   79,   94,
       81,   79,   81,  156,   81,   82,  160,   88,   81,  113,
      160,  113,   82,  950,   81,  161,   94,  157,   81,   81,
       92,   82,  161,   31,   82,   94,  162,   92,   92,   92,
       96,  162,  155,   96,  157,   96,   96,   96,   96,  123,
      123,  123,  123,   96,  109,  109,  109,  109,  109,  155,
      155,  164,  196,  195,  196,  951,  184,  196,  196,  196,

      196,  196,  164,  113,  119,  119,  119,  119,  119,  184,
      269,  256,  280,  196,  256,  269,  119,  119,  119,  119,
      119,  119,  195,  231,  272,  952,  109,  280,  275,  231,
      109,  273,  126,  275,  272,  126,  126,  109,  273,  275,
      231,  109,  196,  109,  953,  119,  119,  119,  119,  119,
      119,  374,  119,  120,  120,  120,  120,  120,  119,  198,
      198,  198,  198,  311,  374,  120,  120,  120,  120,  120,
      120,  121,  121,  121,  121,  121,  278,  377,  126,  278,
      126,  311,  377,  121,  121,  121,  121,  121,  121,  218,
      218,  218,  218,  218,  120,  120,  120,  120,  120,  120,

      306,  120,  300,  314,  314,  954,  306,  120,  126,  314,
      126,  323,  121,  121,  121,  121,  121,  121,  300,  121,
      122,  122,  122,  122,  122,  323,  338,  312,  955,  338,
      312,  332,  122,  122,  122,  122,  122,  122,  124,  124,
      124,  124,  124,  312,  328,  332,  328,  371,  956,  332,
      124,  124,  124,  124,  124,  124,  370,  328,  844,  370,
      370,  122,  122,  122,  122,  122,  122,  326,  122,  469,
      469,  372,  378,  326,  371,  372,  844,  378,  441,  124,
      124,  124,  124,  124,  124,  186,  186,  186,  186,  186,
      193,  193,  193,  193,  193,  186,  401,  401,  401,  401,

      193,  186,  457,  463,  957,  194,  193,  194,  194,  194,
      194,  194,  199,  199,  199,  199,  199,  194,  958,  347,
      536,  569,  347,  194,  199,  199,  199,  199,  199,  199,
      186,  457,  463,  536,  569,  193,  347,  366,  366,  959,
      366,  366,  366,  366,  366,  366,  441,  552,  673,  673,
      369,  369,  194,  199,  199,  199,  199,  199,  199,  369,
      547,  369,  552,  552,  547,  369,  960,  369,  403,  369,
      712,  403,  403,  839,  369,  369,  369,  369,  369,  385,
      385,  385,  385,  385,  386,  386,  386,  386,  386,  397,
      397,  397,  397,  397,  466,  466,  466,  466,  466,  712,

      961,  397,  397,  397,  397,  397,  397,  807,  807,  400,
      400,  400,  400,  400,  403,  807,  403,  839,  874,  873,
      194,  400,  400,  400,  400,  400,  400,  873,  874,  962,
      397,  397,  397,  397,  397,  397,  963,  397,  467,  467,
      467,  467,  467,  574,  403,  964,  403,  965,  966,  574,
      400,  400,  400,  400,  400,  400,  967,  400,  402,  402,
      402,  402,  402,  470,  470,  470,  470,  971,  972,  973,
      402,  402,  402,  402,  402,  402,  458,  974,  458,  975,
      976,  458,  458,  458,  458,  458,  468,  977,  468,  978,
      608,  468,  468,  468,  468,  468,  608,  458,  979,  402,

      402,  402,  402,  402,  402,  462,  462,  462,  462,  462,
      980,  464,  981,  464,  982,  462,  464,  464,  464,  464,
      464,  462,  465,  983,  465,  984,  458,  465,  465,  465,
      465,  465,  464,  472,  472,  472,  472,  472,  667,  667,
      667,  667,  667,  465,  668,  668,  668,  668,  668,  985,
      462,  471,  471,  471,  471,  471,  709,  709,  709,  709,
      709,  464,  986,  471,  471,  471,  471,  471,  471,  708,
      987,  708,  465,  988,  708,  708,  708,  708,  708,  710,
      710,  710,  710,  710,  715,  715,  715,  715,  715,  992,
      708,  993,  471,  471,  471,  471,  471,  471,  711,  994,

      711,  995,  996,  711,  711,  711,  711,  711,  713,  997,
      713,  998, 1000,  713,  713,  713,  713,  713,  714,  708,
      714, 1001, 1002,  714,  714,  714,  714,  714, 1003,  713,
      716,  716,  716,  716,  716,  717, 1004,  717, 1005,  714,
      717,  717,  717,  717,  717,  718,  718,  718,  718,  718,
      719,  719,  719,  719,  719,  720, 1007,  720,  713, 1008,
      720,  720,  720,  720,  720, 1009, 1010, 1011,  714,  721,
      721,  721,  721,  721,  802,  842, 1012, 1013, 1015,  802,
      842, 1016, 1017, 1018, 1019,  802,  872,  872,  872,  872,
      872,  891,  891,  891,  891,  891,  892,  892,  892,  892,

      892,  893, 1020,  893, 1021, 1022,  893,  893,  893,  893,
      893,  894, 1024,  894, 1025, 1027,  894,  894,  894,  894,
      894,  895,  895,  895,  895,  895,  896,  896,  896,  896,
      896,  897,  894,  897, 1028, 1029,  897,  897,  897,  897,
      897,  898,  898,  898,  898,  898,  899,  899,  899,  899,
      899,  900, 1030,  900, 1032, 1034,  900,  900,  900,  900,
      900,  894, 1033, 1033, 1035, 1036, 1039, 1040, 1041, 1042,
     1043, 1044, 1044, 1044, 1044, 1044, 1045, 1045, 1045, 1045,
     1045, 1047, 1046, 1048, 1046, 1052,  721, 1046, 1046, 1046,
     1046, 1046, 1054, 1055, 1056, 1057, 1061, 1063, 1065, 1066,

     1068, 1070, 1071, 1075, 1076, 1077, 1079, 1080, 1081, 1082,
     1083, 1084, 1085, 1086, 1087, 1088, 1092, 1095, 1096, 1097,
     1098, 1099, 1100, 1103, 1104, 1105, 1106, 1107, 1109, 1110,
     1111, 1112, 1113, 1114, 1115, 1116, 1117, 1120, 1122, 1123,
     1126, 1127, 1128, 1129, 1130, 1132, 1133, 1135, 1136, 1138,
     1139, 1142, 1144, 1145, 1146, 1147, 1148, 1152, 1153, 1155,
     1156, 1158, 1158, 1158, 1158, 1158, 1159, 1160, 1161, 1164,
     1166, 1169, 1170, 1171, 1173, 1174, 1175, 1176, 1177, 1182,
     1183, 1184, 1185, 1186, 1188, 1189, 1190, 1191, 1192, 1196,
     1197, 1198, 1199, 1200, 1201, 1202, 1204, 1206, 1207, 1208,

     1209, 1210, 1211, 1212, 1213, 1215, 1216, 1217, 1218, 1219,
     1221, 1222, 1223, 1226, 1227, 1229, 1230, 1231, 1230, 1230,
     1230, 1230, 1230, 1234, 1235, 1237, 1239, 1241, 1242, 1243,
     1244, 1245, 1246, 1247, 1249, 1250, 1251, 1252, 1255, 1257,
     1260, 1246, 1261, 1263, 1265, 1266, 1271, 1272, 1273, 1274,
     1276, 1277, 1278, 1279, 1280, 1281, 1281, 1281, 1281, 1281,
     1282, 1286, 1288, 1289, 1290, 1291, 1293, 1294, 1295, 1296,
     1297, 1298, 1299, 1301, 1302, 1304, 1306, 1308, 1309, 1310,
     1311, 1312, 1314, 1315, 1316, 1316, 1316, 1316, 1316, 1317,
     1319, 1320, 1321, 1322, 1323, 1324, 1326, 1327, 1328, 1329,

     1330, 1331, 1333, 1334, 1335, 1336, 1337, 1338, 1340, 1341,
     1342, 1342, 1342, 1342, 1342, 1343, 1344, 1347, 1348, 1349,
     1350, 1351, 1353, 1355, 1356, 1357, 1358, 1359, 1360, 1361,
     1362, 1364, 1367, 1368, 1369, 1230, 1363, 1363, 1363, 1363,
     1363, 1370, 1371, 1372, 1373, 1375, 1377, 1378, 1380, 1381,
     1382, 1383, 1384, 1385, 1387, 1388, 1390, 1391, 1392, 1394,
     1395, 1396, 1397, 1399, 1400, 1401, 1402, 1403, 1404, 1405,
     1406, 1407, 1408, 1409, 1410, 1412, 1413, 1414, 1416, 1419,
     1421, 1422, 1424, 1425,  944,  941,  939,  938,  937,  936,
      935,  934,  933,  929,  928,  927,  926,  925,  924,  920,

      919, 1316, 1428, 1428, 1428, 1428, 1428, 1428, 1428, 1428,
     1429, 1429, 1429, 1429, 1429, 1429, 1429, 1429, 1430, 1430,
     1430, 1430, 1430, 1430, 1430, 1430, 1431, 1431, 1431, 1431,
     1431, 1431, 1431, 1431, 1432,  918,  917, 1432, 1433, 1433,
     1434,  916, 1434, 1434,  915, 1434, 1434, 1434, 1435,  913,
     1435, 1435, 1435, 1435, 1435, 1435, 1436, 1436, 1436, 1436,
      912, 1436, 1436, 1436, 1437,  911,  910, 1437, 1437, 1437,
     1437, 1437, 1438, 1438, 1438, 1438, 1438, 1438, 1438, 1438,
     1439,  909, 1439, 1439, 1439, 1439, 1439, 1440, 1440, 1441,
     1441, 1441, 1441, 1441, 1441, 1441, 1441, 1442, 1442, 1442,

     1442,  901, 1442, 1442, 1442, 1443, 1443, 1443, 1443,  889,
     1443, 1443, 1443, 1444, 1444, 1444, 1444, 1444, 1444, 1444,
     1444,  888,  887,  884,  883,  882,  881,  877,  870,  869,
      868,  867,  866,  865,  864,  863,  862,  861,  860,  859,
      858,  857,  856,  855,  854,  851,  849,  847,  846,  845,
      843,  841,  840,  838,  836,  835,  834,  833,  832,  831,
      830,  829,  828,  827,  826,  825,  824,  823,  822,  821,
      820,  818,  817,  816,  815,  814,  813,  812,  811,  810,
      809,  808,  806,  805,  804,  803,  801,  800,  799,  798,
      797,  795,  794,  793,  792,  791,  790,  789,  788,  787,

      785,  784,  783,  782,  781,  780,  779,  777,  775,  774,
      773,  772,  771,  770,  769,  768,  767,  765,  764,  762,
      760,  759,  758,  757,  756,  755,  754,  753,  752,  751,
      747,  746,  745,  744,  743,  739,  738,  736,  735,  734,
      733,  732,  731,  728,  727,  726,  725,  724,  722,  706,
      705,  704,  703,  700,  699,  698,  697,  696,  694,  693,
      682,  681,  680,  672,  671,  670,  669,  666,  633,  632,
      630,  629,  628,  627,  626,  625,  624,  623,  622,  621,
      620,  619,  618,  617,  616,  615,  614,  613,  612,  611,
      610,  609,  607,  606,  605,  604,  603,  601,  600,  599,

      598,  597,  596,  595,  594,  593,  592,  591,  588,  587,
      586,  585,  584,  582,  581,  580,  579,  578,  577,  576,
      575,  572,  571,  570,  568,  567,  566,  565,  564,  563,
      562,  561,  560,  559,  558,  557,  556,  555,  554,  553,
      551,  550,  549,  548,  546,  545,  544,  543,  542,  540,
      539,  538,  537,  535,  533,  532,  531,  530,  529,  528,
      526,  525,  524,  523,  522,  521,  520,  518,  517,  516,
      515,  514,  513,  512,  511,  509,  507,  506,  505,  504,
      503,  502,  501,  500,  499,  496,  495,  494,  493,  492,
      491,  490,  489,  488,  487,  485,  484,  483,  478,  476,

      475,  474,  473,  460,  452,  451,  450,  449,  448,  447,
      446,  445,  444,  443,  442,  440,  439,  437,  435,  433,
      431,  430,  428,  426,  422,  421,  418,  417,  416,  415,
      396,  395,  380,  375,  373,  368,  367,  360,  357,  352,
      351,  350,  349,  348,  346,  345,  344,  343,  342,  341,
      340,  339,  337,  336,  335,  334,  333,  331,  330,  329,
      327,  324,  321,  319,  318,  317,  316,  315,  313,  309,
      308,  307,  305,  304,  303,  302,  301,  299,  298,  297,
      295,  294,  293,  291,  290,  289,  287,  286,  285,  284,
      283,  282,  281,  279,  277,  276,  274,  271,  270,  265,

      264,  263,  262,  261,  260,  259,  258,  257,  254,  252,
      251,  250,  248,  247,  246,  245,  243,  242,  241,  240,
      239,  237,  236,  235,  234,  233,  232,  229,  227,  226,
      225,  224,  223,  222,  221,  217,  214,  212,  208,  207,
      206,  205,  201,  200,  190,  188,  177,  170,  169,  168,
      167,  166,  165,  163,  159,  154,  153,  152,  151,  150,
      149,  148,  146,  145,  144,  143,  142,  135,  127,  118,
      117,  115,  114,  108,  103,   99,   98,   97,   95,   87,
       86,   85,   74,   72,   59,   57,   52,   51,   49,   45,
       40,   11, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,

     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427, 1427,
     1427, 1427, 1427
    } ;

/* The intent behind this definition is that it'll catch
 * any uses of REJECT which flex missed.
 */
#define REJECT reject_used_but_not_detected
#define yymore() yymore_used_but_not_detected
#define YY_MORE_ADJ 0
#define YY_RESTORE_YY_MORE_OFFSET
#line 1 "input_lexer.ll"
#line 2 "input_lexer.ll"
 /* -*- mode: C++; compile-command: "flex input_lexer.ll && make input_lexer.o " -*- */
/* Note: for the nspire port, after flex, move from #ifdef HAVE_CONFIG_H 
   to #include "first.h" before #include<stdio.h> 
   and map "log" to log10 instead of ln
*/
/** @file input_lexer.ll
 *
 *  Lexical analyzer definition for reading expressions.
 *  Note Maple input should be processed replacing # with // and { } for set
 *  This file must be processed with flex. */
/*
 *  Copyright (C) 2001,14 B. Parisse, Institut Fourier, 38402 St Martin d'Heres
 *  The very first version was inspired by GiNaC lexer
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program. If not, see <http://www.gnu.org/licenses/>.
 */
/*
 * The lexer will first check for static patterns and strings (defined below)
 * If a match is not found, it calls find_or_make_symbol
 * This function looks first if the string should be translated
 * (e.g. add a prefix from the export table)
 * then look in lexer_functions for a match, then look in sym_tab
 * if not found in sym_tab, a new identificateur is created & added in sym_tab
 * Functions in lexer_functions are added during the construction
 * of the corresponding unary_functions using lexer_functions_register
 */
/*
 *  Definitions
 */
#ifdef NUMWORKS
#define at_log at_logb
#else
#define at_log at_ln
#endif
#include "giacPCH.h"
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <iostream>
#include <stdexcept>
#if !defined RTOS_THREADX && !defined NSPIRE && !defined FXCG && !defined GIAC_HAS_STO_38
#include <fstream>
#endif

#include "gen.h"
#include "input_lexer.h"
#include "help.h"
#include "identificateur.h"
#include "usual.h"
#include "derive.h"
#include "series.h"
#include "intg.h"
#include "sym2poly.h"
#include "moyal.h"
#include "subst.h"
#include "vecteur.h"
#include "modpoly.h"
#include "lin.h"
#include "solve.h"
#include "ifactor.h"
#include "alg_ext.h"
#include "gauss.h"
#include "isom.h"
#include "plot.h"
#include "ti89.h"

#include "prog.h"
#include "rpn.h"
#include "ezgcd.h"
#include "tex.h"
#include "risch.h"
#include "permu.h"
#include "input_parser.h"    

#if defined(RTOS_THREADX) || (defined(__MINGW_H) && !defined(KHICAS)) || defined NSPIRE || defined MS_SMART || defined(FREERTOS)
  extern "C" int isatty (int ){ return 0; }
#endif

#if defined BESTA_OS || defined(FREERTOS)
#define EINTR           4
#endif

#ifdef NSPIRE
  // after flex, move #include "config.h" and first.h before all includes
  // include "static.h" then giacPCH.h
  // then edit input_lexer.cc and search for isatty, replace by 0 for interactive
  void clearerr(FILE *){}
#endif

  using namespace std;
  using namespace giac;
  void giac_yyset_column (int  column_no , yyscan_t yyscanner);
  int giac_yyget_column (yyscan_t yyscanner);
#define YY_USER_ACTION giac_yyset_column(giac_yyget_column(yyscanner)+yyleng,yyscanner);
#define YY_USER_INIT giac_yyset_column(1,yyscanner);

#ifndef NO_NAMESPACE_GIAC
  namespace giac {
#endif // ndef NO_NAMESPACE_GIAC

    void increment_lexer_line_number_setcol(yyscan_t yyscanner,GIAC_CONTEXT){
      giac_yyset_column(1,yyscanner);
      increment_lexer_line_number(contextptr);
    }
    bool doing_insmod = false;

#ifdef HAVE_LIBPTHREAD
    static pthread_mutex_t * syms_mutex_ptr = 0;
    
    int lock_syms_mutex(){
      if (!syms_mutex_ptr){
	pthread_mutex_t tmp=PTHREAD_MUTEX_INITIALIZER;
	syms_mutex_ptr=new pthread_mutex_t(tmp);
      }
      return pthread_mutex_lock(syms_mutex_ptr);
    }
    
    void unlock_syms_mutex(){
      if (syms_mutex_ptr) 
	pthread_mutex_unlock(syms_mutex_ptr);    
    }

#else
    int lock_syms_mutex(){ return 0; }
    void unlock_syms_mutex(){}
#endif

    sym_string_tab & syms(){
      static sym_string_tab * ans=0;
      if (!ans) ans=new sym_string_tab;
      return * ans;
    }


    std::vector<int> & lexer_localization_vector(){
      static std::vector<int> * ans=0;
      if (!ans) ans=new  std::vector<int>;
      return *ans;
    }

#ifdef USTL
    ustl::map<std::string,std::string> & lexer_localization_map(){
      static ustl::map<std::string,std::string> * ans = 0;
      if (!ans) ans=new ustl::map<std::string,std::string>;
      return * ans;
    }
    ustl::multimap<std::string,localized_string> & back_lexer_localization_map(){
      static ustl::multimap<std::string,localized_string> * ans= 0;
      if (!ans) ans=new ustl::multimap<std::string,localized_string>;
      return * ans;
    }

    // lexer_localization_vector() is the list of languages currently translated
    // lexer_localization_map translates keywords from the locale to giac 
    // back_lexer_localization_map() lists for a giac keyword the translations

    ustl::map<std::string,std::vector<std::string> > & lexer_translator (){
      static ustl::map<std::string,std::vector<std::string> > * ans = 0;
      if (!ans) ans=new ustl::map<std::string,std::vector<std::string> >;
      return * ans;
    }
    // lexer_translator will be updated when export/with is called
    // To each string (w/o ::) in a given library, 
    // If it exists, we push_back the full string (with ::)
    // If not we create a vector with the full string
    // If a library is unexported we remove the corresponding entry in the 
    // vector and remove the entry if the vector is empty
    ustl::map<std::string,std::vector<std::string> > & library_functions (){
      static ustl::map<std::string,std::vector<std::string> > * ans=0;
      if (!ans) ans=new ustl::map<std::string,std::vector<std::string> >;
      return *ans;
    }

#else
    std::map<std::string,std::string> & lexer_localization_map(){
      static std::map<std::string,std::string> * ans = 0;
      if (!ans) ans=new std::map<std::string,std::string>;
      return * ans;
    }
    std::multimap<std::string,localized_string> & back_lexer_localization_map(){
      static std::multimap<std::string,localized_string> * ans= 0;
      if (!ans) ans=new std::multimap<std::string,localized_string>;
      return * ans;
    }
    // lexer_localization_vector() is the list of languages currently translated
    // lexer_localization_map translates keywords from the locale to giac 
    // back_lexer_localization_map() lists for a giac keyword the translations

    std::map<std::string,std::vector<std::string> > & lexer_translator (){
      static std::map<std::string,std::vector<std::string> > * ans = 0;
      if (!ans) ans=new std::map<std::string,std::vector<std::string> >;
      return * ans;
    }
    // lexer_translator will be updated when export/with is called
    // To each string (w/o ::) in a given library, 
    // If it exists, we push_back the full string (with ::)
    // If not we create a vector with the full string
    // If a library is unexported we remove the corresponding entry in the 
    // vector and remove the entry if the vector is empty
    std::map<std::string,std::vector<std::string> > & library_functions (){
      static std::map<std::string,std::vector<std::string> > * ans=0;
      if (!ans) ans=new std::map<std::string,std::vector<std::string> >;
      return *ans;
    }

#endif

    // First string is the library name, second is the vector of function names
    // User defined relations
    vector<user_function> & registered_lexer_functions(){
      static vector<user_function> * ans = 0;
      if (!ans){
	ans = new vector<user_function>;
	// ans->reserve(50);
      }
      return * ans;
    }

    bool tri1(const lexer_tab_int_type & a,const lexer_tab_int_type & b){
      int res= strcmp(a.keyword,b.keyword);
      return res<0;
    }

    bool tri2(const char * a,const char * b){
      return strcmp(a,b)<0;
    }

    const lexer_tab_int_type lexer_tab_int_values []={
#ifdef GIAC_HAS_STO_38
#include "lexer_tab38_int.h"
#else
#include "lexer_tab_int.h"
#endif
    };

    const lexer_tab_int_type * const lexer_tab_int_values_begin = lexer_tab_int_values;
    const unsigned lexer_tab_int_values_n=sizeof(lexer_tab_int_values)/sizeof(lexer_tab_int_type);
    const lexer_tab_int_type * const lexer_tab_int_values_end = lexer_tab_int_values+lexer_tab_int_values_n;
#ifndef NO_NAMESPACE_GIAC
  } // namespace giac
#endif // ndef NO_NAMESPACE_GIAC

#line 1874 "input_lexer.cc"
#line 270 "input_lexer.ll"
	/* Abbreviations */
        /* If changed, modify isalphan in help.cc FIXME is . allowed inside alphanumeric ? answer NO */




/*
 *  Lexical rules
 */
#line 1885 "input_lexer.cc"

#define INITIAL 0
#define comment 1
#define comment_hash 2
#define str 3
#define backquote 4

#ifndef YY_NO_UNISTD_H
/* Special case for "unistd.h", since it is non-ANSI. We include it way
 * down here because we want the user's section 1 to have been scanned first.
 * The user has a chance to override it with an option.
 */
#include <unistd.h>
#endif

#ifndef YY_EXTRA_TYPE
#define YY_EXTRA_TYPE void *
#endif

/* Holds the entire state of the reentrant scanner. */
struct yyguts_t
    {

    /* User-defined. Not touched by flex. */
    YY_EXTRA_TYPE yyextra_r;

    /* The rest are the same as the globals declared in the non-reentrant scanner. */
    FILE *yyin_r, *yyout_r;
    size_t yy_buffer_stack_top; /**< index of top of stack. */
    size_t yy_buffer_stack_max; /**< capacity of stack. */
    YY_BUFFER_STATE * yy_buffer_stack; /**< Stack as an array. */
    char yy_hold_char;
    int yy_n_chars;
    int yyleng_r;
    char *yy_c_buf_p;
    int yy_init;
    int yy_start;
    int yy_did_buffer_switch_on_eof;
    int yy_start_stack_ptr;
    int yy_start_stack_depth;
    int *yy_start_stack;
    yy_state_type yy_last_accepting_state;
    char* yy_last_accepting_cpos;

    int yylineno_r;
    int yy_flex_debug_r;

    char *yytext_r;
    int yy_more_flag;
    int yy_more_len;

    YYSTYPE * yylval_r;

    }; /* end struct yyguts_t */

static int yy_init_globals ( yyscan_t yyscanner );

    /* This must go here because YYSTYPE and YYLTYPE are included
     * from bison output in section 1.*/
    #    define yylval yyg->yylval_r
    
int yylex_init (yyscan_t* scanner);

int yylex_init_extra ( YY_EXTRA_TYPE user_defined, yyscan_t* scanner);

/* Accessor methods to globals.
   These are made visible to non-reentrant scanners for convenience. */

int yylex_destroy ( yyscan_t yyscanner );

int yyget_debug ( yyscan_t yyscanner );

void yyset_debug ( int debug_flag , yyscan_t yyscanner );

YY_EXTRA_TYPE yyget_extra ( yyscan_t yyscanner );

void yyset_extra ( YY_EXTRA_TYPE user_defined , yyscan_t yyscanner );

FILE *yyget_in ( yyscan_t yyscanner );

void yyset_in  ( FILE * _in_str , yyscan_t yyscanner );

FILE *yyget_out ( yyscan_t yyscanner );

void yyset_out  ( FILE * _out_str , yyscan_t yyscanner );

			int yyget_leng ( yyscan_t yyscanner );

char *yyget_text ( yyscan_t yyscanner );

int yyget_lineno ( yyscan_t yyscanner );

void yyset_lineno ( int _line_number , yyscan_t yyscanner );

int yyget_column  ( yyscan_t yyscanner );

void yyset_column ( int _column_no , yyscan_t yyscanner );

YYSTYPE * yyget_lval ( yyscan_t yyscanner );

void yyset_lval ( YYSTYPE * yylval_param , yyscan_t yyscanner );

/* Macros after this point can all be overridden by user definitions in
 * section 1.
 */

#ifndef YY_SKIP_YYWRAP
#ifdef __cplusplus
extern "C" int yywrap ( yyscan_t yyscanner );
#else
extern int yywrap ( yyscan_t yyscanner );
#endif
#endif

#ifndef YY_NO_UNPUT
    
    static void yyunput ( int c, char *buf_ptr  , yyscan_t yyscanner);
    
#endif

#ifndef yytext_ptr
static void yy_flex_strncpy ( char *, const char *, int , yyscan_t yyscanner);
#endif

#ifdef YY_NEED_STRLEN
static int yy_flex_strlen ( const char * , yyscan_t yyscanner);
#endif

#ifndef YY_NO_INPUT
#ifdef __cplusplus
static int yyinput ( yyscan_t yyscanner );
#else
static int input ( yyscan_t yyscanner );
#endif

#endif

/* Amount of stuff to slurp up with each read. */
#ifndef YY_READ_BUF_SIZE
#ifdef __ia64__
/* On IA-64, the buffer size is 16k, not 8k */
#define YY_READ_BUF_SIZE 16384
#else
#define YY_READ_BUF_SIZE 8192
#endif /* __ia64__ */
#endif

/* Copy whatever the last rule matched to the standard output. */
#ifndef ECHO
/* This used to be an fputs(), but since the string might contain NUL's,
 * we now use fwrite().
 */
#define ECHO do { if (fwrite( yytext, (size_t) yyleng, 1, yyout )) {} } while (0)
#endif

/* Gets input and stuffs it into "buf".  number of characters read, or YY_NULL,
 * is returned in "result".
 */
#ifndef YY_INPUT
#define YY_INPUT(buf,result,max_size) \
	if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
		{ \
		int c = '*'; \
		int n; \
		for ( n = 0; n < max_size && \
			     (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
			buf[n] = (char) c; \
		if ( c == '\n' ) \
			buf[n++] = (char) c; \
		if ( c == EOF && ferror( yyin ) ) \
			YY_FATAL_ERROR( "input in flex scanner failed" ); \
		result = n; \
		} \
	else \
		{ \
		errno=0; \
		while ( (result = (int) fread(buf, 1, (yy_size_t) max_size, yyin)) == 0 && ferror(yyin)) \
			{ \
			if( errno != EINTR) \
				{ \
				YY_FATAL_ERROR( "input in flex scanner failed" ); \
				break; \
				} \
			errno=0; \
			clearerr(yyin); \
			} \
		}\
\

#endif

/* No semi-colon after return; correct usage is to write "yyterminate();" -
 * we don't want an extra ';' after the "return" because that will cause
 * some compilers to complain about unreachable statements.
 */
#ifndef yyterminate
#define yyterminate() return YY_NULL
#endif

/* Number of entries by which start-condition stack grows. */
#ifndef YY_START_STACK_INCR
#define YY_START_STACK_INCR 25
#endif

/* Report a fatal error. */
#ifndef YY_FATAL_ERROR
#define YY_FATAL_ERROR(msg) yy_fatal_error( msg , yyscanner)
#endif

/* end tables serialization structures and prototypes */

/* Default declaration of generated scanner - a define so the user can
 * easily add parameters.
 */
#ifndef YY_DECL
#define YY_DECL_IS_OURS 1

extern int yylex \
               (YYSTYPE * yylval_param , yyscan_t yyscanner);

#define YY_DECL int yylex \
               (YYSTYPE * yylval_param , yyscan_t yyscanner)
#endif /* !YY_DECL */

/* Code executed at the beginning of each rule, after yytext and yyleng
 * have been set up.
 */
#ifndef YY_USER_ACTION
#define YY_USER_ACTION
#endif

/* Code executed at the end of each rule. */
#ifndef YY_BREAK
#define YY_BREAK /*LINTED*/break;
#endif

#define YY_RULE_SETUP \
	YY_USER_ACTION

/** The main scanner function which does all the work.
 */
YY_DECL
{
	yy_state_type yy_current_state;
	char *yy_cp, *yy_bp;
	int yy_act;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

    yylval = yylval_param;

	if ( !yyg->yy_init )
		{
		yyg->yy_init = 1;

#ifdef YY_USER_INIT
		YY_USER_INIT;
#endif

		if ( ! yyg->yy_start )
			yyg->yy_start = 1;	/* first start state */

		if ( ! yyin )
			yyin = stdin;

		if ( ! yyout )
			yyout = stdout;

		if ( ! YY_CURRENT_BUFFER ) {
			yyensure_buffer_stack (yyscanner);
			YY_CURRENT_BUFFER_LVALUE =
				yy_create_buffer( yyin, YY_BUF_SIZE , yyscanner);
		}

		yy_load_buffer_state( yyscanner );
		}

	{
#line 284 "input_lexer.ll"


#line 2166 "input_lexer.cc"

	while ( /*CONSTCOND*/1 )		/* loops until end-of-file is reached */
		{
		yy_cp = yyg->yy_c_buf_p;

		/* Support of yytext. */
		*yy_cp = yyg->yy_hold_char;

		/* yy_bp points to the position in yy_ch_buf of the start of
		 * the current run.
		 */
		yy_bp = yy_cp;

		yy_current_state = yyg->yy_start;
yy_match:
		do
			{
			YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ;
			if ( yy_accept[yy_current_state] )
				{
				yyg->yy_last_accepting_state = yy_current_state;
				yyg->yy_last_accepting_cpos = yy_cp;
				}
			while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
				{
				yy_current_state = (int) yy_def[yy_current_state];
				if ( yy_current_state >= 1428 )
					yy_c = yy_meta[yy_c];
				}
			yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
			++yy_cp;
			}
		while ( yy_base[yy_current_state] != 2093 );

yy_find_action:
		yy_act = yy_accept[yy_current_state];
		if ( yy_act == 0 )
			{ /* have to back up */
			yy_cp = yyg->yy_last_accepting_cpos;
			yy_current_state = yyg->yy_last_accepting_state;
			yy_act = yy_accept[yy_current_state];
			}

		YY_DO_BEFORE_ACTION;

do_action:	/* This label is used only to access EOF actions. */

		switch ( yy_act )
	{ /* beginning of action switch */
			case 0: /* must back up */
			/* undo the effects of YY_DO_BEFORE_ACTION */
			*yy_cp = yyg->yy_hold_char;
			yy_cp = yyg->yy_last_accepting_cpos;
			yy_current_state = yyg->yy_last_accepting_state;
			goto yy_find_action;

case 1:
YY_RULE_SETUP
#line 286 "input_lexer.ll"
/* skip whitespace */
	YY_BREAK
case 2:
/* rule 2 can match eol */
YY_RULE_SETUP
#line 287 "input_lexer.ll"
increment_lexer_line_number_setcol(yyscanner,yyextra); //CERR << "Scanning line " << lexer_line_number(yyextra) << '\n';
	YY_BREAK
/* Strings */
/* \"[^\"]*\"        yylval = string2gen( giac_yytext); return T_STRING; */
case 3:
YY_RULE_SETUP
#line 290 "input_lexer.ll"
BEGIN(str); comment_s("",yyextra);
	YY_BREAK
case 4:
YY_RULE_SETUP
#line 291 "input_lexer.ll"
increment_comment_s('"',yyextra);
	YY_BREAK
case 5:
YY_RULE_SETUP
#line 292 "input_lexer.ll"
{  index_status(yyextra)=1; BEGIN(INITIAL); 
                  (*yylval)=string2gen(comment_s(yyextra),false); 
                  return T_STRING; }
	YY_BREAK
case 6:
/* rule 6 can match eol */
YY_RULE_SETUP
#line 295 "input_lexer.ll"
increment_comment_s('\n',yyextra); increment_lexer_line_number_setcol(yyscanner,yyextra);
	YY_BREAK
case 7:
YY_RULE_SETUP
#line 296 "input_lexer.ll"
{
                   /* octal escape sequence */
                   int result=0;
                   (void) sscanf( yytext + 1, "%o", &result ); // not supported on FXCG
                   increment_comment_s(char(result & 0xff),yyextra);
                   }
	YY_BREAK
case 8:
YY_RULE_SETUP
#line 302 "input_lexer.ll"
{
                   /* generate error - bad escape sequence; something
                    * like '\48' or '\0777777'
                    */
                   }
	YY_BREAK
case 9:
YY_RULE_SETUP
#line 307 "input_lexer.ll"
increment_comment_s('\n',yyextra);
	YY_BREAK
case 10:
YY_RULE_SETUP
#line 308 "input_lexer.ll"
increment_comment_s('\t',yyextra);
	YY_BREAK
case 11:
YY_RULE_SETUP
#line 309 "input_lexer.ll"
increment_comment_s('\r',yyextra);
	YY_BREAK
case 12:
YY_RULE_SETUP
#line 310 "input_lexer.ll"
increment_comment_s('\b',yyextra);
	YY_BREAK
case 13:
YY_RULE_SETUP
#line 311 "input_lexer.ll"
increment_comment_s('\f',yyextra);
	YY_BREAK
case 14:
/* rule 14 can match eol */
YY_RULE_SETUP
#line 312 "input_lexer.ll"
increment_comment_s(yytext[1],yyextra);
	YY_BREAK
case 15:
YY_RULE_SETUP
#line 313 "input_lexer.ll"
increment_comment_s(yytext,yyextra);
	YY_BREAK
case 16:
YY_RULE_SETUP
#line 314 "input_lexer.ll"
if (rpn_mode(yyextra)){ index_status(yyextra)=0; return T_ACCENTGRAVE; } else { BEGIN(backquote); comment_s("",yyextra); }
	YY_BREAK
case 17:
/* rule 17 can match eol */
YY_RULE_SETUP
#line 315 "input_lexer.ll"
increment_comment_s('\n',yyextra); increment_lexer_line_number_setcol(yyscanner,yyextra);
	YY_BREAK
case 18:
YY_RULE_SETUP
#line 316 "input_lexer.ll"
increment_comment_s(yytext,yyextra);
	YY_BREAK
case 19:
YY_RULE_SETUP
#line 317 "input_lexer.ll"
{  index_status(yyextra)=1; BEGIN(INITIAL); 
  return find_or_make_symbol(comment_s(yyextra),(*yylval),yyscanner,true,yyextra); }
	YY_BREAK
case 20:
/* rule 20 can match eol */
YY_RULE_SETUP
#line 320 "input_lexer.ll"
index_status(yyextra)=0; increment_lexer_line_number_setcol(yyscanner,yyextra);
	YY_BREAK
case 21:
/* rule 21 can match eol */
YY_RULE_SETUP
#line 321 "input_lexer.ll"
index_status(yyextra)=0; increment_lexer_line_number_setcol(yyscanner,yyextra);/* (*yylval) = string2gen('"'+string(giac_yytext).substr(2,string(giac_yytext).size()-3)+'"');   return T_COMMENT; */
	YY_BREAK
case 22:
YY_RULE_SETUP
#line 322 "input_lexer.ll"
BEGIN(comment); comment_s(yyextra)="";
	YY_BREAK
case 23:
YY_RULE_SETUP
#line 324 "input_lexer.ll"
comment_s(yyextra)+=yytext; /* eat anything that's not a '*' */
	YY_BREAK
case 24:
YY_RULE_SETUP
#line 325 "input_lexer.ll"
comment_s(yyextra)+=yytext; /* eat up '*'s not followed by '/'s */
	YY_BREAK
case 25:
/* rule 25 can match eol */
YY_RULE_SETUP
#line 326 "input_lexer.ll"
comment_s(yyextra) += '\n'; increment_lexer_line_number_setcol(yyscanner,yyextra); CERR << "(Comment) scanning line " << lexer_line_number(yyextra) << '\n';
	YY_BREAK
case 26:
YY_RULE_SETUP
#line 327 "input_lexer.ll"
BEGIN(INITIAL); index_status(yyextra)=0; /* (*yylval) = string2gen(comment_s(yyextra),false); return T_COMMENT; */
	YY_BREAK
case 27:
/* rule 27 can match eol */
YY_RULE_SETUP
#line 328 "input_lexer.ll"
index_status(yyextra)=0; /* (*yylval) = string2gen('"'+string(yytext).substr(3,string(yytext).size()-6)+'"'); return T_COMMENT; */
	YY_BREAK
case 28:
/* rule 28 can match eol */
YY_RULE_SETUP
#line 329 "input_lexer.ll"
index_status(yyextra)=0; /* (*yylval) = string2gen('"'+string(yytext).substr(3,string(yytext).size()-6)+'"'); return T_COMMENT; */
	YY_BREAK
case 29:
YY_RULE_SETUP
#line 331 "input_lexer.ll"
if (index_status(yyextra)) return T_INTERROGATION; if (calc_mode(yyextra)==1){ *yylval=undef; return T_SYMBOL;}  return T_HELP;
	YY_BREAK
case 30:
YY_RULE_SETUP
#line 332 "input_lexer.ll"
opened_quote(yyextra) |= 2; return T_UNIT;
	YY_BREAK
case 31:
YY_RULE_SETUP
#line 333 "input_lexer.ll"
if (opened_quote(yyextra) & 1) { opened_quote(yyextra) &= 0x7ffffffe; return T_QUOTE; } if (index_status(yyextra) && !in_rpn(yyextra) && xcas_mode(yyextra)!= 1) return T_PRIME; opened_quote(yyextra) |= 1; return T_QUOTE;
	YY_BREAK
case 32:
YY_RULE_SETUP
#line 334 "input_lexer.ll"
index_status(yyextra)=0; if (xcas_mode(yyextra)==3) return TI_SEMI; (*yylval)=0; return T_SEMI;
	YY_BREAK
/* commented otherwise for(;;) will not work ";;"			index_status(yyextra)=0; if (xcas_mode(yyextra)==3) return TI_SEMI; (*yylval)=0; return T_SEMI; */
case 33:
YY_RULE_SETUP
#line 336 "input_lexer.ll"
index_status(yyextra)=0; if (xcas_mode(yyextra)==3) return T_SEMI; return TI_SEMI;
	YY_BREAK
case 34:
YY_RULE_SETUP
#line 337 "input_lexer.ll"
if (spread_formula(yyextra)) return T_DEUXPOINTS; if ( xcas_mode(yyextra)==3 ) { index_status(yyextra)=0; return TI_DEUXPOINTS; }  index_status(yyextra)=0; if (xcas_mode(yyextra)>0) { (*yylval)=1; return T_SEMI; } else return T_DEUXPOINTS;
	YY_BREAK
case 35:
YY_RULE_SETUP
#line 338 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=1; return T_SEMI;
	YY_BREAK
case 36:
YY_RULE_SETUP
#line 339 "input_lexer.ll"
index_status(yyextra)=0;return T_DOUBLE_DEUX_POINTS;
	YY_BREAK
/* special values */
case 37:
YY_RULE_SETUP
#line 343 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=theta__IDNT_e; return T_SYMBOL;
	YY_BREAK
case 38:
YY_RULE_SETUP
#line 344 "input_lexer.ll"
index_status(yyextra)=1; if (xcas_mode(yyextra) > 0 || !i_sqrt_minus1(yyextra)) { (*yylval)=i__IDNT_e; return T_SYMBOL; } else { (*yylval) = cst_i; return T_LITERAL;};
	YY_BREAK
case 39:
YY_RULE_SETUP
#line 345 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
case 40:
YY_RULE_SETUP
#line 346 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
case 41:
YY_RULE_SETUP
#line 347 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
case 42:
YY_RULE_SETUP
#line 348 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
/* \xef\xbd\x89            index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL; */
case 43:
YY_RULE_SETUP
#line 350 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
case 44:
YY_RULE_SETUP
#line 351 "input_lexer.ll"
index_status(yyextra)=1; if (python_compat(yyextra)>=0 && (xcas_mode(yyextra)==0 || xcas_mode(yyextra)==3 || rpn_mode(yyextra)) ) { return find_or_make_symbol(yytext,(*yylval),yyscanner,true,yyextra); } else { (*yylval) = cst_i; return T_LITERAL; };
	YY_BREAK
case 45:
YY_RULE_SETUP
#line 352 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_i; return T_LITERAL;
	YY_BREAK
case 46:
YY_RULE_SETUP
#line 353 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = symbolic(at_exp,1); return T_LITERAL;
	YY_BREAK
case 47:
YY_RULE_SETUP
#line 354 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_pi; return T_LITERAL;
	YY_BREAK
case 48:
YY_RULE_SETUP
#line 355 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_pi; return T_LITERAL;
	YY_BREAK
case 49:
YY_RULE_SETUP
#line 356 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_pi; return T_LITERAL;
	YY_BREAK
case 50:
YY_RULE_SETUP
#line 357 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_pi; return T_LITERAL;
	YY_BREAK
case 51:
YY_RULE_SETUP
#line 358 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_pi; return T_LITERAL;
	YY_BREAK
case 52:
YY_RULE_SETUP
#line 359 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = cst_euler_gamma; return T_LITERAL;
	YY_BREAK
case 53:
YY_RULE_SETUP
#line 360 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = unsigned_inf; return T_LITERAL;
	YY_BREAK
case 54:
YY_RULE_SETUP
#line 361 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = plus_inf; return T_LITERAL;
	YY_BREAK
case 55:
YY_RULE_SETUP
#line 362 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = unsigned_inf; return T_LITERAL;
	YY_BREAK
case 56:
YY_RULE_SETUP
#line 363 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = plus_inf; return T_LITERAL;
	YY_BREAK
case 57:
YY_RULE_SETUP
#line 364 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = plus_inf; return T_LITERAL;
	YY_BREAK
case 58:
YY_RULE_SETUP
#line 365 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = unsigned_inf; return T_LITERAL;
	YY_BREAK
case 59:
YY_RULE_SETUP
#line 366 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = plus_inf; return T_LITERAL;
	YY_BREAK
case 60:
YY_RULE_SETUP
#line 367 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = minus_inf; return T_LITERAL;
	YY_BREAK
case 61:
YY_RULE_SETUP
#line 368 "input_lexer.ll"
index_status(yyextra)=1; (*yylval) = undef; return T_LITERAL;
	YY_BREAK
case 62:
YY_RULE_SETUP
#line 369 "input_lexer.ll"
return T_END_INPUT;
	YY_BREAK
/* integer values */
case 63:
YY_RULE_SETUP
#line 372 "input_lexer.ll"
if (xcas_mode(yyextra)==2){ (*yylval) = gen(at_user_operator,6); index_status(yyextra)=0; return T_UNARY_OP; }  index_status(yyextra)=0; (*yylval) = _FUNC; (*yylval).subtype=_INT_TYPE; return T_TYPE_ID;
	YY_BREAK
case 64:
YY_RULE_SETUP
#line 373 "input_lexer.ll"
if (python_compat(yyextra)){ *yylval=at_python_list; return T_UNARY_OP; } if (xcas_mode(yyextra)==3) { index_status(yyextra)=1; return find_or_make_symbol(yytext,(*yylval),yyscanner,true,yyextra); } index_status(yyextra)=0; (*yylval) = _MAPLE_LIST ; (*yylval).subtype=_INT_MAPLECONVERSION ;return T_TYPE_ID;
	YY_BREAK
/* vector/polynom/matrice delimiters */
case 65:
YY_RULE_SETUP
#line 377 "input_lexer.ll"
(*yylval) = _SEQ__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 66:
YY_RULE_SETUP
#line 378 "input_lexer.ll"
(*yylval) = _SET__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 67:
YY_RULE_SETUP
#line 379 "input_lexer.ll"
(*yylval) = _INTERVAL__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 68:
YY_RULE_SETUP
#line 380 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _LIST__VECT; return T_VECT_DISPATCH;
	YY_BREAK
/* "list(" index_status(yyextra)=0; (*yylval) = _LIST__VECT; return T_BEGIN_PAR; */
case 69:
YY_RULE_SETUP
#line 382 "input_lexer.ll"
(*yylval) = _RPN_FUNC__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 70:
YY_RULE_SETUP
#line 383 "input_lexer.ll"
(*yylval) = _GROUP__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 71:
YY_RULE_SETUP
#line 384 "input_lexer.ll"
(*yylval) = _LINE__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 72:
YY_RULE_SETUP
#line 385 "input_lexer.ll"
(*yylval) = _VECTOR__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 73:
YY_RULE_SETUP
#line 386 "input_lexer.ll"
(*yylval) = _MATRIX__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 74:
YY_RULE_SETUP
#line 387 "input_lexer.ll"
(*yylval) = _PNT__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 75:
YY_RULE_SETUP
#line 388 "input_lexer.ll"
(*yylval) = _GGB__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 76:
YY_RULE_SETUP
#line 389 "input_lexer.ll"
(*yylval) = _GGBVECT; return T_VECT_DISPATCH;
	YY_BREAK
case 77:
YY_RULE_SETUP
#line 390 "input_lexer.ll"
(*yylval) = _POINT__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 78:
YY_RULE_SETUP
#line 391 "input_lexer.ll"
(*yylval) = _TUPLE__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 79:
YY_RULE_SETUP
#line 392 "input_lexer.ll"
(*yylval) = _CURVE__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 80:
YY_RULE_SETUP
#line 393 "input_lexer.ll"
(*yylval) = _HALFLINE__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 81:
YY_RULE_SETUP
#line 394 "input_lexer.ll"
(*yylval) = _POLY1__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 82:
YY_RULE_SETUP
#line 395 "input_lexer.ll"
(*yylval) = _ASSUME__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 83:
YY_RULE_SETUP
#line 396 "input_lexer.ll"
(*yylval) = _LOGO__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 84:
YY_RULE_SETUP
#line 397 "input_lexer.ll"
(*yylval) = _SPREAD__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 85:
YY_RULE_SETUP
#line 398 "input_lexer.ll"
(*yylval) = _FOLDER__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 86:
YY_RULE_SETUP
#line 399 "input_lexer.ll"
(*yylval) = _POLYEDRE__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 87:
YY_RULE_SETUP
#line 400 "input_lexer.ll"
(*yylval) = _RGBA__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 88:
YY_RULE_SETUP
#line 401 "input_lexer.ll"
(*yylval) = _REALSET__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 89:
YY_RULE_SETUP
#line 402 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _LIST__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 90:
YY_RULE_SETUP
#line 403 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 91:
YY_RULE_SETUP
#line 404 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_strict,2);  return T_TEST_EQUAL;
	YY_BREAK
case 92:
YY_RULE_SETUP
#line 405 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_strict,2); return T_TEST_EQUAL;
	YY_BREAK
case 93:
YY_RULE_SETUP
#line 406 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_strict,2);  return T_TEST_EQUAL;
	YY_BREAK
case 94:
YY_RULE_SETUP
#line 407 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_egal,2);  return T_TEST_EQUAL;
	YY_BREAK
case 95:
YY_RULE_SETUP
#line 408 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_strict,2); return T_TEST_EQUAL;
	YY_BREAK
case 96:
YY_RULE_SETUP
#line 409 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_egal,2); return T_TEST_EQUAL;
	YY_BREAK
case 97:
YY_RULE_SETUP
#line 410 "input_lexer.ll"
index_status(yyextra)=0; return T_VIRGULE;
	YY_BREAK
case 98:
YY_RULE_SETUP
#line 411 "input_lexer.ll"
index_status(yyextra)=0; return T_VIRGULE;
	YY_BREAK
case 99:
YY_RULE_SETUP
#line 412 "input_lexer.ll"
index_status(yyextra)=0; *yylval = 0; return T_BEGIN_PAR;
	YY_BREAK
case 100:
YY_RULE_SETUP
#line 413 "input_lexer.ll"
index_status(yyextra)=1; return T_END_PAR;
	YY_BREAK
case 101:
YY_RULE_SETUP
#line 414 "input_lexer.ll"
if (index_status(yyextra)) { index_status(yyextra)=0; return T_INDEX_BEGIN; } else { (*yylval) = 0; return T_VECT_DISPATCH; } ;
	YY_BREAK
case 102:
YY_RULE_SETUP
#line 415 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 103:
YY_RULE_SETUP
#line 416 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 104:
YY_RULE_SETUP
#line 417 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _POLY1__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 105:
YY_RULE_SETUP
#line 418 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 106:
YY_RULE_SETUP
#line 419 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _MATRIX__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 107:
YY_RULE_SETUP
#line 420 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 108:
YY_RULE_SETUP
#line 421 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _ASSUME__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 109:
YY_RULE_SETUP
#line 422 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
/* geometric delimiters */
case 110:
YY_RULE_SETUP
#line 424 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _GROUP__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 111:
YY_RULE_SETUP
#line 425 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 112:
YY_RULE_SETUP
#line 426 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _LINE__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 113:
YY_RULE_SETUP
#line 427 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 114:
YY_RULE_SETUP
#line 428 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _VECTOR__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 115:
YY_RULE_SETUP
#line 429 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 116:
YY_RULE_SETUP
#line 430 "input_lexer.ll"
index_status(yyextra)=0; (*yylval) = _CURVE__VECT; return T_VECT_DISPATCH; 
	YY_BREAK
case 117:
YY_RULE_SETUP
#line 431 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
/* gen delimiters */
case 118:
YY_RULE_SETUP
#line 433 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=_TABLE__VECT;return T_VECT_DISPATCH; 
	YY_BREAK
case 119:
YY_RULE_SETUP
#line 434 "input_lexer.ll"
index_status(yyextra)=1;  return T_VECT_END;
	YY_BREAK
case 120:
YY_RULE_SETUP
#line 435 "input_lexer.ll"
index_status(yyextra)=0;  if (rpn_mode(yyextra)||calc_mode(yyextra)==1) { (*yylval)=0; return T_VECT_DISPATCH; } if (xcas_mode(yyextra)==3 || abs_calc_mode(yyextra)==38){ (*yylval) = _LIST__VECT;  return T_VECT_DISPATCH; } if (xcas_mode(yyextra) > 0 ){ (*yylval)=_SET__VECT; return T_VECT_DISPATCH; } else return T_BLOC_BEGIN;
	YY_BREAK
case 121:
YY_RULE_SETUP
#line 436 "input_lexer.ll"
index_status(yyextra)=1; if (rpn_mode(yyextra) || calc_mode(yyextra)==1 || python_compat(yyextra)) return T_VECT_END; if (xcas_mode(yyextra)==3 || abs_calc_mode(yyextra)==38) return T_VECT_END; if (xcas_mode(yyextra) > 0) return T_VECT_END; else return T_BLOC_END;
	YY_BREAK
case 122:
YY_RULE_SETUP
#line 437 "input_lexer.ll"
index_status(yyextra)=0;  (*yylval)=_SET__VECT; return T_VECT_DISPATCH;
	YY_BREAK
case 123:
YY_RULE_SETUP
#line 438 "input_lexer.ll"
index_status(yyextra)=1; return T_VECT_END;
	YY_BREAK
case 124:
YY_RULE_SETUP
#line 439 "input_lexer.ll"
index_status(yyextra)=0; return T_ROOTOF_BEGIN;
	YY_BREAK
case 125:
YY_RULE_SETUP
#line 440 "input_lexer.ll"
index_status(yyextra)=1; return T_ROOTOF_END;
	YY_BREAK
case 126:
YY_RULE_SETUP
#line 441 "input_lexer.ll"
index_status(yyextra)=0; return T_SPOLY1_BEGIN;
	YY_BREAK
case 127:
YY_RULE_SETUP
#line 442 "input_lexer.ll"
index_status(yyextra)=1; return T_SPOLY1_END;
	YY_BREAK
case 128:
YY_RULE_SETUP
#line 443 "input_lexer.ll"
index_status(yyextra)=0; if (abs_calc_mode(yyextra)!=38){ (*yylval)=gen(at_rotate,2); return T_UNION; } ++in_rpn(yyextra); return T_RPN_BEGIN;
	YY_BREAK
case 129:
YY_RULE_SETUP
#line 444 "input_lexer.ll"
index_status(yyextra)=0; if (abs_calc_mode(yyextra)!=38){ (*yylval)=gen(at_shift,2); return T_UNION; } --in_rpn(yyextra); return T_RPN_END;
	YY_BREAK
/* binary operators */
case 130:
YY_RULE_SETUP
#line 447 "input_lexer.ll"
index_status(yyextra)=0; return T_MAPSTO;
	YY_BREAK
case 131:
YY_RULE_SETUP
#line 448 "input_lexer.ll"
(*yylval) = gen(at_couleur,2); index_status(yyextra)=0; return T_INTERVAL;
	YY_BREAK
case 132:
YY_RULE_SETUP
#line 449 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_same,2); return T_TEST_EQUAL;
	YY_BREAK
case 133:
YY_RULE_SETUP
#line 450 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_equal,2); return T_EQUAL;
	YY_BREAK
case 134:
YY_RULE_SETUP
#line 451 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_deuxpoints,2); return T_DEUXPOINTS;
	YY_BREAK
case 135:
YY_RULE_SETUP
#line 452 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_same,2); return T_QUOTED_BINARY;
	YY_BREAK
case 136:
YY_RULE_SETUP
#line 453 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_same,2); return T_QUOTED_BINARY;
	YY_BREAK
case 137:
YY_RULE_SETUP
#line 454 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_TEST_EQUAL;
	YY_BREAK
case 138:
YY_RULE_SETUP
#line 455 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_QUOTED_BINARY;
	YY_BREAK
case 139:
YY_RULE_SETUP
#line 456 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_TEST_EQUAL;
	YY_BREAK
case 140:
YY_RULE_SETUP
#line 457 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_QUOTED_BINARY;
	YY_BREAK
case 141:
YY_RULE_SETUP
#line 458 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_QUOTED_BINARY;
	YY_BREAK
case 142:
YY_RULE_SETUP
#line 459 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_egal,2); return T_QUOTED_BINARY;
	YY_BREAK
case 143:
YY_RULE_SETUP
#line 460 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_egal,2); return T_QUOTED_BINARY;
	YY_BREAK
case 144:
YY_RULE_SETUP
#line 461 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_egal,2); return T_TEST_EQUAL;
	YY_BREAK
case 145:
YY_RULE_SETUP
#line 462 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_strict,2); return T_QUOTED_BINARY;
	YY_BREAK
case 146:
YY_RULE_SETUP
#line 463 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_strict,2); return T_QUOTED_BINARY;
	YY_BREAK
case 147:
YY_RULE_SETUP
#line 464 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_strict,2); return T_QUOTED_BINARY;
	YY_BREAK
case 148:
YY_RULE_SETUP
#line 465 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_egal,2); return T_TEST_EQUAL;
	YY_BREAK
case 149:
YY_RULE_SETUP
#line 466 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_egal,2); return T_QUOTED_BINARY;
	YY_BREAK
case 150:
YY_RULE_SETUP
#line 467 "input_lexer.ll"
spread_formula(yyextra)=!index_status(yyextra); index_status(yyextra)=0; (*yylval)=gen(at_equal,2); return T_EQUAL;
	YY_BREAK
case 151:
YY_RULE_SETUP
#line 468 "input_lexer.ll"
spread_formula(yyextra)=!index_status(yyextra); index_status(yyextra)=0; (*yylval)=gen(at_equal2,2); return T_EQUAL;
	YY_BREAK
case 152:
YY_RULE_SETUP
#line 469 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_equal,2); return T_QUOTED_BINARY;
	YY_BREAK
case 153:
YY_RULE_SETUP
#line 470 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_dollar,2); if (xcas_mode(yyextra)>0) return T_DOLLAR_MAPLE; else return T_DOLLAR;
	YY_BREAK
case 154:
YY_RULE_SETUP
#line 471 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_dollar,2); return T_DOLLAR_MAPLE;
	YY_BREAK
case 155:
YY_RULE_SETUP
#line 472 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_dollar,2); return T_QUOTED_BINARY;
	YY_BREAK
case 156:
YY_RULE_SETUP
#line 473 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_dollar,2); return T_QUOTED_BINARY;
	YY_BREAK
case 157:
YY_RULE_SETUP
#line 474 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return T_AFFECT;
	YY_BREAK
case 158:
YY_RULE_SETUP
#line 475 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return T_QUOTED_BINARY;
	YY_BREAK
case 159:
YY_RULE_SETUP
#line 476 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return T_QUOTED_BINARY;
	YY_BREAK
case 160:
YY_RULE_SETUP
#line 477 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return TI_STO;
	YY_BREAK
case 161:
YY_RULE_SETUP
#line 478 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return TI_STO;
	YY_BREAK
case 162:
YY_RULE_SETUP
#line 479 "input_lexer.ll"
index_status(yyextra)=0; if (xcas_mode(yyextra)==3){ (*yylval)=gen(at_sto,2); return TI_STO; } else return T_MAPSTO;
	YY_BREAK
case 163:
YY_RULE_SETUP
#line 480 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); if (python_compat(yyextra)<0) return T_MAPSTO; return TI_STO;
	YY_BREAK
case 164:
YY_RULE_SETUP
#line 481 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sto,2); return TI_STO;
	YY_BREAK
case 165:
YY_RULE_SETUP
#line 482 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_array_sto,2); return T_AFFECT;
	YY_BREAK
case 166:
YY_RULE_SETUP
#line 483 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_array_sto,2); return T_AFFECT;
	YY_BREAK
case 167:
YY_RULE_SETUP
#line 484 "input_lexer.ll"
index_status(yyextra)=1; yytext[0]='0'; (*yylval) = symb_double_deux_points(makevecteur(_IDNT_id_at,chartab2gen(yytext,yyextra))); return T_SYMBOL;
	YY_BREAK
case 168:
YY_RULE_SETUP
#line 485 "input_lexer.ll"
if (xcas_mode(yyextra)!=3) {index_status(yyextra)=0; (*yylval)=gen(at_compose,2); return T_COMPOSE; } BEGIN(comment_hash);
	YY_BREAK
case 169:
YY_RULE_SETUP
#line 486 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_composepow,2); return T_POW;
	YY_BREAK
case 170:
YY_RULE_SETUP
#line 487 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_composepow,2); return T_QUOTED_BINARY;
	YY_BREAK
case 171:
YY_RULE_SETUP
#line 488 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_composepow,2); return T_QUOTED_BINARY;
	YY_BREAK
case 172:
YY_RULE_SETUP
#line 489 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_compose,2); return T_QUOTED_BINARY;
	YY_BREAK
case 173:
YY_RULE_SETUP
#line 490 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_compose,2); return T_QUOTED_BINARY;
	YY_BREAK
case 174:
YY_RULE_SETUP
#line 491 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_AND_OP;
	YY_BREAK
case 175:
YY_RULE_SETUP
#line 492 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_AND_OP;
	YY_BREAK
case 176:
YY_RULE_SETUP
#line 493 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_AND_OP;
	YY_BREAK
case 177:
YY_RULE_SETUP
#line 494 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_AND_OP;
	YY_BREAK
case 178:
YY_RULE_SETUP
#line 495 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_QUOTED_BINARY;
	YY_BREAK
case 179:
YY_RULE_SETUP
#line 496 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_QUOTED_BINARY;
	YY_BREAK
case 180:
YY_RULE_SETUP
#line 497 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_and,2); return T_QUOTED_BINARY;
	YY_BREAK
case 181:
YY_RULE_SETUP
#line 498 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_tilocal,2); return T_PIPE;
	YY_BREAK
case 182:
YY_RULE_SETUP
#line 499 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_AND_OP;
	YY_BREAK
case 183:
YY_RULE_SETUP
#line 500 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_QUOTED_BINARY;
	YY_BREAK
case 184:
YY_RULE_SETUP
#line 501 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_QUOTED_BINARY;
	YY_BREAK
case 185:
YY_RULE_SETUP
#line 502 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_QUOTED_BINARY;
	YY_BREAK
case 186:
YY_RULE_SETUP
#line 503 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_AND_OP;
	YY_BREAK
case 187:
YY_RULE_SETUP
#line 504 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ou,2); return T_AND_OP;
	YY_BREAK
case 188:
YY_RULE_SETUP
#line 505 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_bitxor,2); return T_AND_OP;
	YY_BREAK
case 189:
YY_RULE_SETUP
#line 506 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xor,2); return T_AND_OP;
	YY_BREAK
case 190:
YY_RULE_SETUP
#line 507 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xor,2); return T_AND_OP;
	YY_BREAK
case 191:
YY_RULE_SETUP
#line 508 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xor,2); return T_QUOTED_BINARY;
	YY_BREAK
case 192:
YY_RULE_SETUP
#line 509 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xor,2); return T_QUOTED_BINARY;
	YY_BREAK
case 193:
YY_RULE_SETUP
#line 510 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xor,2); return T_AND_OP;
	YY_BREAK
case 194:
YY_RULE_SETUP
#line 511 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_union,2); return T_AND_OP;
	YY_BREAK
case 195:
YY_RULE_SETUP
#line 512 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_intersect,2); return T_AND_OP;
	YY_BREAK
case 196:
YY_RULE_SETUP
#line 513 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_symmetric_difference,2); return T_AND_OP;
	YY_BREAK
case 197:
YY_RULE_SETUP
#line 514 "input_lexer.ll"
if (index_status(yyextra)) { (*yylval)=gen(at_complement); return T_FACTORIAL; } else { index_status(yyextra)=0; (*yylval)=gen(at_complement,1); return T_NOT; }
	YY_BREAK
case 198:
YY_RULE_SETUP
#line 515 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_interval,2); return T_INTERVAL;
	YY_BREAK
case 199:
YY_RULE_SETUP
#line 516 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_leftopen_interval,2); return T_INTERVAL;
	YY_BREAK
case 200:
YY_RULE_SETUP
#line 517 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_rightopen_interval,2); return T_INTERVAL;
	YY_BREAK
case 201:
YY_RULE_SETUP
#line 518 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_leftrightopen_interval,2); return T_INTERVAL;
	YY_BREAK
case 202:
YY_RULE_SETUP
#line 519 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_interval,2); return T_UNARY_OP;
	YY_BREAK
case 203:
YY_RULE_SETUP
#line 520 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_limit,1); return T_UNARY_OP;
	YY_BREAK
case 204:
YY_RULE_SETUP
#line 521 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sort,1); return T_UNARY_OP;
	YY_BREAK
case 205:
YY_RULE_SETUP
#line 522 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_interval,2); return T_INTERVAL;
	YY_BREAK
case 206:
YY_RULE_SETUP
#line 523 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_interval,2); return T_QUOTED_BINARY;
	YY_BREAK
case 207:
YY_RULE_SETUP
#line 524 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_interval,2); return T_QUOTED_BINARY;
	YY_BREAK
case 208:
YY_RULE_SETUP
#line 525 "input_lexer.ll"
if (xcas_mode(yyextra) || index_status(yyextra)) { (*yylval)=gen(at_factorial); return T_FACTORIAL; } else { index_status(yyextra)=0; (*yylval)=gen(at_not,1); return T_NOT; }
	YY_BREAK
/* standard functions */
case 209:
YY_RULE_SETUP
#line 528 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=symbolic(at_Ans,0); return T_LITERAL;
	YY_BREAK
case 210:
YY_RULE_SETUP
#line 529 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_plus,2); return T_PLUS;
	YY_BREAK
case 211:
YY_RULE_SETUP
#line 530 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_increment,1); return T_FACTORIAL;
	YY_BREAK
case 212:
YY_RULE_SETUP
#line 531 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_increment,1); return T_UNION;
	YY_BREAK
case 213:
YY_RULE_SETUP
#line 532 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_increment,1); return T_UNION;
	YY_BREAK
case 214:
YY_RULE_SETUP
#line 533 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_powsto,1); return T_UNION;
	YY_BREAK
case 215:
YY_RULE_SETUP
#line 534 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_powsto,1); return T_UNION;
	YY_BREAK
case 216:
YY_RULE_SETUP
#line 535 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_decrement,1); return T_FACTORIAL;
	YY_BREAK
case 217:
YY_RULE_SETUP
#line 536 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_decrement,1); return T_UNION;
	YY_BREAK
case 218:
YY_RULE_SETUP
#line 537 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_decrement,1); return T_UNION;
	YY_BREAK
case 219:
YY_RULE_SETUP
#line 538 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pointplus,2); return T_PLUS;
	YY_BREAK
case 220:
YY_RULE_SETUP
#line 539 "input_lexer.ll"
index_status(yyextra)=0; if (python_compat(yyextra)) { (*yylval)=gen(at_bitand,2); return T_AND_OP; } else { *yylval=gen(at_plus,2); return T_PLUS; }
	YY_BREAK
case 221:
YY_RULE_SETUP
#line 540 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_bitnot,1); return T_NOT;
	YY_BREAK
case 222:
YY_RULE_SETUP
#line 541 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_sqrt,2); return T_NOT;
	YY_BREAK
case 223:
YY_RULE_SETUP
#line 542 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_polar_complex,2); return T_MOD;
	YY_BREAK
case 224:
YY_RULE_SETUP
#line 543 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=2; return T_SQ;
	YY_BREAK
case 225:
YY_RULE_SETUP
#line 544 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=3; return T_SQ;
	YY_BREAK
case 226:
YY_RULE_SETUP
#line 545 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=4; return T_SQ;
	YY_BREAK
case 227:
YY_RULE_SETUP
#line 546 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=5; return T_SQ;
	YY_BREAK
case 228:
YY_RULE_SETUP
#line 547 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=6; return T_SQ;
	YY_BREAK
case 229:
YY_RULE_SETUP
#line 548 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=7; return T_SQ;
	YY_BREAK
case 230:
YY_RULE_SETUP
#line 549 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=8; return T_SQ;
	YY_BREAK
case 231:
YY_RULE_SETUP
#line 550 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=9; return T_SQ;
	YY_BREAK
case 232:
YY_RULE_SETUP
#line 551 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=-1; return T_SQ;
	YY_BREAK
case 233:
YY_RULE_SETUP
#line 552 "input_lexer.ll"
index_status(yyextra)=1; (*yylval)=-1; return T_SQ;
	YY_BREAK
/* "','"                   index_status(yyextra)=0; (*yylval)=gen(at_makevector,2); return T_QUOTED_BINARY; commented because of f('a','b') */
case 234:
YY_RULE_SETUP
#line 554 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_plus,2); return T_QUOTED_BINARY;
	YY_BREAK
case 235:
YY_RULE_SETUP
#line 555 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_plus,2); return T_QUOTED_BINARY;
	YY_BREAK
case 236:
YY_RULE_SETUP
#line 556 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_binary_minus,2); return T_MOINS; // return (calc_mode(yyextra)==38)?T_MOINS38:T_MOINS;
	YY_BREAK
case 237:
YY_RULE_SETUP
#line 557 "input_lexer.ll"
index_status(yyextra)=0; if (calc_mode(yyextra)==38){ (*yylval)=gen(at_neg,2); return T_NEG38; } else { CERR << 1 << '\n'; (*yylval)=gen(at_binary_minus,2); return T_MOINS;}
	YY_BREAK
case 238:
YY_RULE_SETUP
#line 558 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pointminus,2); return T_PLUS;
	YY_BREAK
case 239:
YY_RULE_SETUP
#line 559 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_binary_minus,2); return T_QUOTED_BINARY;
	YY_BREAK
case 240:
YY_RULE_SETUP
#line 560 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_binary_minus,2); return T_QUOTED_BINARY;
	YY_BREAK
/* "×"                     index_status(yyextra)=0; (*yylval)=gen(at_prod,2); return T_FOIS;   */
/* "·"                     index_status(yyextra)=0; (*yylval)=gen(at_prod,2); return T_FOIS;   */
case 241:
YY_RULE_SETUP
#line 563 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_prod,2); return T_FOIS;
	YY_BREAK
case 242:
YY_RULE_SETUP
#line 564 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_cross,2); return T_FOIS;
	YY_BREAK
case 243:
YY_RULE_SETUP
#line 565 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_multcrement,1); return T_UNION;
	YY_BREAK
case 244:
YY_RULE_SETUP
#line 566 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_multcrement,1); return T_UNION;
	YY_BREAK
case 245:
YY_RULE_SETUP
#line 567 "input_lexer.ll"
index_status(yyextra)=0; if (abs_calc_mode(yyextra)==38){return T_DOUBLE_DEUX_POINTS; } else {(*yylval)=gen(at_struct_dot,2); return T_COMPOSE;}
	YY_BREAK
case 246:
YY_RULE_SETUP
#line 568 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ampersand_times,2); return T_FOIS;
	YY_BREAK
case 247:
YY_RULE_SETUP
#line 569 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_quote_pow,2); return T_POW;
	YY_BREAK
case 248:
YY_RULE_SETUP
#line 570 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pointprod,2); return T_FOIS;
	YY_BREAK
case 249:
YY_RULE_SETUP
#line 571 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_prod,2); return T_QUOTED_BINARY;
	YY_BREAK
case 250:
YY_RULE_SETUP
#line 572 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_prod,2); return T_QUOTED_BINARY;
	YY_BREAK
case 251:
YY_RULE_SETUP
#line 573 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_division,2); return T_DIV;
	YY_BREAK
/* "÷" index_status(yyextra)=0; (*yylval)=gen(at_division,2); return T_DIV; */
case 252:
YY_RULE_SETUP
#line 575 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_iquo,2); return T_DIV;
	YY_BREAK
case 253:
YY_RULE_SETUP
#line 576 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_irem,2); return T_DIV;
	YY_BREAK
case 254:
YY_RULE_SETUP
#line 577 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_iquosto,2); return T_UNION;
	YY_BREAK
case 255:
YY_RULE_SETUP
#line 578 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_iremsto,2); return T_UNION;
	YY_BREAK
case 256:
YY_RULE_SETUP
#line 579 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_andsto,2); return T_UNION;
	YY_BREAK
case 257:
YY_RULE_SETUP
#line 580 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_orsto,2); return T_UNION;
	YY_BREAK
case 258:
YY_RULE_SETUP
#line 581 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_xorsto,2); return T_UNION;
	YY_BREAK
case 259:
YY_RULE_SETUP
#line 582 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_shiftsto,2); return T_UNION;
	YY_BREAK
case 260:
YY_RULE_SETUP
#line 583 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_rotatesto,2); return T_UNION;
	YY_BREAK
case 261:
YY_RULE_SETUP
#line 584 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_divcrement,1); return T_DIV;
	YY_BREAK
case 262:
YY_RULE_SETUP
#line 585 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_divcrement,1); return T_UNION;
	YY_BREAK
case 263:
YY_RULE_SETUP
#line 586 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pointdivision,2); return T_DIV;
	YY_BREAK
case 264:
YY_RULE_SETUP
#line 587 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_division,2); return T_QUOTED_BINARY;
	YY_BREAK
case 265:
YY_RULE_SETUP
#line 588 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_division,2); return T_QUOTED_BINARY;
	YY_BREAK
case 266:
YY_RULE_SETUP
#line 589 "input_lexer.ll"
index_status(yyextra)=0; if (abs_calc_mode(yyextra)==38){ (*yylval)=gen(at_PERCENT); return T_UNARY_OP_38; } if (xcas_mode(yyextra)==3 || calc_mode(yyextra)==1) { (*yylval)=gen(at_pourcent); return T_FACTORIAL; } if (xcas_mode(yyextra)==1) { (*yylval)=symbolic(at_ans,vecteur(0)); return T_NUMBER; }  if (xcas_mode(yyextra) || python_compat(yyextra)) (*yylval)=gen(at_irem,2); else (*yylval)=0; return T_MOD;
	YY_BREAK
case 267:
YY_RULE_SETUP
#line 590 "input_lexer.ll"
index_status(yyextra)=0; if (xcas_mode(yyextra)==0){ (*yylval)=gen(at_iquorem,2); return T_MOD;} (*yylval)=symbolic(at_ans,-2); return T_NUMBER; 
	YY_BREAK
/* \xe2\x88\xa1             index_status(yyextra)=0; (*yylval)=gen(at_polar_complex,2); return T_MOD; */
case 268:
YY_RULE_SETUP
#line 592 "input_lexer.ll"
if (xcas_mode(yyextra)==0){ (*yylval)=gen(at_quorem,2); return T_MOD;} index_status(yyextra)=0; (*yylval)=symbolic(at_ans,-3); return T_NUMBER; 
	YY_BREAK
case 269:
YY_RULE_SETUP
#line 593 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_irem,2); return T_QUOTED_BINARY;
	YY_BREAK
case 270:
YY_RULE_SETUP
#line 594 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_equal2,2); return T_QUOTED_BINARY;
	YY_BREAK
case 271:
YY_RULE_SETUP
#line 595 "input_lexer.ll"
index_status(yyextra)=0; if (xcas_mode(yyextra)==3) { (*yylval)=gen(at_irem,2); return T_UNARY_OP; } else { if (xcas_mode(yyextra)) (*yylval)=gen(at_irem,2); else (*yylval)=0; return T_MOD; }
	YY_BREAK
case 272:
YY_RULE_SETUP
#line 596 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_irem,2); return T_QUOTED_BINARY;
	YY_BREAK
case 273:
YY_RULE_SETUP
#line 597 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_irem,2); return T_QUOTED_BINARY;
	YY_BREAK
/* "MOD"                   index_status(yyextra)=0; return T_MOD; */
case 274:
YY_RULE_SETUP
#line 599 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(python_compat(yyextra)==2?at_bitxor:at_pow,2); return T_POW;
	YY_BREAK
case 275:
YY_RULE_SETUP
#line 600 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_trn,1); return T_FACTORIAL;
	YY_BREAK
case 276:
YY_RULE_SETUP
#line 601 "input_lexer.ll"
(*yylval) = gen(at_pow,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 277:
YY_RULE_SETUP
#line 602 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pow,2); return T_POW;
	YY_BREAK
case 278:
YY_RULE_SETUP
#line 603 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pointpow,2); return T_POW;
	YY_BREAK
case 279:
YY_RULE_SETUP
#line 604 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pow,2); return T_QUOTED_BINARY;
	YY_BREAK
case 280:
YY_RULE_SETUP
#line 605 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_pow,2); return T_QUOTED_BINARY;
	YY_BREAK
case 281:
YY_RULE_SETUP
#line 606 "input_lexer.ll"
(*yylval) = gen(at_Digits,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 282:
YY_RULE_SETUP
#line 607 "input_lexer.ll"
(*yylval) = gen(at_HDigits,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 283:
YY_RULE_SETUP
#line 608 "input_lexer.ll"
(*yylval) = gen(at_HAngle,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 284:
YY_RULE_SETUP
#line 609 "input_lexer.ll"
(*yylval) = gen(at_HFormat,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 285:
YY_RULE_SETUP
#line 610 "input_lexer.ll"
(*yylval) = gen(at_HComplex,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 286:
YY_RULE_SETUP
#line 611 "input_lexer.ll"
(*yylval) = gen(at_HLanguage,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 287:
YY_RULE_SETUP
#line 612 "input_lexer.ll"
(*yylval) = gen(at_Digits,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 288:
YY_RULE_SETUP
#line 613 "input_lexer.ll"
(*yylval) = gen(at_threads,0) ; index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 289:
YY_RULE_SETUP
#line 614 "input_lexer.ll"
(*yylval) = gen(at_scientific_format,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 290:
YY_RULE_SETUP
#line 615 "input_lexer.ll"
(*yylval) = gen(at_angle_radian,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 291:
YY_RULE_SETUP
#line 616 "input_lexer.ll"
(*yylval) = gen(at_approx_mode,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 292:
YY_RULE_SETUP
#line 617 "input_lexer.ll"
(*yylval) = gen(at_all_trig_solutions,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 293:
YY_RULE_SETUP
#line 618 "input_lexer.ll"
(*yylval) = gen(at_increasing_power,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 294:
YY_RULE_SETUP
#line 619 "input_lexer.ll"
(*yylval) = gen(at_ntl_on,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 295:
YY_RULE_SETUP
#line 620 "input_lexer.ll"
(*yylval) = gen(at_complex_mode,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 296:
YY_RULE_SETUP
#line 621 "input_lexer.ll"
(*yylval) = gen(at_step_infolevel,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 297:
YY_RULE_SETUP
#line 622 "input_lexer.ll"
(*yylval) = gen(at_keep_algext,1); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 298:
YY_RULE_SETUP
#line 623 "input_lexer.ll"
(*yylval) = gen(at_complex_variables,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 299:
YY_RULE_SETUP
#line 624 "input_lexer.ll"
(*yylval) = gen(at_epsilon,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 300:
YY_RULE_SETUP
#line 625 "input_lexer.ll"
(*yylval) = gen(at_proba_epsilon,0); index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 301:
YY_RULE_SETUP
#line 627 "input_lexer.ll"
(*yylval) = gen(at_acos,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 302:
YY_RULE_SETUP
#line 628 "input_lexer.ll"
(*yylval) = gen(at_randNorm,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 303:
YY_RULE_SETUP
#line 629 "input_lexer.ll"
(*yylval) = gen(at_acosh,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 304:
YY_RULE_SETUP
#line 630 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_args,0); return T_QUOTED_BINARY;
	YY_BREAK
case 305:
YY_RULE_SETUP
#line 631 "input_lexer.ll"
(*yylval) = gen(at_asin,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 306:
YY_RULE_SETUP
#line 632 "input_lexer.ll"
(*yylval) = gen(at_asinh,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 307:
YY_RULE_SETUP
#line 633 "input_lexer.ll"
(*yylval) = gen(at_at,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 308:
YY_RULE_SETUP
#line 634 "input_lexer.ll"
(*yylval) = gen(at_atan,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 309:
YY_RULE_SETUP
#line 635 "input_lexer.ll"
(*yylval) = gen(at_atanh,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 310:
YY_RULE_SETUP
#line 636 "input_lexer.ll"
(*yylval) = gen(at_backquote,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 311:
YY_RULE_SETUP
#line 637 "input_lexer.ll"
(*yylval) = gen(at_bloc,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 312:
YY_RULE_SETUP
#line 638 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_break,0); return T_BREAK;
	YY_BREAK
case 313:
YY_RULE_SETUP
#line 639 "input_lexer.ll"
index_status(yyextra)=0; if (abs_calc_mode(yyextra)==38) return T_CASE38; else return T_CASE;
	YY_BREAK
case 314:
YY_RULE_SETUP
#line 640 "input_lexer.ll"
(*yylval) = gen(at_cont,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 315:
YY_RULE_SETUP
#line 641 "input_lexer.ll"
(*yylval) = gen(at_debug,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 316:
YY_RULE_SETUP
#line 642 "input_lexer.ll"
(*yylval) = gen(at_derive,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 317:
YY_RULE_SETUP
#line 643 "input_lexer.ll"
if (xcas_mode(yyextra)==1 || xcas_mode(yyextra)==2) { (*yylval) = gen(at_function_diff,1); index_status(yyextra)=1; return T_UNARY_OP;} else { index_status(yyextra)=1; return find_or_make_symbol(yytext,(*yylval),yyscanner,true,yyextra); }
	YY_BREAK
case 318:
YY_RULE_SETUP
#line 644 "input_lexer.ll"
if (xcas_mode(yyextra)==1 || xcas_mode(yyextra)==2 || parse_e(yyextra)) { (*yylval)=e__IDNT_e; }else (*yylval)=symbolic(at_exp,1); index_status(yyextra)=1; return T_NUMBER;
	YY_BREAK
case 319:
YY_RULE_SETUP
#line 645 "input_lexer.ll"
(*yylval)=symbolic(at_exp,1); index_status(yyextra)=1; return T_NUMBER;
	YY_BREAK
case 320:
YY_RULE_SETUP
#line 646 "input_lexer.ll"
(*yylval)=symbolic(at_exp,1); index_status(yyextra)=1; return T_NUMBER;
	YY_BREAK
case 321:
YY_RULE_SETUP
#line 647 "input_lexer.ll"
(*yylval) = gen(at_equal,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 322:
YY_RULE_SETUP
#line 648 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_throw,1); return T_RETURN;
	YY_BREAK
case 323:
YY_RULE_SETUP
#line 649 "input_lexer.ll"
(*yylval) = gen(at_erase,0); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 324:
YY_RULE_SETUP
#line 650 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_throw,1); return T_RETURN;
	YY_BREAK
case 325:
YY_RULE_SETUP
#line 651 "input_lexer.ll"
if (xcas_mode(yyextra)==3) (*yylval)=gen(at_partfrac); else (*yylval) = gen(at_expand,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 326:
YY_RULE_SETUP
#line 652 "input_lexer.ll"
(*yylval) = gen(at_insmod,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 327:
YY_RULE_SETUP
#line 653 "input_lexer.ll"
(*yylval) = gen(at_expand,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 328:
YY_RULE_SETUP
#line 654 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); return T_FOR;
	YY_BREAK
case 329:
YY_RULE_SETUP
#line 655 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); return T_FOR;
	YY_BREAK
case 330:
YY_RULE_SETUP
#line 656 "input_lexer.ll"
(*yylval) = gen(at_halt,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 331:
YY_RULE_SETUP
#line 657 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=4; return T_BLOC_END;
	YY_BREAK
case 332:
YY_RULE_SETUP
#line 658 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=9; return T_BLOC_END;
	YY_BREAK
case 333:
YY_RULE_SETUP
#line 659 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=3; return T_BLOC_END;
	YY_BREAK
case 334:
YY_RULE_SETUP
#line 660 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_IF;
	YY_BREAK
case 335:
YY_RULE_SETUP
#line 661 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); if (rpn_mode(yyextra)) return T_RPN_IF; return T_IF; 
	YY_BREAK
case 336:
YY_RULE_SETUP
#line 662 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_IFTE;
	YY_BREAK
case 337:
YY_RULE_SETUP
#line 663 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_when,3); return T_IFTE;
	YY_BREAK
case 338:
YY_RULE_SETUP
#line 664 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_QUOTED_BINARY;
	YY_BREAK
case 339:
YY_RULE_SETUP
#line 665 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_QUOTED_BINARY;
	YY_BREAK
case 340:
YY_RULE_SETUP
#line 666 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_QUOTED_BINARY;
	YY_BREAK
case 341:
YY_RULE_SETUP
#line 667 "input_lexer.ll"
if (xcas_mode(yyextra)==1) (*yylval) = gen(at_maple_ifactors); else (*yylval) = gen(at_ifactors,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 342:
YY_RULE_SETUP
#line 668 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_intersect,2); return T_QUOTED_BINARY;
	YY_BREAK
case 343:
YY_RULE_SETUP
#line 669 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_intersect,2); return T_QUOTED_BINARY;
	YY_BREAK
case 344:
YY_RULE_SETUP
#line 670 "input_lexer.ll"
(*yylval) = gen(at_kill,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 345:
YY_RULE_SETUP
#line 671 "input_lexer.ll"
(*yylval) = gen(at_log,1); index_status(yyextra)=1; return T_UNARY_OP; /* index_status(yyextra)=1 to accept log[] for a basis log */
	YY_BREAK
case 346:
YY_RULE_SETUP
#line 672 "input_lexer.ll"
(*yylval) = gen(at_asin,1); index_status(yyextra)=1; return T_UNARY_OP;
	YY_BREAK
case 347:
YY_RULE_SETUP
#line 673 "input_lexer.ll"
(*yylval) = gen(at_acos,1); index_status(yyextra)=1; return T_UNARY_OP;
	YY_BREAK
case 348:
YY_RULE_SETUP
#line 674 "input_lexer.ll"
(*yylval) = gen(at_atan,1); index_status(yyextra)=1; return T_UNARY_OP;
	YY_BREAK
case 349:
YY_RULE_SETUP
#line 675 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_minus,2); return T_QUOTED_BINARY;
	YY_BREAK
case 350:
YY_RULE_SETUP
#line 676 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_minus,2); return T_QUOTED_BINARY;
	YY_BREAK
case 351:
YY_RULE_SETUP
#line 677 "input_lexer.ll"
(*yylval) = gen(at_not,1); if (xcas_mode(yyextra) || python_compat(yyextra)) return T_NOT;  index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 352:
YY_RULE_SETUP
#line 678 "input_lexer.ll"
(*yylval) = gen(at_not,1); return T_NOT;  
	YY_BREAK
case 353:
YY_RULE_SETUP
#line 679 "input_lexer.ll"
(*yylval) = gen(at_not,1); return T_IN;  
	YY_BREAK
case 354:
YY_RULE_SETUP
#line 680 "input_lexer.ll"
(*yylval) = gen(at_neg,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 355:
YY_RULE_SETUP
#line 681 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_not,1); return T_QUOTED_BINARY;
	YY_BREAK
case 356:
YY_RULE_SETUP
#line 682 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_not,1); return T_QUOTED_BINARY;
	YY_BREAK
case 357:
YY_RULE_SETUP
#line 683 "input_lexer.ll"
(*yylval) = gen(at_greduce,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 358:
YY_RULE_SETUP
#line 684 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_of,2); return T_QUOTED_BINARY;
	YY_BREAK
case 359:
YY_RULE_SETUP
#line 685 "input_lexer.ll"
if (xcas_mode(yyextra)==1) (*yylval) = gen(at_maple_op,1); else (*yylval) = gen(at_feuille,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 360:
YY_RULE_SETUP
#line 686 "input_lexer.ll"
(*yylval) = gen(at_feuille,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 361:
YY_RULE_SETUP
#line 687 "input_lexer.ll"
(*yylval)=2; index_status(yyextra)=0; return T_LOCAL;
	YY_BREAK
case 362:
YY_RULE_SETUP
#line 688 "input_lexer.ll"
(*yylval) = gen(at_pcoeff,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 363:
YY_RULE_SETUP
#line 689 "input_lexer.ll"
(*yylval) = gen(at_funcplot,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 364:
YY_RULE_SETUP
#line 690 "input_lexer.ll"
(*yylval) = gen(at_user_operator,6); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 365:
YY_RULE_SETUP
#line 691 "input_lexer.ll"
if (rpn_mode(yyextra)) {(*yylval)=gen(at_purge,0); index_status(yyextra)=0; return T_RPN_OP;} else {(*yylval) = gen(at_purge,1); index_status(yyextra)=0; return T_UNARY_OP;};
	YY_BREAK
case 366:
YY_RULE_SETUP
#line 692 "input_lexer.ll"
if (rpn_mode(yyextra)) {(*yylval)=gen(at_purge,0); index_status(yyextra)=0; return T_RPN_OP;} else {(*yylval) = gen(at_purge,1); index_status(yyextra)=0; return T_UNARY_OP;};
	YY_BREAK
case 367:
YY_RULE_SETUP
#line 693 "input_lexer.ll"
if (rpn_mode(yyextra)) {(*yylval)=gen(at_purge,0); index_status(yyextra)=0; return T_RPN_OP;} else {(*yylval) = gen(at_purge,1); index_status(yyextra)=0; return T_UNARY_OP;};
	YY_BREAK
case 368:
YY_RULE_SETUP
#line 694 "input_lexer.ll"
(*yylval) = gen(at_srand,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 369:
YY_RULE_SETUP
#line 695 "input_lexer.ll"
(*yylval) = gen(at_for,1) ; index_status(yyextra)=0; return T_REPEAT;
	YY_BREAK
case 370:
YY_RULE_SETUP
#line 696 "input_lexer.ll"
(*yylval) = gen(at_for,1) ; index_status(yyextra)=0; return T_REPEAT;
	YY_BREAK
case 371:
YY_RULE_SETUP
#line 697 "input_lexer.ll"
(*yylval) = gen(at_for,1) ;index_status(yyextra)=0; return T_REPEAT;
	YY_BREAK
case 372:
YY_RULE_SETUP
#line 698 "input_lexer.ll"
(*yylval) = gen(at_return,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 373:
YY_RULE_SETUP
#line 699 "input_lexer.ll"
(*yylval) = gen(at_return,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 374:
YY_RULE_SETUP
#line 700 "input_lexer.ll"
(*yylval) = gen(at_return,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 375:
YY_RULE_SETUP
#line 701 "input_lexer.ll"
(*yylval) = gen(at_return,1) ; index_status(yyextra)=0; return T_QUOTED_BINARY;
	YY_BREAK
case 376:
YY_RULE_SETUP
#line 702 "input_lexer.ll"
(*yylval) = gen(at_maple_root,1); index_status(yyextra)=1; return T_UNARY_OP;
	YY_BREAK
case 377:
YY_RULE_SETUP
#line 703 "input_lexer.ll"
(*yylval) = gen(at_same,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 378:
YY_RULE_SETUP
#line 704 "input_lexer.ll"
(*yylval) = gen(at_sst,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 379:
YY_RULE_SETUP
#line 705 "input_lexer.ll"
(*yylval) = gen(at_sst_in,1); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 380:
YY_RULE_SETUP
#line 706 "input_lexer.ll"
if (xcas_mode(yyextra)==1) (*yylval) = gen(at_maple_subs,2); else (*yylval) = gen(at_subs,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 381:
YY_RULE_SETUP
#line 707 "input_lexer.ll"
if (xcas_mode(yyextra)==1) (*yylval) = gen(at_maple_subsop,2); else (*yylval) = gen(at_subsop,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 382:
YY_RULE_SETUP
#line 708 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_union,2); return T_QUOTED_BINARY;
	YY_BREAK
case 383:
YY_RULE_SETUP
#line 709 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_union,2); return T_QUOTED_BINARY;
	YY_BREAK
case 384:
YY_RULE_SETUP
#line 710 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_symmetric_difference,2); return T_QUOTED_BINARY;
	YY_BREAK
case 385:
YY_RULE_SETUP
#line 711 "input_lexer.ll"
(*yylval) = gen(at_virgule,2); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 386:
YY_RULE_SETUP
#line 712 "input_lexer.ll"
(*yylval) = gen(at_VARS,0); index_status(yyextra)=0; return T_UNARY_OP;
	YY_BREAK
case 387:
YY_RULE_SETUP
#line 713 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); if (xcas_mode(yyextra)==3) return TI_WHILE; if (xcas_mode(yyextra)!=0) return T_MUPMAP_WHILE; return T_WHILE;
	YY_BREAK
case 388:
YY_RULE_SETUP
#line 714 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); return T_MUPMAP_WHILE; /* return T_RPN_WHILE; */
	YY_BREAK
case 389:
YY_RULE_SETUP
#line 715 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); return T_DO; /* must be here for DO ... END loop */
	YY_BREAK
case 390:
YY_RULE_SETUP
#line 716 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,4); return T_DO; /* must be here for DO ... END loop */
	YY_BREAK
case 391:
YY_RULE_SETUP
#line 717 "input_lexer.ll"
(*yylval) = gen(at_Text,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 392:
YY_RULE_SETUP
#line 718 "input_lexer.ll"
(*yylval) = gen(at_DropDown,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 393:
YY_RULE_SETUP
#line 719 "input_lexer.ll"
(*yylval) = gen(at_Popup,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 394:
YY_RULE_SETUP
#line 720 "input_lexer.ll"
(*yylval) = gen(at_Request,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 395:
YY_RULE_SETUP
#line 721 "input_lexer.ll"
(*yylval) = gen(at_Title,1); index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 396:
YY_RULE_SETUP
#line 722 "input_lexer.ll"
(*yylval)=0; index_status(yyextra)=0; return TI_PRGM;
	YY_BREAK
case 397:
YY_RULE_SETUP
#line 723 "input_lexer.ll"
(*yylval)=0; index_status(yyextra)=0; return TI_PRGM;
	YY_BREAK
case 398:
YY_RULE_SETUP
#line 724 "input_lexer.ll"
(*yylval)=0; index_status(yyextra)=0; return TI_PRGM;
	YY_BREAK
case 399:
YY_RULE_SETUP
#line 725 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_ifte,3); return T_IF;
	YY_BREAK
case 400:
YY_RULE_SETUP
#line 726 "input_lexer.ll"
(*yylval) = gen(at_return,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 401:
YY_RULE_SETUP
#line 727 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_breakpoint,0); return T_BREAK;
	YY_BREAK
case 402:
YY_RULE_SETUP
#line 728 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,0); return TI_LOOP;
	YY_BREAK
case 403:
YY_RULE_SETUP
#line 729 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,0); return TI_FOR;
	YY_BREAK
case 404:
YY_RULE_SETUP
#line 730 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,0); return TI_WHILE;
	YY_BREAK
case 405:
YY_RULE_SETUP
#line 731 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_for,0); return T_CONTINUE;
	YY_BREAK
case 406:
YY_RULE_SETUP
#line 732 "input_lexer.ll"
(*yylval) = gen(at_print,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 407:
YY_RULE_SETUP
#line 733 "input_lexer.ll"
(*yylval) = gen(at_Pause,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 408:
YY_RULE_SETUP
#line 734 "input_lexer.ll"
(*yylval) = gen(at_label,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 409:
YY_RULE_SETUP
#line 735 "input_lexer.ll"
(*yylval) = gen(at_goto,1) ; index_status(yyextra)=0; return T_RETURN;
	YY_BREAK
case 410:
YY_RULE_SETUP
#line 736 "input_lexer.ll"
(*yylval) = gen(at_Dialog,1) ; index_status(yyextra)=0; return TI_DIALOG; 
	YY_BREAK
case 411:
YY_RULE_SETUP
#line 737 "input_lexer.ll"
(*yylval) = gen(at_Row,0) ; index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 412:
YY_RULE_SETUP
#line 738 "input_lexer.ll"
(*yylval) = gen(at_Col,0) ; index_status(yyextra)=0; return T_DIGITS;
	YY_BREAK
case 413:
YY_RULE_SETUP
#line 740 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_DELTALIST); return T_UNARY_OP_38; 
	YY_BREAK
case 414:
YY_RULE_SETUP
#line 741 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_PILIST); return T_UNARY_OP_38; 
	YY_BREAK
case 415:
YY_RULE_SETUP
#line 742 "input_lexer.ll"
index_status(yyextra)=0;(*yylval)=gen(at_HPSUM); return T_UNARY_OP_38; 
	YY_BREAK
case 416:
YY_RULE_SETUP
#line 743 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_SIGMALIST); return T_UNARY_OP_38;
	YY_BREAK
case 417:
YY_RULE_SETUP
#line 744 "input_lexer.ll"
index_status(yyextra)=0;(*yylval)=gen(at_HPDIFF); return T_UNARY_OP_38; 
	YY_BREAK
case 418:
YY_RULE_SETUP
#line 745 "input_lexer.ll"
index_status(yyextra)=0;(*yylval)=gen(at_HPINT); return T_UNARY_OP_38; 
	YY_BREAK
case 419:
YY_RULE_SETUP
#line 746 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_inferieur_egal,2); return T_TEST_EQUAL;
	YY_BREAK
case 420:
YY_RULE_SETUP
#line 747 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_different,2); return T_TEST_EQUAL;
	YY_BREAK
case 421:
YY_RULE_SETUP
#line 748 "input_lexer.ll"
index_status(yyextra)=0; (*yylval)=gen(at_superieur_egal,2); return T_TEST_EQUAL;
	YY_BREAK
case 422:
YY_RULE_SETUP
#line 749 "input_lexer.ll"
index_status(yyextra)=0;(*yylval)=gen(at_product); return T_UNARY_OP; 
	YY_BREAK
/* old format for physical constants
"_hbar_"        (*yylval) = symbolic(at_unit,makevecteur(1.05457266e-34,_J_unit*_s_unit)); index_status(yyextra)=0; return T_SYMBOL;
"_c_"        (*yylval) = symbolic(at_unit,makevecteur(299792458,_m_unit/_s_unit)); index_status(yyextra)=0; return T_SYMBOL;
"_g_"        (*yylval) = symbolic(at_unit,makevecteur(9.80665,_m_unit*unitpow(_s_unit,-2))); index_status(yyextra)=0; return T_SYMBOL;
"_IO_" (*yylval) = symbolic(at_unit,makevecteur(1e-12,_W_unit*unitpow(_m_unit,-2))); index_status(yyextra)=0; return T_SYMBOL; 
"_epsilonox_" (*yylval) = 3.9; index_status(yyextra)=0; return T_SYMBOL; 
"_epsilonsi_" (*yylval) = 11.9; index_status(yyextra)=0; return T_SYMBOL; 
"_qepsilon0_" (*yylval) = symbolic(at_unit,makevecteur(1.4185979e-30,_F_unit*_C_unit/_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_epsilon0q_" (*yylval) = symbolic(at_unit,makevecteur(55263469.6,_F_unit/(_m_unit*_C_unit))); index_status(yyextra)=0; return T_SYMBOL; 
"_kq_" (*yylval) = symbolic(at_unit,makevecteur(8.617386e-5,_J_unit/(_K_unit*_C_unit))); index_status(yyextra)=0; return T_SYMBOL; 
"_c3_" (*yylval) = symbolic(at_unit,makevecteur(.002897756,_m_unit*_K_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_lambdac_" (*yylval) = symbolic(at_unit,makevecteur( 0.00242631058e-9,_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_f0_" (*yylval) = symbolic(at_unit,makevecteur(2.4179883e14,_Hz_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_lambda0_" (*yylval) = symbolic(at_unit,makevecteur(1239.8425e-9,_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_muN_" (*yylval) = symbolic(at_unit,makevecteur(5.0507866e-27,_J_unit/_T_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_muB_" (*yylval) = symbolic(at_unit,makevecteur( 9.2740154e-24,_J_unit/_T_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_a0_" (*yylval) = symbolic(at_unit,makevecteur(.0529177249e-9,_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_Rinfinity_" (*yylval) = symbolic(at_unit,makevecteur(10973731.534,unitpow(_m_unit,-1))); index_status(yyextra)=0; return T_SYMBOL; 
"_Faraday_" (*yylval) = symbolic(at_unit,makevecteur(96485.309,_C_unit/_mol_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_phi_" (*yylval) = symbolic(at_unit,makevecteur(2.06783461e-15,_Wb_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_alpha_" (*yylval) = 7.29735308e-3; index_status(yyextra)=0; return T_SYMBOL; 
"_mpme_" (*yylval) = 1836.152701; index_status(yyextra)=0; return T_SYMBOL; 
"_mp_" (*yylval) = symbolic(at_unit,makevecteur(1.6726231e-27,_kg_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_qme_" (*yylval) = symbolic(at_unit,makevecteur(1.75881962e11,_C_unit/_kg_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_me_" (*yylval) = symbolic(at_unit,makevecteur(9.1093897e-31,_kg_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_qe_" (*yylval) = symbolic(at_unit,makevecteur(1.60217733e-19,_C_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_h_" (*yylval) = symbolic(at_unit,makevecteur(6.6260755e-34,_J_unit*_s_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_G_" (*yylval) = symbolic(at_unit,makevecteur(6.67408e-11,unitpow(_m_unit,3)*unitpow(_s_unit,-2)*unitpow(_kg_unit,-1))); index_status(yyextra)=0; return T_SYMBOL; 
"_mu0_" (*yylval) = symbolic(at_unit,makevecteur(1.25663706144e-6,_H_unit/_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_epsilon0_" (*yylval) = symbolic(at_unit,makevecteur(8.85418781761e-12,_F_unit/_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_sigma_" (*yylval) = symbolic(at_unit,makevecteur( 5.67051e-8,_W_unit*unitpow(_m_unit,-2)*unitpow(_K_unit,-4))); index_status(yyextra)=0; return T_SYMBOL; 
"_StdP_" (*yylval) = symbolic(at_unit,makevecteur(101325.0,_Pa_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_StdT_" (*yylval) = symbolic(at_unit,makevecteur(273.15,_K_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_R_" (*yylval) = symbolic(at_unit,makevecteur(8.31451,_J_unit/_molK_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_Vm_" (*yylval) = symbolic(at_unit,makevecteur(22.4141,_l_unit/_mol_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_k_" (*yylval) = symbolic(at_unit,makevecteur(1.380658e-23,_J_unit/_K_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_NA_" (*yylval) = symbolic(at_unit,makevecteur(6.0221367e23,unitpow(_mol_unit,-1))); index_status(yyextra)=0; return T_SYMBOL; 
"_mSun_" (*yylval) = symbolic(at_unit,makevecteur(1.989e30,_kg_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_RSun_" (*yylval) = symbolic(at_unit,makevecteur(6.955e8,_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_PSun_" (*yylval) = symbolic(at_unit,makevecteur(3.846e26,_W_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_mEarth_" (*yylval) = symbolic(at_unit,makevecteur(5.9736e24,_kg_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_REarth_" (*yylval) = symbolic(at_unit,makevecteur(6.371e6,_m_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_sd_" (*yylval) = symbolic(at_unit,makevecteur(8.61640905e4,_s_unit)); index_status(yyextra)=0; return T_SYMBOL; 
"_syr_" (*yylval) = symbolic(at_unit,makevecteur(3.15581498e7,_s_unit)); index_status(yyextra)=0; return T_SYMBOL; 
                        */
/* numbers, also accept DMS e.g 1°15′27″13 */
case 423:
#line 797 "input_lexer.ll"
case 424:
#line 798 "input_lexer.ll"
case 425:
#line 799 "input_lexer.ll"
case 426:
#line 800 "input_lexer.ll"
case 427:
#line 801 "input_lexer.ll"
case 428:
#line 802 "input_lexer.ll"
case 429:
#line 803 "input_lexer.ll"
case 430:
#line 804 "input_lexer.ll"
case 431:
#line 805 "input_lexer.ll"
case 432:
#line 806 "input_lexer.ll"
case 433:
#line 807 "input_lexer.ll"
case 434:
#line 808 "input_lexer.ll"
case 435:
#line 809 "input_lexer.ll"
case 436:
#line 810 "input_lexer.ll"
case 437:
#line 811 "input_lexer.ll"
case 438:
#line 812 "input_lexer.ll"
case 439:
#line 813 "input_lexer.ll"
case 440:
#line 814 "input_lexer.ll"
case 441:
#line 815 "input_lexer.ll"
case 442:
#line 816 "input_lexer.ll"
case 443:
#line 817 "input_lexer.ll"
case 444:
#line 818 "input_lexer.ll"
case 445:
#line 819 "input_lexer.ll"
case 446:
#line 820 "input_lexer.ll"
case 447:
YY_RULE_SETUP
#line 820 "input_lexer.ll"
{ 
  index_status(yyextra)=1;
  int l=strlen(yytext);
  int interv=0; // set to non-zero if ? in the number
  int dot=-1;
  for (int i=0;i<l;++i){
    if (yytext[i]=='?'){
      interv=i; // mark ? position and remove it from the string
      for (;i<l;++i){
	yytext[i]=yytext[i+1];
      }
      --l;
      break;
    }
    if (yytext[i]=='.')
      dot=i;
  }
  // CERR << yytext << " " << interv << '\n';
  if (dot>=0 && interv>1){
    --interv; // interv is the relative precision of the interval
    if (interv && dot>=1 && yytext[dot-1]=='0')
      --interv;
    ++dot;
    while (interv && dot<l && yytext[dot]=='0'){
      --interv; ++dot;
    }
  }
  char ch,ch2;
  if (l>2 && yytext[1]!='x' && (yytext[l-1]=='o' || yytext[l-1]=='b' || yytext[l-1]=='h') ){
    char base=yytext[l-1];
    for (int i=l-1;i>1;--i){
      yytext[i]=yytext[i-1];
    }
    if (base=='h')
      base='x';
    yytext[1]=base;
  }
  else {
    for (l=0;(ch=*(yytext+l));++l){
      if (ch=='x')
	break;
      if (ch=='e' || ch=='E'){
	if ( (ch2=*(yytext+l+1)) && (ch2=='e' || ch2=='E')){
	  ++l;
	  for (;(ch=*(yytext+l));++l)
	    *(yytext+l-1)=ch;
	  *(yytext+l-1)=0;
	  --l;
	}
      }
#ifndef BCD
      if ( (ch==-30 && *(yytext+l+1)==-128) || (ch==-62 && *(yytext+l+1)==-80) ){
	*yylval=0; return T_NUMBER;
      }
#endif
      if (ch==-30 && *(yytext+l+1)==-120 &&  *(yytext+l+2)==-110){
	l += 3;
	for (;(ch=*(yytext+l));++l)
	  *(yytext+l-2)=ch;
	*(yytext+l-2)=0;
	l -= 3;
	*(yytext+l)='-';
      }
    }
  }
  (*yylval) = chartab2gen(yytext,yyextra); 
  if (interv){
    double d=evalf_double(*yylval,1,context0)._DOUBLE_val;
    if (d<0 && interv>1)
      --interv;
    double tmp=std::floor(std::log(absdouble(d))/std::log(10.0));
    tmp=(std::pow(10.,1+tmp-interv));
    *yylval=eval(gen(makevecteur(d-tmp,d+tmp),_INTERVAL__VECT),1,context0);
  }
  return T_NUMBER; 
}
	YY_BREAK
/* UNITS 
"_"{A}{AN}* {
  std::pair<const char * const * const,const char * const * const> pp=equal_range(unitname_tab,unitname_tab_end,yytext,tri2);
  if (pp.first!=pp.second && pp.second!=unitname_tab_end){
    gen tmp=mksa_register_unit(*pp.first,unitptr_tab[pp.first-unitname_tab]);
    (*yylval)=tmp;
    index_status(yyextra)=0;
    return T_SYMBOL;
  }
  int res=find_or_make_symbol(yytext+1,(*yylval),yyscanner,false,yyextra);
 (*yylval)=symb_unit(1,(*yylval),yyextra);
 return res;
}
			*/
/* symbols */
case 448:
#line 913 "input_lexer.ll"
case 449:
YY_RULE_SETUP
#line 913 "input_lexer.ll"
{
 index_status(yyextra)=1;
 int res=find_or_make_symbol(yytext,(*yylval),yyscanner,true,yyextra);
 if (res==T_NUMBER)
   *yylval=(*yylval)(string2gen(unlocalize(yytext),false),yyextra);
 return res;
} 
	YY_BREAK
case 450:
YY_RULE_SETUP
#line 920 "input_lexer.ll"
if (!xcas_mode(yyextra) || xcas_mode(yyextra)==3) { 
  // CERR << "hash" << '\n';
  (*yylval)=gen(at_hash,1); return TI_HASH; 
} else BEGIN(comment_hash);
	YY_BREAK
case 451:
/* rule 451 can match eol */
YY_RULE_SETUP
#line 924 "input_lexer.ll"
BEGIN(INITIAL); index_status(yyextra)=0; increment_lexer_line_number_setcol(yyscanner,yyextra);  /* comment_s(yyextra)=string(yytext); (*yylval)=string2gen(comment_s(yyextra).substr(0,comment_s(yyextra).size()-1),false); return T_COMMENT; */
	YY_BREAK
/* everything else */
case 452:
YY_RULE_SETUP
#line 926 "input_lexer.ll"
(*yylval)=string2gen(string(yytext),false); return T_STRING;
	YY_BREAK
case 453:
YY_RULE_SETUP
#line 928 "input_lexer.ll"
ECHO;
	YY_BREAK
#line 4599 "input_lexer.cc"
case YY_STATE_EOF(INITIAL):
case YY_STATE_EOF(comment):
case YY_STATE_EOF(comment_hash):
case YY_STATE_EOF(str):
case YY_STATE_EOF(backquote):
	yyterminate();

	case YY_END_OF_BUFFER:
		{
		/* Amount of text matched not including the EOB char. */
		int yy_amount_of_matched_text = (int) (yy_cp - yyg->yytext_ptr) - 1;

		/* Undo the effects of YY_DO_BEFORE_ACTION. */
		*yy_cp = yyg->yy_hold_char;
		YY_RESTORE_YY_MORE_OFFSET

		if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
			{
			/* We're scanning a new file or input source.  It's
			 * possible that this happened because the user
			 * just pointed yyin at a new source and called
			 * yylex().  If so, then we have to assure
			 * consistency between YY_CURRENT_BUFFER and our
			 * globals.  Here is the right place to do so, because
			 * this is the first action (other than possibly a
			 * back-up) that will match for the new input source.
			 */
			yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
			YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin;
			YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
			}

		/* Note that here we test for yy_c_buf_p "<=" to the position
		 * of the first EOB in the buffer, since yy_c_buf_p will
		 * already have been incremented past the NUL character
		 * (since all states make transitions on EOB to the
		 * end-of-buffer state).  Contrast this with the test
		 * in input().
		 */
		if ( yyg->yy_c_buf_p <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] )
			{ /* This was really a NUL. */
			yy_state_type yy_next_state;

			yyg->yy_c_buf_p = yyg->yytext_ptr + yy_amount_of_matched_text;

			yy_current_state = yy_get_previous_state( yyscanner );

			/* Okay, we're now positioned to make the NUL
			 * transition.  We couldn't have
			 * yy_get_previous_state() go ahead and do it
			 * for us because it doesn't know how to deal
			 * with the possibility of jamming (and we don't
			 * want to build jamming into it because then it
			 * will run more slowly).
			 */

			yy_next_state = yy_try_NUL_trans( yy_current_state , yyscanner);

			yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;

			if ( yy_next_state )
				{
				/* Consume the NUL. */
				yy_cp = ++yyg->yy_c_buf_p;
				yy_current_state = yy_next_state;
				goto yy_match;
				}

			else
				{
				yy_cp = yyg->yy_c_buf_p;
				goto yy_find_action;
				}
			}

		else switch ( yy_get_next_buffer( yyscanner ) )
			{
			case EOB_ACT_END_OF_FILE:
				{
				yyg->yy_did_buffer_switch_on_eof = 0;

				if ( yywrap( yyscanner ) )
					{
					/* Note: because we've taken care in
					 * yy_get_next_buffer() to have set up
					 * yytext, we can now set up
					 * yy_c_buf_p so that if some total
					 * hoser (like flex itself) wants to
					 * call the scanner after we return the
					 * YY_NULL, it'll still work - another
					 * YY_NULL will get returned.
					 */
					yyg->yy_c_buf_p = yyg->yytext_ptr + YY_MORE_ADJ;

					yy_act = YY_STATE_EOF(YY_START);
					goto do_action;
					}

				else
					{
					if ( ! yyg->yy_did_buffer_switch_on_eof )
						YY_NEW_FILE;
					}
				break;
				}

			case EOB_ACT_CONTINUE_SCAN:
				yyg->yy_c_buf_p =
					yyg->yytext_ptr + yy_amount_of_matched_text;

				yy_current_state = yy_get_previous_state( yyscanner );

				yy_cp = yyg->yy_c_buf_p;
				yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;
				goto yy_match;

			case EOB_ACT_LAST_MATCH:
				yyg->yy_c_buf_p =
				&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars];

				yy_current_state = yy_get_previous_state( yyscanner );

				yy_cp = yyg->yy_c_buf_p;
				yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;
				goto yy_find_action;
			}
		break;
		}

	default:
		YY_FATAL_ERROR(
			"fatal flex scanner internal error--no action found" );
	} /* end of action switch */
		} /* end of scanning one token */
	} /* end of user's declarations */
} /* end of yylex */

/* yy_get_next_buffer - try to read in a new buffer
 *
 * Returns a code representing an action:
 *	EOB_ACT_LAST_MATCH -
 *	EOB_ACT_CONTINUE_SCAN - continue scanning from current position
 *	EOB_ACT_END_OF_FILE - end of file
 */
static int yy_get_next_buffer (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
	char *source = yyg->yytext_ptr;
	int number_to_move, i;
	int ret_val;

	if ( yyg->yy_c_buf_p > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars + 1] )
		YY_FATAL_ERROR(
		"fatal flex scanner internal error--end of buffer missed" );

	if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
		{ /* Don't try to fill the buffer, so this is an EOF. */
		if ( yyg->yy_c_buf_p - yyg->yytext_ptr - YY_MORE_ADJ == 1 )
			{
			/* We matched a single character, the EOB, so
			 * treat this as a final EOF.
			 */
			return EOB_ACT_END_OF_FILE;
			}

		else
			{
			/* We matched some text prior to the EOB, first
			 * process it.
			 */
			return EOB_ACT_LAST_MATCH;
			}
		}

	/* Try to read more data. */

	/* First move last chars to start of buffer. */
	number_to_move = (int) (yyg->yy_c_buf_p - yyg->yytext_ptr - 1);

	for ( i = 0; i < number_to_move; ++i )
		*(dest++) = *(source++);

	if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
		/* don't do the read, it's not guaranteed to return an EOF,
		 * just force an EOF
		 */
		YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars = 0;

	else
		{
			int num_to_read =
			YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;

		while ( num_to_read <= 0 )
			{ /* Not enough room in the buffer - grow it. */

			/* just a shorter name for the current buffer */
			YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE;

			int yy_c_buf_p_offset =
				(int) (yyg->yy_c_buf_p - b->yy_ch_buf);

			if ( b->yy_is_our_buffer )
				{
				int new_size = b->yy_buf_size * 2;

				if ( new_size <= 0 )
					b->yy_buf_size += b->yy_buf_size / 8;
				else
					b->yy_buf_size *= 2;

				b->yy_ch_buf = (char *)
					/* Include room in for 2 EOB chars. */
					yyrealloc( (void *) b->yy_ch_buf,
							 (yy_size_t) (b->yy_buf_size + 2) , yyscanner );
				}
			else
				/* Can't grow it, we don't own it. */
				b->yy_ch_buf = NULL;

			if ( ! b->yy_ch_buf )
				YY_FATAL_ERROR(
				"fatal error - scanner input buffer overflow" );

			yyg->yy_c_buf_p = &b->yy_ch_buf[yy_c_buf_p_offset];

			num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
						number_to_move - 1;

			}

		if ( num_to_read > YY_READ_BUF_SIZE )
			num_to_read = YY_READ_BUF_SIZE;

		/* Read in more data. */
		YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
			yyg->yy_n_chars, num_to_read );

		YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars;
		}

	if ( yyg->yy_n_chars == 0 )
		{
		if ( number_to_move == YY_MORE_ADJ )
			{
			ret_val = EOB_ACT_END_OF_FILE;
			yyrestart( yyin  , yyscanner);
			}

		else
			{
			ret_val = EOB_ACT_LAST_MATCH;
			YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
				YY_BUFFER_EOF_PENDING;
			}
		}

	else
		ret_val = EOB_ACT_CONTINUE_SCAN;

	if ((yyg->yy_n_chars + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
		/* Extend the array by 50%, plus the number we really need. */
		int new_size = yyg->yy_n_chars + number_to_move + (yyg->yy_n_chars >> 1);
		YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc(
			(void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf, (yy_size_t) new_size , yyscanner );
		if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
			YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
		/* "- 2" to take care of EOB's */
		YY_CURRENT_BUFFER_LVALUE->yy_buf_size = (int) (new_size - 2);
	}

	yyg->yy_n_chars += number_to_move;
	YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] = YY_END_OF_BUFFER_CHAR;
	YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars + 1] = YY_END_OF_BUFFER_CHAR;

	yyg->yytext_ptr = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];

	return ret_val;
}

/* yy_get_previous_state - get the state just before the EOB char was reached */

    static yy_state_type yy_get_previous_state (yyscan_t yyscanner)
{
	yy_state_type yy_current_state;
	char *yy_cp;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	yy_current_state = yyg->yy_start;

	for ( yy_cp = yyg->yytext_ptr + YY_MORE_ADJ; yy_cp < yyg->yy_c_buf_p; ++yy_cp )
		{
		YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
		if ( yy_accept[yy_current_state] )
			{
			yyg->yy_last_accepting_state = yy_current_state;
			yyg->yy_last_accepting_cpos = yy_cp;
			}
		while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
			{
			yy_current_state = (int) yy_def[yy_current_state];
			if ( yy_current_state >= 1428 )
				yy_c = yy_meta[yy_c];
			}
		yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
		}

	return yy_current_state;
}

/* yy_try_NUL_trans - try to make a transition on the NUL character
 *
 * synopsis
 *	next_state = yy_try_NUL_trans( current_state );
 */
    static yy_state_type yy_try_NUL_trans  (yy_state_type yy_current_state , yyscan_t yyscanner)
{
	int yy_is_jam;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; /* This var may be unused depending upon options. */
	char *yy_cp = yyg->yy_c_buf_p;

	YY_CHAR yy_c = 1;
	if ( yy_accept[yy_current_state] )
		{
		yyg->yy_last_accepting_state = yy_current_state;
		yyg->yy_last_accepting_cpos = yy_cp;
		}
	while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
		{
		yy_current_state = (int) yy_def[yy_current_state];
		if ( yy_current_state >= 1428 )
			yy_c = yy_meta[yy_c];
		}
	yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
	yy_is_jam = (yy_current_state == 1427);

	(void)yyg;
	return yy_is_jam ? 0 : yy_current_state;
}

#ifndef YY_NO_UNPUT

    static void yyunput (int c, char * yy_bp , yyscan_t yyscanner)
{
	char *yy_cp;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

    yy_cp = yyg->yy_c_buf_p;

	/* undo effects of setting up yytext */
	*yy_cp = yyg->yy_hold_char;

	if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
		{ /* need to shift things up to make room */
		/* +2 for EOB chars. */
		int number_to_move = yyg->yy_n_chars + 2;
		char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[
					YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2];
		char *source =
				&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move];

		while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
			*--dest = *--source;

		yy_cp += (int) (dest - source);
		yy_bp += (int) (dest - source);
		YY_CURRENT_BUFFER_LVALUE->yy_n_chars =
			yyg->yy_n_chars = (int) YY_CURRENT_BUFFER_LVALUE->yy_buf_size;

		if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
			YY_FATAL_ERROR( "flex scanner push-back overflow" );
		}

	*--yy_cp = (char) c;

	yyg->yytext_ptr = yy_bp;
	yyg->yy_hold_char = *yy_cp;
	yyg->yy_c_buf_p = yy_cp;
}

#endif

#ifndef YY_NO_INPUT
#ifdef __cplusplus
    static int yyinput (yyscan_t yyscanner)
#else
    static int input  (yyscan_t yyscanner)
#endif

{
	int c;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	*yyg->yy_c_buf_p = yyg->yy_hold_char;

	if ( *yyg->yy_c_buf_p == YY_END_OF_BUFFER_CHAR )
		{
		/* yy_c_buf_p now points to the character we want to return.
		 * If this occurs *before* the EOB characters, then it's a
		 * valid NUL; if not, then we've hit the end of the buffer.
		 */
		if ( yyg->yy_c_buf_p < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] )
			/* This was really a NUL. */
			*yyg->yy_c_buf_p = '\0';

		else
			{ /* need more input */
			int offset = (int) (yyg->yy_c_buf_p - yyg->yytext_ptr);
			++yyg->yy_c_buf_p;

			switch ( yy_get_next_buffer( yyscanner ) )
				{
				case EOB_ACT_LAST_MATCH:
					/* This happens because yy_g_n_b()
					 * sees that we've accumulated a
					 * token and flags that we need to
					 * try matching the token before
					 * proceeding.  But for input(),
					 * there's no matching to consider.
					 * So convert the EOB_ACT_LAST_MATCH
					 * to EOB_ACT_END_OF_FILE.
					 */

					/* Reset buffer status. */
					yyrestart( yyin , yyscanner);

					/*FALLTHROUGH*/

				case EOB_ACT_END_OF_FILE:
					{
					if ( yywrap( yyscanner ) )
						return 0;

					if ( ! yyg->yy_did_buffer_switch_on_eof )
						YY_NEW_FILE;
#ifdef __cplusplus
					return yyinput(yyscanner);
#else
					return input(yyscanner);
#endif
					}

				case EOB_ACT_CONTINUE_SCAN:
					yyg->yy_c_buf_p = yyg->yytext_ptr + offset;
					break;
				}
			}
		}

	c = *(unsigned char *) yyg->yy_c_buf_p;	/* cast for 8-bit char's */
	*yyg->yy_c_buf_p = '\0';	/* preserve yytext */
	yyg->yy_hold_char = *++yyg->yy_c_buf_p;

	return c;
}
#endif	/* ifndef YY_NO_INPUT */

/** Immediately switch to a different input stream.
 * @param input_file A readable stream.
 * @param yyscanner The scanner object.
 * @note This function does not reset the start condition to @c INITIAL .
 */
    void yyrestart  (FILE * input_file , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	if ( ! YY_CURRENT_BUFFER ){
        yyensure_buffer_stack (yyscanner);
		YY_CURRENT_BUFFER_LVALUE =
            yy_create_buffer( yyin, YY_BUF_SIZE , yyscanner);
	}

	yy_init_buffer( YY_CURRENT_BUFFER, input_file , yyscanner);
	yy_load_buffer_state( yyscanner );
}

/** Switch to a different input buffer.
 * @param new_buffer The new input buffer.
 * @param yyscanner The scanner object.
 */
    void yy_switch_to_buffer  (YY_BUFFER_STATE  new_buffer , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	/* TODO. We should be able to replace this entire function body
	 * with
	 *		yypop_buffer_state();
	 *		yypush_buffer_state(new_buffer);
     */
	yyensure_buffer_stack (yyscanner);
	if ( YY_CURRENT_BUFFER == new_buffer )
		return;

	if ( YY_CURRENT_BUFFER )
		{
		/* Flush out information for old buffer. */
		*yyg->yy_c_buf_p = yyg->yy_hold_char;
		YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = yyg->yy_c_buf_p;
		YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars;
		}

	YY_CURRENT_BUFFER_LVALUE = new_buffer;
	yy_load_buffer_state( yyscanner );

	/* We don't actually know whether we did this switch during
	 * EOF (yywrap()) processing, but the only time this flag
	 * is looked at is after yywrap() is called, so it's safe
	 * to go ahead and always set it.
	 */
	yyg->yy_did_buffer_switch_on_eof = 1;
}

static void yy_load_buffer_state  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
	yyg->yytext_ptr = yyg->yy_c_buf_p = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
	yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
	yyg->yy_hold_char = *yyg->yy_c_buf_p;
}

/** Allocate and initialize an input buffer state.
 * @param file A readable stream.
 * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
 * @param yyscanner The scanner object.
 * @return the allocated buffer state.
 */
    YY_BUFFER_STATE yy_create_buffer  (FILE * file, int  size , yyscan_t yyscanner)
{
	YY_BUFFER_STATE b;
    
	b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) , yyscanner );
	if ( ! b )
		YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );

	b->yy_buf_size = size;

	/* yy_ch_buf has to be 2 characters longer than the size given because
	 * we need to put in 2 end-of-buffer characters.
	 */
	b->yy_ch_buf = (char *) yyalloc( (yy_size_t) (b->yy_buf_size + 2) , yyscanner );
	if ( ! b->yy_ch_buf )
		YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );

	b->yy_is_our_buffer = 1;

	yy_init_buffer( b, file , yyscanner);

	return b;
}

/** Destroy the buffer.
 * @param b a buffer created with yy_create_buffer()
 * @param yyscanner The scanner object.
 */
    void yy_delete_buffer (YY_BUFFER_STATE  b , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	if ( ! b )
		return;

	if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
		YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;

	if ( b->yy_is_our_buffer )
		yyfree( (void *) b->yy_ch_buf , yyscanner );

	yyfree( (void *) b , yyscanner );
}

/* Initializes or reinitializes a buffer.
 * This function is sometimes called more than once on the same buffer,
 * such as during a yyrestart() or at EOF.
 */
    static void yy_init_buffer  (YY_BUFFER_STATE  b, FILE * file , yyscan_t yyscanner)

{
	int oerrno = errno;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	yy_flush_buffer( b , yyscanner);

	b->yy_input_file = file;
	b->yy_fill_buffer = 1;

    /* If b is the current buffer, then yy_init_buffer was _probably_
     * called from yyrestart() or through yy_get_next_buffer.
     * In that case, we don't want to reset the lineno or column.
     */
    if (b != YY_CURRENT_BUFFER){
        b->yy_bs_lineno = 1;
        b->yy_bs_column = 0;
    }

        b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
    
	errno = oerrno;
}

/** Discard all buffered characters. On the next scan, YY_INPUT will be called.
 * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
 * @param yyscanner The scanner object.
 */
    void yy_flush_buffer (YY_BUFFER_STATE  b , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	if ( ! b )
		return;

	b->yy_n_chars = 0;

	/* We always need two end-of-buffer characters.  The first causes
	 * a transition to the end-of-buffer state.  The second causes
	 * a jam in that state.
	 */
	b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
	b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;

	b->yy_buf_pos = &b->yy_ch_buf[0];

	b->yy_at_bol = 1;
	b->yy_buffer_status = YY_BUFFER_NEW;

	if ( b == YY_CURRENT_BUFFER )
		yy_load_buffer_state( yyscanner );
}

/** Pushes the new state onto the stack. The new state becomes
 *  the current state. This function will allocate the stack
 *  if necessary.
 *  @param new_buffer The new state.
 *  @param yyscanner The scanner object.
 */
void yypush_buffer_state (YY_BUFFER_STATE new_buffer , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	if (new_buffer == NULL)
		return;

	yyensure_buffer_stack(yyscanner);

	/* This block is copied from yy_switch_to_buffer. */
	if ( YY_CURRENT_BUFFER )
		{
		/* Flush out information for old buffer. */
		*yyg->yy_c_buf_p = yyg->yy_hold_char;
		YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = yyg->yy_c_buf_p;
		YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars;
		}

	/* Only push if top exists. Otherwise, replace top. */
	if (YY_CURRENT_BUFFER)
		yyg->yy_buffer_stack_top++;
	YY_CURRENT_BUFFER_LVALUE = new_buffer;

	/* copied from yy_switch_to_buffer. */
	yy_load_buffer_state( yyscanner );
	yyg->yy_did_buffer_switch_on_eof = 1;
}

/** Removes and deletes the top of the stack, if present.
 *  The next element becomes the new top.
 *  @param yyscanner The scanner object.
 */
void yypop_buffer_state (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	if (!YY_CURRENT_BUFFER)
		return;

	yy_delete_buffer(YY_CURRENT_BUFFER , yyscanner);
	YY_CURRENT_BUFFER_LVALUE = NULL;
	if (yyg->yy_buffer_stack_top > 0)
		--yyg->yy_buffer_stack_top;

	if (YY_CURRENT_BUFFER) {
		yy_load_buffer_state( yyscanner );
		yyg->yy_did_buffer_switch_on_eof = 1;
	}
}

/* Allocates the stack if it does not exist.
 *  Guarantees space for at least one push.
 */
static void yyensure_buffer_stack (yyscan_t yyscanner)
{
	yy_size_t num_to_alloc;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

	if (!yyg->yy_buffer_stack) {

		/* First allocation is just for 2 elements, since we don't know if this
		 * scanner will even need a stack. We use 2 instead of 1 to avoid an
		 * immediate realloc on the next call.
         */
      num_to_alloc = 1; /* After all that talk, this was set to 1 anyways... */
		yyg->yy_buffer_stack = (struct yy_buffer_state**)yyalloc
								(num_to_alloc * sizeof(struct yy_buffer_state*)
								, yyscanner);
		if ( ! yyg->yy_buffer_stack )
			YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );

		memset(yyg->yy_buffer_stack, 0, num_to_alloc * sizeof(struct yy_buffer_state*));

		yyg->yy_buffer_stack_max = num_to_alloc;
		yyg->yy_buffer_stack_top = 0;
		return;
	}

	if (yyg->yy_buffer_stack_top >= (yyg->yy_buffer_stack_max) - 1){

		/* Increase the buffer to prepare for a possible push. */
		yy_size_t grow_size = 8 /* arbitrary grow size */;

		num_to_alloc = yyg->yy_buffer_stack_max + grow_size;
		yyg->yy_buffer_stack = (struct yy_buffer_state**)yyrealloc
								(yyg->yy_buffer_stack,
								num_to_alloc * sizeof(struct yy_buffer_state*)
								, yyscanner);
		if ( ! yyg->yy_buffer_stack )
			YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );

		/* zero only the new slots.*/
		memset(yyg->yy_buffer_stack + yyg->yy_buffer_stack_max, 0, grow_size * sizeof(struct yy_buffer_state*));
		yyg->yy_buffer_stack_max = num_to_alloc;
	}
}

/** Setup the input buffer state to scan directly from a user-specified character buffer.
 * @param base the character buffer
 * @param size the size in bytes of the character buffer
 * @param yyscanner The scanner object.
 * @return the newly allocated buffer state object.
 */
YY_BUFFER_STATE yy_scan_buffer  (char * base, yy_size_t  size , yyscan_t yyscanner)
{
	YY_BUFFER_STATE b;
    
	if ( size < 2 ||
	     base[size-2] != YY_END_OF_BUFFER_CHAR ||
	     base[size-1] != YY_END_OF_BUFFER_CHAR )
		/* They forgot to leave room for the EOB's. */
		return NULL;

	b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) , yyscanner );
	if ( ! b )
		YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" );

	b->yy_buf_size = (int) (size - 2);	/* "- 2" to take care of EOB's */
	b->yy_buf_pos = b->yy_ch_buf = base;
	b->yy_is_our_buffer = 0;
	b->yy_input_file = NULL;
	b->yy_n_chars = b->yy_buf_size;
	b->yy_is_interactive = 0;
	b->yy_at_bol = 1;
	b->yy_fill_buffer = 0;
	b->yy_buffer_status = YY_BUFFER_NEW;

	yy_switch_to_buffer( b , yyscanner );

	return b;
}

/** Setup the input buffer state to scan a string. The next call to yylex() will
 * scan from a @e copy of @a str.
 * @param yystr a NUL-terminated string to scan
 * @param yyscanner The scanner object.
 * @return the newly allocated buffer state object.
 * @note If you want to scan bytes that may contain NUL values, then use
 *       yy_scan_bytes() instead.
 */
YY_BUFFER_STATE yy_scan_string (const char * yystr , yyscan_t yyscanner)
{
    
	return yy_scan_bytes( yystr, (int) strlen(yystr) , yyscanner);
}

/** Setup the input buffer state to scan the given bytes. The next call to yylex() will
 * scan from a @e copy of @a bytes.
 * @param yybytes the byte buffer to scan
 * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
 * @param yyscanner The scanner object.
 * @return the newly allocated buffer state object.
 */
YY_BUFFER_STATE yy_scan_bytes  (const char * yybytes, int  _yybytes_len , yyscan_t yyscanner)
{
	YY_BUFFER_STATE b;
	char *buf;
	yy_size_t n;
	int i;
    
	/* Get memory for full buffer, including space for trailing EOB's. */
	n = (yy_size_t) (_yybytes_len + 2);
	buf = (char *) yyalloc( n , yyscanner );
	if ( ! buf )
		YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" );

	for ( i = 0; i < _yybytes_len; ++i )
		buf[i] = yybytes[i];

	buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;

	b = yy_scan_buffer( buf, n , yyscanner);
	if ( ! b )
		YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" );

	/* It's okay to grow etc. this buffer, and we should throw it
	 * away when we're done.
	 */
	b->yy_is_our_buffer = 1;

	return b;
}

#ifndef YY_EXIT_FAILURE
#define YY_EXIT_FAILURE 2
#endif

static void yynoreturn yy_fatal_error (const char* msg , yyscan_t yyscanner)
{
	struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	(void)yyg;
	fprintf( stderr, "%s\n", msg );
	exit( YY_EXIT_FAILURE );
}

/* Redefine yyless() so it works in section 3 code. */

#undef yyless
#define yyless(n) \
	do \
		{ \
		/* Undo effects of setting up yytext. */ \
        int yyless_macro_arg = (n); \
        YY_LESS_LINENO(yyless_macro_arg);\
		yytext[yyleng] = yyg->yy_hold_char; \
		yyg->yy_c_buf_p = yytext + yyless_macro_arg; \
		yyg->yy_hold_char = *yyg->yy_c_buf_p; \
		*yyg->yy_c_buf_p = '\0'; \
		yyleng = yyless_macro_arg; \
		} \
	while ( 0 )

/* Accessor  methods (get/set functions) to struct members. */

/** Get the user-defined data for this scanner.
 * @param yyscanner The scanner object.
 */
YY_EXTRA_TYPE yyget_extra  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yyextra;
}

/** Get the current line number.
 * @param yyscanner The scanner object.
 */
int yyget_lineno  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

        if (! YY_CURRENT_BUFFER)
            return 0;
    
    return yylineno;
}

/** Get the current column number.
 * @param yyscanner The scanner object.
 */
int yyget_column  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

        if (! YY_CURRENT_BUFFER)
            return 0;
    
    return yycolumn;
}

/** Get the input stream.
 * @param yyscanner The scanner object.
 */
FILE *yyget_in  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yyin;
}

/** Get the output stream.
 * @param yyscanner The scanner object.
 */
FILE *yyget_out  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yyout;
}

/** Get the length of the current token.
 * @param yyscanner The scanner object.
 */
int yyget_leng  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yyleng;
}

/** Get the current token.
 * @param yyscanner The scanner object.
 */

char *yyget_text  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yytext;
}

/** Set the user-defined data. This data is never touched by the scanner.
 * @param user_defined The data to be associated with this scanner.
 * @param yyscanner The scanner object.
 */
void yyset_extra (YY_EXTRA_TYPE  user_defined , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    yyextra = user_defined ;
}

/** Set the current line number.
 * @param _line_number line number
 * @param yyscanner The scanner object.
 */
void yyset_lineno (int  _line_number , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

        /* lineno is only valid if an input buffer exists. */
        if (! YY_CURRENT_BUFFER )
           YY_FATAL_ERROR( "yyset_lineno called with no buffer" );
    
    yylineno = _line_number;
}

/** Set the current column.
 * @param _column_no column number
 * @param yyscanner The scanner object.
 */
void yyset_column (int  _column_no , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

        /* column is only valid if an input buffer exists. */
        if (! YY_CURRENT_BUFFER )
           YY_FATAL_ERROR( "yyset_column called with no buffer" );
    
    yycolumn = _column_no;
}

/** Set the input stream. This does not discard the current
 * input buffer.
 * @param _in_str A readable stream.
 * @param yyscanner The scanner object.
 * @see yy_switch_to_buffer
 */
void yyset_in (FILE *  _in_str , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    yyin = _in_str ;
}

void yyset_out (FILE *  _out_str , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    yyout = _out_str ;
}

int yyget_debug  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yy_flex_debug;
}

void yyset_debug (int  _bdebug , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    yy_flex_debug = _bdebug ;
}

/* Accessor methods for yylval and yylloc */

YYSTYPE * yyget_lval  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    return yylval;
}

void yyset_lval (YYSTYPE *  yylval_param , yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    yylval = yylval_param;
}

/* User-visible API */

/* yylex_init is special because it creates the scanner itself, so it is
 * the ONLY reentrant function that doesn't take the scanner as the last argument.
 * That's why we explicitly handle the declaration, instead of using our macros.
 */
int yylex_init(yyscan_t* ptr_yy_globals)
{
    if (ptr_yy_globals == NULL){
        errno = EINVAL;
        return 1;
    }

    *ptr_yy_globals = (yyscan_t) yyalloc ( sizeof( struct yyguts_t ), NULL );

    if (*ptr_yy_globals == NULL){
        errno = ENOMEM;
        return 1;
    }

    /* By setting to 0xAA, we expose bugs in yy_init_globals. Leave at 0x00 for releases. */
    memset(*ptr_yy_globals,0x00,sizeof(struct yyguts_t));

    return yy_init_globals ( *ptr_yy_globals );
}

/* yylex_init_extra has the same functionality as yylex_init, but follows the
 * convention of taking the scanner as the last argument. Note however, that
 * this is a *pointer* to a scanner, as it will be allocated by this call (and
 * is the reason, too, why this function also must handle its own declaration).
 * The user defined value in the first argument will be available to yyalloc in
 * the yyextra field.
 */
int yylex_init_extra( YY_EXTRA_TYPE yy_user_defined, yyscan_t* ptr_yy_globals )
{
    struct yyguts_t dummy_yyguts;

    yyset_extra (yy_user_defined, &dummy_yyguts);

    if (ptr_yy_globals == NULL){
        errno = EINVAL;
        return 1;
    }

    *ptr_yy_globals = (yyscan_t) yyalloc ( sizeof( struct yyguts_t ), &dummy_yyguts );

    if (*ptr_yy_globals == NULL){
        errno = ENOMEM;
        return 1;
    }

    /* By setting to 0xAA, we expose bugs in
    yy_init_globals. Leave at 0x00 for releases. */
    memset(*ptr_yy_globals,0x00,sizeof(struct yyguts_t));

    yyset_extra (yy_user_defined, *ptr_yy_globals);

    return yy_init_globals ( *ptr_yy_globals );
}

static int yy_init_globals (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
    /* Initialization is the same as for the non-reentrant scanner.
     * This function is called from yylex_destroy(), so don't allocate here.
     */

    yyg->yy_buffer_stack = NULL;
    yyg->yy_buffer_stack_top = 0;
    yyg->yy_buffer_stack_max = 0;
    yyg->yy_c_buf_p = NULL;
    yyg->yy_init = 0;
    yyg->yy_start = 0;

    yyg->yy_start_stack_ptr = 0;
    yyg->yy_start_stack_depth = 0;
    yyg->yy_start_stack =  NULL;

/* Defined in main.c */
#ifdef YY_STDINIT
    yyin = stdin;
    yyout = stdout;
#else
    yyin = NULL;
    yyout = NULL;
#endif

    /* For future reference: Set errno on error, since we are called by
     * yylex_init()
     */
    return 0;
}

/* yylex_destroy is for both reentrant and non-reentrant scanners. */
int yylex_destroy  (yyscan_t yyscanner)
{
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

    /* Pop the buffer stack, destroying each element. */
	while(YY_CURRENT_BUFFER){
		yy_delete_buffer( YY_CURRENT_BUFFER , yyscanner );
		YY_CURRENT_BUFFER_LVALUE = NULL;
		yypop_buffer_state(yyscanner);
	}

	/* Destroy the stack itself. */
	yyfree(yyg->yy_buffer_stack , yyscanner);
	yyg->yy_buffer_stack = NULL;

    /* Destroy the start condition stack. */
        yyfree( yyg->yy_start_stack , yyscanner );
        yyg->yy_start_stack = NULL;

    /* Reset the globals. This is important in a non-reentrant scanner so the next time
     * yylex() is called, initialization will occur. */
    yy_init_globals( yyscanner);

    /* Destroy the main struct (reentrant only). */
    yyfree ( yyscanner , yyscanner );
    yyscanner = NULL;
    return 0;
}

/*
 * Internal utility routines.
 */

#ifndef yytext_ptr
static void yy_flex_strncpy (char* s1, const char * s2, int n , yyscan_t yyscanner)
{
	struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	(void)yyg;

	int i;
	for ( i = 0; i < n; ++i )
		s1[i] = s2[i];
}
#endif

#ifdef YY_NEED_STRLEN
static int yy_flex_strlen (const char * s , yyscan_t yyscanner)
{
	int n;
	for ( n = 0; s[n]; ++n )
		;

	return n;
}
#endif

void *yyalloc (yy_size_t  size , yyscan_t yyscanner)
{
	struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	(void)yyg;
	return malloc(size);
}

void *yyrealloc  (void * ptr, yy_size_t  size , yyscan_t yyscanner)
{
	struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	(void)yyg;

	/* The cast to (char *) in the following accommodates both
	 * implementations that use char* generic pointers, and those
	 * that use void* generic pointers.  It works with the latter
	 * because both ANSI C and C++ allow castless assignment from
	 * any pointer type to void*, and deal with argument conversions
	 * as though doing an assignment.
	 */
	return realloc(ptr, size);
}

void yyfree (void * ptr , yyscan_t yyscanner)
{
	struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
	(void)yyg;
	free( (char *) ptr );	/* see yyrealloc() for (char *) cast */
}

#define YYTABLES_NAME "yytables"

#line 928 "input_lexer.ll"


/*
 *  Routines
 */
#ifndef NO_NAMESPACE_GIAC
  namespace giac {
#endif // ndef NO_NAMESPACE_GIAC

    bool tri (const std::pair<const char *,gen> & a ,const std::pair<const char *,gen> & b){
      return strcmp(a.first, b.first) < 0;
    }
    
    // Set the input string
    // export GIAC_DEBUG=-2 to renew static_lexer.h/static_extern.h
    YY_BUFFER_STATE set_lexer_string(const std::string &s_orig,yyscan_t & scanner,GIAC_CONTEXT){
#if 0
#ifdef NSPIRE
      FILE * f= fopen("/documents/log.tns","w"); // ends up in My Documents
      fprintf(f,"%s",s_orig.c_str());
      fclose(f);
#else
      ofstream of("log"); // ends up in fir/windows/log
      of << s_orig<< '\n';
#endif
#endif
      if (abs_calc_mode(contextptr)==38 && s_orig==string(s_orig.size(),' '))
	giac_yyerror(scanner,"Void string");
#if !defined RTOS_THREADX && !defined NSPIRE && !defined FXCG && !defined GIAC_HAS_STO_38 && !defined NSPIRE_NEWLIB // && !defined NUMWORKS
      if (!builtin_lexer_functions_sorted){
#ifndef STATIC_BUILTIN_LEXER_FUNCTIONS
	sort(builtin_lexer_functions_begin(),builtin_lexer_functions_end(),tri);
#endif
	builtin_lexer_functions_sorted=true;
	int nfunc=builtin_lexer_functions_number;
	if (debug_infolevel==-2 || debug_infolevel==-4 || debug_infolevel==-5){
	  CERR << "Writing " << nfunc << " in static_lexer.h and static_extern.h "<< '\n';
	  CERR << "Check at_FP->at_FRAC, at_IP->at_INT, at_lgamma->at_lower_incomplete_gamma, at_is_inside->at_est_dans, at_regroup->at_regrouper, at_ugamma->at_upper_incomplete_gamma, at_∡ -> at_polar_complex, at_LINEAR? -> at_IS_LINEAR" << '\n';
	  /*
	  ofstream static_add_ll("static_add.ll");
	  for (int i=0;i<nfunc;i++){
	    static_add_ll << "\"" << builtin_lexer_functions_begin()[i].first << "\" " ;
	    static_add_ll << "*yylval=gen(at_" << translate_at(builtin_lexer_functions_begin()[i].first) << ",0); index_status(yyextra)=0; ";
	    static_add_ll << "return " << signed(builtin_lexer_functions_begin()[i].second.subtype)+256 << ";" ;
            static_add_ll << '\n';
	  }
	  static_add_ll.close();
	  */
	  ofstream static_lexer("static_lexer.h");
	  for (int i=0;i<nfunc;i++){
	    static_lexer << "{\"" << builtin_lexer_functions_begin()[i].first << "\",13," << signed(builtin_lexer_functions_begin()[i].second.subtype) ;
	    if (debug_infolevel==-2)
	      static_lexer << ",0,*((ulonglong *) at_" << translate_at(builtin_lexer_functions_begin()[i].first) << ")";
	    else
	      static_lexer << ",0,0"; 
	    if (builtin_lexer_functions_begin()[i].second._FUNCptr->quoted())
	      static_lexer << "| 1";
	    static_lexer << "}" ;
	    if (i!=nfunc-1)
	      static_lexer << ",";
	    static_lexer << '\n';
	  }
	  static_lexer.close();
	  if (debug_infolevel==-4){
	    ofstream static_lexer_("static_lexer_.h");
	    for (int i=0;i<nfunc;i++){
	      static_lexer_ << "*((size_t *) at_" << translate_at(builtin_lexer_functions_begin()[i].first) << ")";
	      if (i!=nfunc-1)
		static_lexer_ << ",";
	      static_lexer_ << '\n';
	    }
	    static_lexer_.close();
	  }
	  if (debug_infolevel==-5){
	    ofstream static_lexer_("static_lexer_at.h");
	    for (int i=0;i<nfunc;i++){
	      static_lexer_ << "res->push_back(*(size_t *)at_" << translate_at(builtin_lexer_functions_begin()[i].first) <<")";
	      if (i!=nfunc-1)
		static_lexer_ << ",";
	      static_lexer_ << '\n';
	    }
	    static_lexer_.close();
	  }
	  ofstream static_extern("static_extern.h");
	  static_extern << "#ifndef STATIC_EXTERN" << '\n';
	  static_extern << "#define STATIC_EXTERN" << '\n';
	  static_extern << "namespace giac{" << '\n';
	  static_extern << "struct unary_function_ptr;" << '\n';
	  for (int i=0;i<nfunc;i++){
	    static_extern << "extern const unary_function_ptr * const  at_" << translate_at(builtin_lexer_functions_begin()[i].first) << ";" << '\n';
	  }
	  static_extern << "}" << '\n';
	  static_extern << "#endif // STATIC_EXTERN" << '\n';
	  static_extern.close();
	}
      }
#endif // RTOS_THREADX
#ifdef NUMWORKS
      char lexer_string[4096];
#else
      string lexer_string;
#endif
      {
	string s(s_orig);
#ifdef NUMWORKS
	if (s.size()>=sizeof(lexer_string)-100)
	  s="Parse_string_too_large";
#endif
	// change for Numworks built-in calculation app replacement
	for (size_t i=0;i<s_orig.size();++i){
	  if (s[i]==18) 
	    s[i]='(';
	  if (s[i]==19)
	    s[i]=')';
	  if (i<s.size()-2 && (unsigned char)s[i]==226 && (unsigned char)s[i+1]==134 && (unsigned char)s[i+2]==146){
	    s[i]=' ';
	    s[i+1]='=';
	    s[i+2]='>';
	  }
	  if (i<s.size()-1){ 
	    if ( ((unsigned char)s[i]==195) && ((unsigned char)s[i+1]==151) ){
	      s[i]='*';
	      s[i+1]=' ';
	    }
#if defined NUMWORKS || defined NSPIRE || defined FXCG || defined EMCC
	    if (s[i]==']' && s[i+1]=='['
#ifdef EMCC
                && calc_mode(contextptr)==110
#endif
                )
	      s.insert(s.begin()+i+1,',');
#endif
	  }
	}
	bool instring=false;
	// stupid match of bracket then parenthesis then quotes
	int l=s.size(),nb=0,np=0,nq=0;
	int i=0;
	if (lexer_close_parenthesis(contextptr)){
	  for (;i<l;++i){
	    if (!instring && s[i]=='\''){
	      nq++;
	      if (nq%2==1 && i>2 && s[i-2]=='\'' && s[i-1]=='='){
		s.insert(s.begin()+i-1,' ');
		++l;
	      }
	    }
	    if (!instring && i && s[i]=='/' && s[i-1]=='/'){
	      // skip comment until end of line
	      for (;i<l;++i){
		if (s[i]==13)
		  break;
	      }
	      continue;
	    }
	    if (!instring && i>=2 && ( (s[i-2]=='-' && s[i-1]=='-') || (s[i-2]=='+' && s[i-1]=='+') ) && (s[i]=='.'|| (s[i]>='0' && s[i]<='9')) ){
	      s[i-2]='+';
	      s[i-1]=' ';
	    }
	    if (!instring && i && s[i]=='*' && s[i-1]=='/'){
	      // skip comment 
	      for (;i<l;++i){
		if (s[i]=='/' && s[i-1]=='*')
		  break;
	      }
	      if (i==l){
		s = s.substr(0,l-1)+"*/"+s[l-1];
		CERR << "unfinished comment, adding */" << '\n' << s << '\n';
	      }
	      continue;
	    }
	    if (!instring && s[i]==92){
	      i += 2;
	      if (i>=l)
		break;
	    }
	    if (instring){
	      if (s[i]=='"'&& (i==0 || s[i-1]!='\\'))
		instring=false;
	    }
	    else {
	      switch (s[i]){
	      case '"':
		instring=i==0 || s[i-1]!='\\';
		break;
	      case '(':
		++np;
		break;
	      case ')':
		--np;
		break;
	      case '[':
		++nb;
		break;
	      case ']':
		--nb;
		break;
	      }
	    }
	  }
	  if (nb<0)
	    *logptr(contextptr) << "Too many ]" << '\n';
	  if (np<0)
	    *logptr(contextptr) << "Too many )" << '\n';
	  while (np<0 && i>=0 && s[i-1]==')'){
	    --i;
	    ++np;
	  }
	  while (nb<0 && i>=0 && s[i-1]==']'){
	    --i;
	    ++nb;
	  }
	  s=s.substr(0,i);
	  if (nb>0){
	    *logptr(contextptr) << "Warning adding " << nb << " ] at end of input" << '\n';
	    s += string(nb,']');
	  }
	  if (np>0){
	    *logptr(contextptr) << "Warning adding " << np << " ) at end of input" << '\n';
	    s += string(np,')');
	  }
	}
	index_status(contextptr)=0;
	opened_quote(contextptr)=0;
	in_rpn(contextptr)=0;
	lexer_line_number(contextptr)=1;
	first_error_line(contextptr)=0;
	spread_formula(contextptr)=0;
	l=s.size();
	for (;l;l--){
	  if (s[l-1]!=' ')
	    break;
	}
	// strings ending with :;
	while (l>=4 && s[l-1]==';' && s[l-2]==':'){
	  // skip spaces before :;
	  int m;
	  for (m=l-3;m>0;--m){
	    if (s[m]!=' ')
	      break;
	  }
	  if (m<=1 || s[m]!=';')
	    break;
	  if (s[m-1]==':')
	    l = m+1;
	  else {
	    s[m]=':';
	    s[m+1]=';';
	    l=m+2;
	  }
	}
	s=s.substr(0,l);
	/* if (l && ( (s[l-1]==';') || (s[l-1]==':')))
	   l--; */
	string ss;
	ss.reserve(s.size()*1.1);
	for (int i=0;i<l;++i){
#if 0
	  if (i>0 && s[i-1]=='^' && i<l-3 && s[i]=='(' && s[i+1]>='0' && s[i+1]<='9' && s[i+2]==')'){ // suppress () for things like 2x^(2) (sent from TI nspire lua UI)
	    ss += s[i+1];
	    i+=2;
	    continue;
	  }
#endif
	  if (s[i]=='\\' && s[i+1]=='\n'){
	    ++i;
	    continue;
	  }
	  if ((unsigned char)s[i]==0xc2 && (unsigned char)s[i+1]!=0xb5) // µ
            ss += "micro";
	  if (i && (unsigned char)s[i]==0xc2 && (unsigned char)s[i+1]!=0xb0)
	    ss += ' ';
	  if ( (unsigned char)s[i]==0xef && i<l-3 ){
	    if ((unsigned char)s[i+1]==0x80 && (unsigned char)s[i+2]==0x80 ){  
	      ss+='e';
	      i+=2;
	      continue;
	    }
	  }
	  if ( (unsigned char)s[i]==0xe2 && i<l-3 ){
	    if ((unsigned char)s[i+1]==134 && (unsigned char)s[i+2]==146){
	      // 0xe2 0x86 0x92
	      ss += ' ';
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ss += ' ';
	      continue;
	    }
	    if ((unsigned char)s[i+1]==0x89){ 
	      ss += ' ';
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ss += ' ';
	      continue;
	    } // 0xe2 0x89	  
	    if ((unsigned char)s[i+1]==0x88){ 
	      // mathop, add blank before and after except following an e/E 
	      if ((unsigned char) s[i+2]==0x91){ // sigma
		ss += " SIGMA";
		i +=2;
		continue;
	      }
	      if ((unsigned char) s[i+2]==0x86){ // delta
		ss += " DELTA";
		i +=2;
		continue;
	      }
	      if ((unsigned char) s[i+2]==0x8f){ // pi
		ss += " PI";
		i +=2;
		continue;
	      }
	      if ( i>1 && (s[i-1]=='e' || s[i-1]=='E')){
		ss +='-';
		i +=2;
		continue;
	      }
	      if (i>2  && (s[i-1]==' ' && (s[i-2]=='e' || s[i-2]=='E')) ){
		ss[ss.size()-1] = '-';
		i += 3;
		continue;
	      }
	      ss += ' ';
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ss += ' ';
	      continue;
	    } // 0xe2 0x88
	    if ((unsigned char)s[i+1]==0x96 && ((unsigned char)s[i+2]==0xba || (unsigned char)s[i+2]==182 )){  
	      // sto 
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ss += ' ';
	      continue;
	    } // 0xe2 0x96
	    if ((unsigned char)s[i+1]==0x86 && (unsigned char)s[i+2]==0x92){  
	      // sto 
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ++i;
	      ss += s[i];
	      ss += ' ';
	      continue;
	    } // 0xe2 0x96
	  } //end if s[i]=0xe2
	  if (s[i]=='.'){
	    if ( i && (i<l-1) && (s[i-1]!=' ') && (s[i+1]=='.') ){
	      ss+= " ..";
	      ++i;
	    }
	    else
	      ss+='.';
	  }
	  else {
	    if (xcas_mode(contextptr) > 0 && xcas_mode(contextptr) !=3){
	      if (s[i]=='#')
		ss += "//";
	      else
		ss += s[i];
	    }
	    else
	      ss+=s[i];
	  }
	}
	// ofstream of("log"); of << s << '\n' << ss << '\n'; of.close();
	if (debug_infolevel>2)
	  CERR << "lexer " << ss << '\n';
	s.clear();
#ifdef NUMWORKS
	ss += " \n ÿ";
	if (ss.size()>sizeof(lexer_string)-1)
	  ss = "Parse_string_too_large";
	strcpy(lexer_string,ss.c_str());
#else
	lexer_string = ss;
	lexer_string += " \n ÿ";
#endif
      }
      yylex_init(&scanner);
      yyset_extra(contextptr, scanner);
#ifdef NUMWORKS
      currently_scanned(contextptr)=lexer_string;
      YY_BUFFER_STATE state=yy_scan_string(lexer_string,scanner);
#else
      currently_scanned(contextptr)=lexer_string.c_str();
      YY_BUFFER_STATE state=yy_scan_string(lexer_string.c_str(),scanner);
#endif
      return state;
    }

    int delete_lexer_string(YY_BUFFER_STATE & state,yyscan_t & scanner){
      yy_delete_buffer(state,scanner);
      yylex_destroy(scanner);
      return 1;
    }
#ifdef STATIC_BUILTIN_LEXER_FUNCTIONS
    bool CasIsBuildInFunction(char const *s, gen &g){ 
      // binary search in builtin_lexer_functions
      int i=0, j=builtin_lexer_functions_number-1;
      int cmp;
      cmp= strcmp(s,builtin_lexer_functions[i].s);
      if (cmp==0) goto found; if (cmp<0) return false;
      cmp= strcmp(s,builtin_lexer_functions[j].s);
      if (cmp==0) { i=j; goto found; } if (cmp>0) return false;
      while (1){
        if (i+1>=j) return false;
        int mid= (i+j)/2;
        cmp= strcmp(s,builtin_lexer_functions[mid].s);
        if (cmp==0) { i=mid; goto found; } 
        if (cmp>0) i= mid; else j=mid;
      }
    found:
#if defined NSPIRE 
      g= gen(int((*builtin_lexer_functions_())[i]+builtin_lexer_functions[i]._FUNC_));
#else
      g= gen(int(builtin_lexer_functions_[i]+builtin_lexer_functions[i]._FUNC_));
#endif
      g= gen(*g._FUNCptr);
      return true;
    }
#endif

#ifndef NO_NAMESPACE_GIAC
  } // namespace giac
#endif // ndef NO_NAMESPACE_GIAC
  

