hecmw_heclex.c

Go to the documentation of this file.

 
#line 3 "<stdout>"
 
#define  YY_INT_ALIGNED short int
 
/* A lexical scanner generated by flex */
 
#define yy_create_buffer HECMW_hec_create_buffer
#define yy_delete_buffer HECMW_hec_delete_buffer
#define yy_scan_buffer HECMW_hec_scan_buffer
#define yy_scan_string HECMW_hec_scan_string
#define yy_scan_bytes HECMW_hec_scan_bytes
#define yy_init_buffer HECMW_hec_init_buffer
#define yy_flush_buffer HECMW_hec_flush_buffer
#define yy_load_buffer_state HECMW_hec_load_buffer_state
#define yy_switch_to_buffer HECMW_hec_switch_to_buffer
#define yypush_buffer_state HECMW_hecpush_buffer_state
#define yypop_buffer_state HECMW_hecpop_buffer_state
#define yyensure_buffer_stack HECMW_hecensure_buffer_stack
#define yy_flex_debug HECMW_hec_flex_debug
#define yyin HECMW_hecin
#define yyleng HECMW_hecleng
#define yylex HECMW_heclex
#define yylineno HECMW_heclineno
#define yyout HECMW_hecout
#define yyrestart HECMW_hecrestart
#define yytext HECMW_hectext
#define yywrap HECMW_hecwrap
#define yyalloc HECMW_hecalloc
#define yyrealloc HECMW_hecrealloc
#define yyfree HECMW_hecfree
 
#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 HECMW_hec_create_buffer_ALREADY_DEFINED
#else
#define yy_create_buffer HECMW_hec_create_buffer
#endif
 
#ifdef yy_delete_buffer
#define HECMW_hec_delete_buffer_ALREADY_DEFINED
#else
#define yy_delete_buffer HECMW_hec_delete_buffer
#endif
 
#ifdef yy_scan_buffer
#define HECMW_hec_scan_buffer_ALREADY_DEFINED
#else
#define yy_scan_buffer HECMW_hec_scan_buffer
#endif
 
#ifdef yy_scan_string
#define HECMW_hec_scan_string_ALREADY_DEFINED
#else
#define yy_scan_string HECMW_hec_scan_string
#endif
 
#ifdef yy_scan_bytes
#define HECMW_hec_scan_bytes_ALREADY_DEFINED
#else
#define yy_scan_bytes HECMW_hec_scan_bytes
#endif
 
#ifdef yy_init_buffer
#define HECMW_hec_init_buffer_ALREADY_DEFINED
#else
#define yy_init_buffer HECMW_hec_init_buffer
#endif
 
#ifdef yy_flush_buffer
#define HECMW_hec_flush_buffer_ALREADY_DEFINED
#else
#define yy_flush_buffer HECMW_hec_flush_buffer
#endif
 
#ifdef yy_load_buffer_state
#define HECMW_hec_load_buffer_state_ALREADY_DEFINED
#else
#define yy_load_buffer_state HECMW_hec_load_buffer_state
#endif
 
#ifdef yy_switch_to_buffer
#define HECMW_hec_switch_to_buffer_ALREADY_DEFINED
#else
#define yy_switch_to_buffer HECMW_hec_switch_to_buffer
#endif
 
#ifdef yypush_buffer_state
#define HECMW_hecpush_buffer_state_ALREADY_DEFINED
#else
#define yypush_buffer_state HECMW_hecpush_buffer_state
#endif
 
#ifdef yypop_buffer_state
#define HECMW_hecpop_buffer_state_ALREADY_DEFINED
#else
#define yypop_buffer_state HECMW_hecpop_buffer_state
#endif
 
#ifdef yyensure_buffer_stack
#define HECMW_hecensure_buffer_stack_ALREADY_DEFINED
#else
#define yyensure_buffer_stack HECMW_hecensure_buffer_stack
#endif
 
#ifdef yylex
#define HECMW_heclex_ALREADY_DEFINED
#else
#define yylex HECMW_heclex
#endif
 
#ifdef yyrestart
#define HECMW_hecrestart_ALREADY_DEFINED
#else
#define yyrestart HECMW_hecrestart
#endif
 
#ifdef yylex_init
#define HECMW_heclex_init_ALREADY_DEFINED
#else
#define yylex_init HECMW_heclex_init
#endif
 
#ifdef yylex_init_extra
#define HECMW_heclex_init_extra_ALREADY_DEFINED
#else
#define yylex_init_extra HECMW_heclex_init_extra
#endif
 
#ifdef yylex_destroy
#define HECMW_heclex_destroy_ALREADY_DEFINED
#else
#define yylex_destroy HECMW_heclex_destroy
#endif
 
#ifdef yyget_debug
#define HECMW_hecget_debug_ALREADY_DEFINED
#else
#define yyget_debug HECMW_hecget_debug
#endif
 
#ifdef yyset_debug
#define HECMW_hecset_debug_ALREADY_DEFINED
#else
#define yyset_debug HECMW_hecset_debug
#endif
 
#ifdef yyget_extra
#define HECMW_hecget_extra_ALREADY_DEFINED
#else
#define yyget_extra HECMW_hecget_extra
#endif
 
#ifdef yyset_extra
#define HECMW_hecset_extra_ALREADY_DEFINED
#else
#define yyset_extra HECMW_hecset_extra
#endif
 
#ifdef yyget_in
#define HECMW_hecget_in_ALREADY_DEFINED
#else
#define yyget_in HECMW_hecget_in
#endif
 
#ifdef yyset_in
#define HECMW_hecset_in_ALREADY_DEFINED
#else
#define yyset_in HECMW_hecset_in
#endif
 
#ifdef yyget_out
#define HECMW_hecget_out_ALREADY_DEFINED
#else
#define yyget_out HECMW_hecget_out
#endif
 
#ifdef yyset_out
#define HECMW_hecset_out_ALREADY_DEFINED
#else
#define yyset_out HECMW_hecset_out
#endif
 
#ifdef yyget_leng
#define HECMW_hecget_leng_ALREADY_DEFINED
#else
#define yyget_leng HECMW_hecget_leng
#endif
 
#ifdef yyget_text
#define HECMW_hecget_text_ALREADY_DEFINED
#else
#define yyget_text HECMW_hecget_text
#endif
 
#ifdef yyget_lineno
#define HECMW_hecget_lineno_ALREADY_DEFINED
#else
#define yyget_lineno HECMW_hecget_lineno
#endif
 
#ifdef yyset_lineno
#define HECMW_hecset_lineno_ALREADY_DEFINED
#else
#define yyset_lineno HECMW_hecset_lineno
#endif
 
#ifdef yywrap
#define HECMW_hecwrap_ALREADY_DEFINED
#else
#define yywrap HECMW_hecwrap
#endif
 
#ifdef yyalloc
#define HECMW_hecalloc_ALREADY_DEFINED
#else
#define yyalloc HECMW_hecalloc
#endif
 
#ifdef yyrealloc
#define HECMW_hecrealloc_ALREADY_DEFINED
#else
#define yyrealloc HECMW_hecrealloc
#endif
 
#ifdef yyfree
#define HECMW_hecfree_ALREADY_DEFINED
#else
#define yyfree HECMW_hecfree
#endif
 
#ifdef yytext
#define HECMW_hectext_ALREADY_DEFINED
#else
#define yytext HECMW_hectext
#endif
 
#ifdef yyleng
#define HECMW_hecleng_ALREADY_DEFINED
#else
#define yyleng HECMW_hecleng
#endif
 
#ifdef yyin
#define HECMW_hecin_ALREADY_DEFINED
#else
#define yyin HECMW_hecin
#endif
 
#ifdef yyout
#define HECMW_hecout_ALREADY_DEFINED
#else
#define yyout HECMW_hecout
#endif
 
#ifdef yy_flex_debug
#define HECMW_hec_flex_debug_ALREADY_DEFINED
#else
#define yy_flex_debug HECMW_hec_flex_debug
#endif
 
#ifdef yylineno
#define HECMW_heclineno_ALREADY_DEFINED
#else
#define yylineno HECMW_heclineno
#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))
 
/* 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 (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 (((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  )
#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
 
extern int yyleng;
 
extern FILE *yyin, *yyout;
 
#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 = (yy_hold_char); \
        YY_RESTORE_YY_MORE_OFFSET \
        (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, (yytext_ptr)  )
 
#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; 
    int yy_bs_column; 
    /* 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 */
 
/* Stack of input buffers. */
static size_t yy_buffer_stack_top = 0; 
static size_t yy_buffer_stack_max = 0; 
static YY_BUFFER_STATE * yy_buffer_stack = NULL; 
/* 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 ( (yy_buffer_stack) \
                          ? (yy_buffer_stack)[(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 (yy_buffer_stack)[(yy_buffer_stack_top)]
 
/* yy_hold_char holds the character lost when yytext is formed. */
static char yy_hold_char;
static int yy_n_chars;      /* number of characters read into yy_ch_buf */
int yyleng;
 
/* Points to current character in buffer. */
static char *yy_c_buf_p = NULL;
static int yy_init = 0;     /* whether we need to initialize */
static int yy_start = 0;    /* start state number */
 
/* Flag which is used to allow yywrap()'s to do buffer switches
 * instead of setting up a fresh yyin.  A bit of a hack ...
 */
static int yy_did_buffer_switch_on_eof;
 
void yyrestart ( FILE *input_file  );
void yy_switch_to_buffer ( YY_BUFFER_STATE new_buffer  );
YY_BUFFER_STATE yy_create_buffer ( FILE *file, int size  );
void yy_delete_buffer ( YY_BUFFER_STATE b  );
void yy_flush_buffer ( YY_BUFFER_STATE b  );
void yypush_buffer_state ( YY_BUFFER_STATE new_buffer  );
void yypop_buffer_state ( void );
 
static void yyensure_buffer_stack ( void );
static void yy_load_buffer_state ( void );
static void yy_init_buffer ( YY_BUFFER_STATE b, FILE *file  );
#define YY_FLUSH_BUFFER yy_flush_buffer( YY_CURRENT_BUFFER )
 
YY_BUFFER_STATE yy_scan_buffer ( char *base, yy_size_t size  );
YY_BUFFER_STATE yy_scan_string ( const char *yy_str  );
YY_BUFFER_STATE yy_scan_bytes ( const char *bytes, int len  );
 
void *yyalloc ( yy_size_t  );
void *yyrealloc ( void *, yy_size_t  );
void yyfree ( void *  );
 
#define yy_new_buffer yy_create_buffer
#define yy_set_interactive(is_interactive) \
    { \
    if ( ! YY_CURRENT_BUFFER ){ \
        yyensure_buffer_stack (); \
        YY_CURRENT_BUFFER_LVALUE =    \
            yy_create_buffer( yyin, YY_BUF_SIZE ); \
    } \
    YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
    }
#define yy_set_bol(at_bol) \
    { \
    if ( ! YY_CURRENT_BUFFER ){\
        yyensure_buffer_stack (); \
        YY_CURRENT_BUFFER_LVALUE =    \
            yy_create_buffer( yyin, YY_BUF_SIZE ); \
    } \
    YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
    }
#define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
 
/* Begin user sect3 */
typedef flex_uint8_t YY_CHAR;
 
FILE *yyin = NULL, *yyout = NULL;
 
typedef int yy_state_type;
 
extern int yylineno;
int yylineno = 1;
 
extern char *yytext;
#ifdef yytext_ptr
#undef yytext_ptr
#endif
#define yytext_ptr yytext
 
static yy_state_type yy_get_previous_state ( void );
static yy_state_type yy_try_NUL_trans ( yy_state_type current_state  );
static int yy_get_next_buffer ( void );
static void yynoreturn yy_fatal_error ( const char* msg  );
 
/* Done after the current pattern has been matched and before the
 * corresponding action - sets up yytext.
 */
#define YY_DO_BEFORE_ACTION \
    (yytext_ptr) = yy_bp; \
    yyleng = (int) (yy_cp - yy_bp); \
    (yy_hold_char) = *yy_cp; \
    *yy_cp = '\0'; \
    (yy_c_buf_p) = yy_cp;
#define YY_NUM_RULES 103
#define YY_END_OF_BUFFER 104
/* 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[583] =
    {   0,
        0,    0,    0,    5,    0,    0,  104,  102,    8,    9,
      102,  102,  102,   95,  101,  101,  101,   98,   94,  100,
      100,   96,  100,  100,  100,  100,  100,  100,  100,  100,
       97,  100,  100,  100,  100,  102,  102,  103,    2,  103,
      103,    5,    5,    4,    5,    6,  102,    8,    9,    0,
        0,    0,    0,    0,    0,    0,    0,    0,   98,  101,
      101,   98,   99,   99,   98,  101,  100,    0,  100,  100,
      100,  100,  100,  100,  100,  100,  100,  100,  100,  100,
      100,  100,  100,  100,  100,  100,  100,  100,  100,  100,
      100,  100,  100,  100,  100,    0,    0,    0,    0,    0,
 
        0,    0,    0,    0,    0,    0,    7,    0,    2,    0,
        5,    4,    4,    4,    5,    1,    5,    6,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,   99,   99,   98,
        0,   99,   99,    0,  101,   99,  101,  100,  100,  100,
      100,  100,  100,  100,   57,  100,  100,  100,  100,  100,
      100,  100,  100,  100,  100,  100,  100,  100,  100,  100,
      100,  100,  100,  100,  100,  100,  100,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    4,    4,
 
        4,    0,    0,    0,    0,    0,    0,    0,   27,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,   99,   99,   99,  100,   59,  100,  100,
       62,  100,  100,  100,  100,   67,  100,  100,   70,  100,
       72,  100,  100,  100,  100,   78,  100,  100,  100,  100,
      100,  100,  100,  100,  100,   89,  100,   90,  100,    0,
        0,    0,    0,    0,    0,    0,   26,    0,    0,    0,
        0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
        0,    0,    0,    4,    0,    0,    0,    0,   21,    0,
        0,    0,    0,    0,    0,   36,    0,    0,    0,   44,
 
        0,   48,    0,    0,    0,   56,  100,  100,  100,  100,
       64,   65,  100,  100,  100,  100,  100,  100,  100,  100,
       79,   80,    0,  100,  100,  100,  100,   86,  100,  100,
      100,  100,   91,    0,    0,    0,    0,   20,    0,    0,
        0,    0,    0,    0,    0,   35,    0,    0,    0,   43,
        0,   47,    0,    0,    0,   55,    0,    4,    0,    0,
        0,   19,    0,    0,    0,    0,    0,    0,    0,   40,
       42,    0,    0,    0,    0,  100,  100,  100,  100,  100,
      100,  100,  100,  100,  100,  100,   76,  100,    0,  100,
      100,  100,   85,  100,  100,  100,    0,  100,  100,    0,
 
        0,    0,   18,    0,    0,    0,    0,    0,    0,    0,
        0,   39,   41,    0,    0,    0,    0,    0,    4,    0,
        0,    0,   23,    0,    0,    0,    0,    0,    0,    0,
       46,    0,   52,   54,  100,  100,  100,  100,  100,  100,
       69,   71,  100,  100,  100,   77,    0,  100,   83,  100,
       87,  100,  100,    0,  100,  100,    0,    0,    0,   22,
        0,    0,    0,    0,   30,    0,    0,    0,   45,    0,
       51,   53,    3,    3,    0,    0,    0,   25,    0,    0,
       32,    0,    0,   50,   58,  100,  100,   63,  100,   68,
      100,  100,   75,    0,   81,  100,  100,  100,    0,  100,
 
      100,    0,    0,    0,   24,    0,    0,   31,    0,    0,
       49,    3,    3,    0,    0,    0,    0,    0,   29,    0,
        0,   38,   60,  100,   66,   74,   73,   81,   84,  100,
       92,    0,   82,   93,    0,    0,    0,    0,    0,   28,
        0,    0,   37,   11,    0,    0,   17,    0,   61,  100,
       82,   10,    0,    0,   16,    0,    0,    0,    0,   88,
        0,    0,    0,    0,   15,    0,    0,   14,    0,   13,
        0,   12,    0,    0,    0,    0,    0,    0,    0,   34,
       33,    0
    } ;
 
static const YY_CHAR yy_ec[256] =
    {   0,
        1,    1,    1,    1,    1,    1,    1,    1,    2,    3,
        1,    1,    4,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    5,    6,    1,    7,    1,    1,    1,    1,    1,
        1,    1,    8,    9,   10,   11,   12,   13,   13,   13,
       13,   13,   13,   13,   13,   13,   13,   14,    1,    1,
       15,    1,    1,    1,   16,   17,   18,   19,   20,   21,
       22,   23,   24,   25,   25,   26,   27,   28,   29,   30,
       31,   32,   33,   34,   35,   36,   37,   25,   38,   39,
        1,   12,    1,    1,   40,    1,   25,   25,   25,   25,
 
       41,   25,   25,   25,   25,   25,   25,   25,   25,   25,
       25,   25,   25,   25,   25,   25,   25,   25,   25,   25,
       25,   25,    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
    } ;
 
static const YY_CHAR yy_meta[42] =
    {   0,
        1,    1,    2,    1,    1,    1,    1,    1,    1,    3,
        3,    3,    3,    4,    1,    3,    3,    3,    3,    3,
        3,    3,    3,    3,    3,    3,    3,    3,    3,    3,
        3,    3,    3,    3,    3,    3,    3,    3,    3,    3,
        3
    } ;
 
static const flex_int16_t yy_base[595] =
    {   0,
        0,   36,   41,   45,   50,   52, 1281, 1300,   55, 1300,
     1274,   45,   51, 1300,   55, 1247,    0,   63, 1300,   68,
       75,   79,   85,   89,   95,  101,  105,  112,  116,  122,
      136,  146,  174,  151,  131,  207,   67, 1300, 1300, 1255,
     1231,    0, 1247,   44,  149, 1300, 1245,  159, 1300, 1217,
     1211,  165,   47, 1220,  179,   72, 1212, 1215,  191,    0,
     1211,  196,  158,  169,  204,  164,  207,  231,  236,  240,
      246,  251,  256,  263,  267,  272,  278,  282,  293,  289,
      298,  311,  316,  321,  327,  331,  338,  348,  352,  356,
      360,  364,  370,  378,  383,  151, 1195, 1189,  384, 1194,
 
       86, 1194,  378,  200, 1186,  202, 1300,  225, 1300, 1180,
        0,    0,  310, 1176,  315, 1300,  351, 1300, 1165, 1166,
     1163,  109, 1170, 1165, 1159, 1134,  113, 1145, 1127, 1126,
     1127,  194, 1129, 1128, 1109, 1100, 1098,  246,  295,  403,
      338,  385,  400, 1115, 1111, 1107, 1104,  407,  413,  417,
      421,  437,  441,  445,  451,  457,  462,  467,  481,  471,
      485,  492,  497,  505,  510,  515,  519,  524,  533,  537,
      541,  548,  552,  556,  573,  566,  579, 1084, 1082, 1077,
      229, 1082, 1078, 1074, 1056, 1071,  152, 1065, 1047, 1048,
     1051,  244, 1049, 1048, 1030, 1021, 1018, 1030,  434,  439,
 
     1027, 1015,  145, 1007, 1004, 1002, 1003, 1004, 1300, 1002,
      985,  975,  980,  983,  968,  968,  960,  957,  961,  943,
      944,  935,  937,  487,  505,  948,  583,  587,  591,  596,
      601,  605,  611,  615,  619,  624,  628,  632,  641,  645,
      650,  657,  661,  667,  672,  676,  680,  688,  698,  702,
      707,  711,  715,  726,  730,  734,  742,  746,  751,  931,
      205,  919,  917,  910,  910,  912, 1300,  911,  907,  899,
      888,  891,  895,  883,  883,  879,  874,  880,  865,  868,
      857,  857,  866,  864,  857,  857,  857,  827, 1300,  828,
      839,  834,  815,  809,  816, 1300,  807,  800,  810, 1300,
 
      797, 1300,  806,  791,  802, 1300,  755,  761,  765,  769,
      781,  785,  789,  793,  800,  807,  813,  817,  823,  831,
      836,  840,  782,  844,  850,  855,  860,  864,  868,  878,
      882,  890,  894,  791,  793,  793,  770, 1300,  771,  782,
      779,  757,  768,  752,  762, 1300,  752,  744,  752, 1300,
      739, 1300,  740,  726,  739, 1300,  735,  731,  715,  729,
      725, 1300,  709,  706,   72,  709,  711,  712,  700, 1300,
     1300,  690,  686,  681,  681,  900,  905,  909,  919,  924,
      930,  936,  940,  944,  948,  953,  960,  964,  681,  968,
      973,  979,  985,  990,  994, 1001,  670, 1005, 1009,  667,
 
      680,  675, 1300,  659,  657,  250,  658,  648,  657,  658,
      646, 1300, 1300,  635,  634,  628,  627,  618,  615,  610,
      607,  600, 1300,  598,  598,  605,  589,  591,  580,  588,
     1300,  572, 1300, 1300, 1014, 1024, 1028, 1033, 1037, 1045,
     1049, 1053, 1058, 1062, 1068, 1072,  569, 1078, 1085, 1089,
     1093, 1097, 1101,  568, 1105, 1111,  553,  547,  545, 1300,
      539,  542,  555,  540, 1300,  545,  535,  540, 1300,  522,
     1300, 1300,    0,    0,  523,  513,  294, 1300,  508,  495,
     1300,  117,  494, 1300, 1115, 1123, 1128, 1133, 1138, 1142,
     1148, 1152, 1156,  494, 1160, 1165, 1169, 1173,  483, 1177,
 
     1187,  483,  474,  326, 1300,  470,  462, 1300,  277,  462,
     1300,    0,    0,  464,  444,  445,  454,  434, 1300,  446,
      431, 1300, 1191, 1197, 1201, 1205, 1209, 1300, 1215, 1219,
     1223,  438, 1227, 1231,  434,  414,  416,  423,  402, 1300,
      412,  393, 1300, 1300,  393,  379, 1300,  373, 1235, 1241,
     1300, 1300,  369,  364, 1300,  358,  349,  347,  358, 1245,
      335,  329,  325,  302, 1300,  305,  273, 1300,  273, 1300,
      219, 1300,  202,  171,  135,  120,  110,   90,   70, 1300,
     1300, 1300, 1261, 1265,   85, 1267, 1271, 1275, 1279, 1283,
       43, 1287, 1291, 1295
 
    } ;
 
static const flex_int16_t yy_def[595] =
    {   0,
      582,    1,  583,  584,    1,    1,  582,  582,  582,  582,
      582,  582,  582,  582,  585,  585,  585,  585,  582,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  582,  587,  582,  582,  582,
      582,  588,  588,  589,  590,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  585,
      585,  585,  585,  585,  585,  585,  586,  591,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  587,  582,  582,  582,  582,
 
      582,  582,  582,  582,  582,  587,  582,  587,  582,  582,
      588,  589,  592,  589,  590,  582,  590,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  585,  585,  582,  585,  585,  585,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  592,  592,
 
      589,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  589,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
 
      582,  582,  582,  582,  582,  582,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  582,  586,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  589,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  586,  586,  582,  586,
      586,  586,  586,  586,  586,  586,  582,  586,  586,  582,
 
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  589,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  586,  586,  586,  582,  586,  586,  586,
      586,  586,  586,  582,  586,  586,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  593,  594,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  586,  586,  586,  586,  586,  586,
      586,  586,  586,  582,  586,  586,  586,  586,  582,  586,
 
      586,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  593,  594,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  586,  586,  586,  586,  586,  582,  586,  586,
      586,  582,  586,  586,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  586,  586,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  586,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,    0,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582
 
    } ;
 
static const flex_int16_t yy_nxt[1342] =
    {   0,
        8,    9,   10,   11,    9,   12,    8,   13,   14,   15,
       16,   17,   18,    8,   19,   20,   21,   22,   23,   24,
       25,   26,   27,   28,   25,   25,   29,   30,   25,   25,
       25,   31,   32,   33,   25,   34,   25,   25,   25,   35,
       25,   36,   37,   39,   40,  147,   41,   39,   43,  113,
       44,   45,   46,   47,   46,   47,   48,   36,   37,   48,
       50,   58,   51,   59,   52,   61,  114,   62,   53,  107,
      108,   54,   55,   64,  127,   65,  425,   56,   60,   60,
      128,   68,   66,   57,   69,   60,   60,   60,   68,   60,
       60,  134,   68,  135,   70,   60,   60,  581,   68,   60,
 
       60,  426,   68,   66,   72,   60,   60,   71,   68,  136,
       73,   60,   60,  187,   68,   60,   60,  580,   68,  188,
       74,  520,   60,   60,   75,   68,   60,   60,  205,   68,
      211,   78,   60,   60,  521,   68,  212,   79,  579,   76,
      206,   60,   60,   80,  582,   77,   60,   60,  578,   68,
       81,  116,  117,  107,  108,   82,   60,   60,  577,   68,
       48,   60,   60,   48,   68,   83,   95,   84,   85,  270,
      142,  144,  286,  145,   86,  271,  146,   66,  287,   87,
       88,  143,  121,   89,   60,   60,  122,   68,   66,   90,
      123,  124,  125,   91,  576,  126,  130,   92,   66,  131,
 
      132,  139,   93,  140,  107,  108,   64,  133,   65,   66,
      141,   94,   96,  217,   64,   66,   65,   60,   60,  194,
      582,  195,   97,   66,   98,  218,   99,  107,  108,  100,
      101,  141,  335,  102,  103,  575,   66,  196,  336,  104,
       60,   60,   60,   60,   66,  105,   60,   60,  263,  582,
       60,   60,  574,  582,  462,  149,   60,   60,  224,  582,
      264,   60,   60,  276,  582,  141,   60,   60,  148,  582,
       60,  151,  150,   60,   60,  277,  582,   60,   60,  463,
      582,  541,   60,   60,  154,  582,  141,  152,   60,   60,
      153,  582,   60,   60,  542,  582,  573,  157,  516,   60,
 
       60,  155,  582,   60,   60,  156,  582,  225,   60,   60,
      572,  582,  116,  200,  141,  158,  162,  116,  117,  159,
      161,   60,   60,  517,  582,  160,   60,   60,  571,  582,
      537,   60,   60,  164,  582,  141,  163,   60,   60,  570,
      582,   60,   60,  569,  582,  144,  166,  144,   60,   60,
      226,  582,  165,  116,  117,  538,  167,  168,   60,   60,
      568,  582,   60,   60,  169,  582,   60,   60,  567,  582,
       60,   60,  172,  582,   60,   60,  566,  582,  565,  170,
       60,   60,  564,  582,  171,  563,  173,  562,   60,   60,
      174,  582,  561,   60,   60,  190,  582,  142,  191,  192,
 
      559,  180,  558,  175,   66,  181,  193,  176,  177,  182,
      183,  184,  143,  139,  185,  140,  557,   60,   60,   66,
      582,  556,  141,   60,   60,   66,  582,   60,   60,  542,
      582,   60,   60,  555,  582,  227,  116,  200,  554,  228,
       66,  116,  200,  141,  230,  538,  229,   60,   60,  553,
      582,   60,   60,  552,  582,   60,   60,  551,  582,  548,
      232,   60,   60,  521,  582,  547,  231,   60,   60,  546,
      582,  233,   60,   60,  517,  582,  235,   60,   60,  545,
      582,   60,   60,  544,  582,  234,  237,  543,  236,  540,
      238,   60,   60,  539,  582,   60,   60,  536,  582,  224,
 
      239,  535,   60,   60,  240,  582,  141,   60,   60,  532,
      582,  242,  243,  528,  241,   60,   60,  225,  582,  522,
       60,   60,  519,  582,  141,   60,   60,  141,  582,   60,
       60,  518,  582,  244,   60,   60,  515,  582,  245,  246,
      247,  514,  248,   60,   60,  141,  582,   60,   60,  511,
      582,   60,   60,  249,  582,  510,  250,  251,   60,   60,
      509,  582,   60,   60,  508,  582,   60,   60,  507,  582,
      506,  463,  505,  253,  252,  256,   60,   60,  504,  582,
      503,  255,  254,   60,   60,  258,  582,  502,  257,   60,
       60,  499,  582,   60,   60,  494,  582,   60,   60,  484,
 
      582,   60,   60,  483,  582,  482,   60,   60,  307,  582,
      481,   60,   60,  259,  582,   60,   60,  480,  582,  308,
      479,   60,   60,  309,  582,   60,   60,  426,  582,   60,
       60,  478,  582,  477,   60,   60,  310,  582,   60,   60,
      476,  582,   60,   60,  475,  582,  474,  311,  312,  473,
      313,   60,   60,  472,  582,   60,   60,  471,  582,  314,
       60,   60,  470,  582,  469,  315,  317,   60,   60,  468,
      582,   60,   60,  467,  582,  466,  316,   60,   60,  465,
      582,  464,   60,   60,  461,  582,   60,   60,  460,  582,
       60,   60,  459,  582,  318,  320,  319,  458,   60,   60,
 
      457,  582,  323,  454,  447,  321,  322,  434,   60,   60,
      433,  582,   60,   60,  432,  582,  326,   60,   60,  431,
      582,   60,   60,  430,  582,   60,   60,  429,  582,  428,
      327,  324,  427,  424,  328,  325,   60,   60,  423,  582,
       60,   60,  422,  582,   60,   60,  421,  582,  420,  330,
      419,  329,   60,   60,  418,  582,   60,   60,  417,  582,
      416,   60,   60,  415,  582,   60,   60,  332,  582,  331,
      333,   60,   60,  414,  582,   60,   60,  413,  582,   60,
       60,  412,  582,  411,  379,  410,  409,  408,  378,  376,
      407,   60,   60,  377,  582,   60,   60,  406,  582,   60,
 
       60,  405,  582,   60,   60,  404,  582,  403,  402,  380,
       60,   60,  401,  582,  400,  389,  381,   60,   60,  382,
      582,  375,  383,   60,   60,  374,  582,   60,   60,  373,
      582,  372,  384,   60,   60,  371,  582,  370,  369,  368,
      386,   60,   60,  367,  582,  385,   60,   60,  366,  582,
       60,   60,  365,  582,   60,   60,  387,  582,  364,  388,
       60,   60,  363,  582,  362,   60,   60,  390,  582,  391,
       60,   60,  361,  582,   60,   60,  360,  582,   60,   60,
      359,  582,  358,  394,  357,  356,  393,  392,   60,   60,
      355,  582,   60,   60,  397,  582,  354,  396,  353,  352,
 
       60,   60,  351,  582,   60,   60,  350,  582,  349,  395,
       60,   60,  348,  582,  347,   60,   60,  346,  582,   60,
       60,  345,  582,  398,  344,  343,  342,  399,  436,   60,
       60,  341,  582,  435,   60,   60,  340,  582,  339,  439,
       60,   60,  437,  582,  338,  440,   60,   60,  337,  582,
       60,   60,  438,  582,   60,   60,  334,  582,   60,   60,
      226,  582,  441,   60,   60,  306,  582,  442,  305,  443,
       60,   60,  304,  582,   60,   60,  303,  582,   60,   60,
      302,  582,  444,   60,   60,  301,  582,  300,  445,   60,
       60,  446,  582,  299,  448,   60,   60,  298,  582,  449,
 
       60,   60,  297,  582,   60,   60,  296,  582,  295,  452,
      294,   60,   60,  450,  582,   60,   60,  293,  582,   60,
       60,  451,  582,  292,   60,   60,  453,  582,  455,  291,
      290,  289,  456,  485,   60,   60,  288,  582,   60,   60,
      285,  582,  284,   60,   60,  283,  582,   60,   60,  282,
      582,  487,  488,  281,  489,   60,   60,  486,  582,   60,
       60,  280,  582,   60,   60,  279,  582,  278,   60,   60,
      490,  582,   60,   60,  275,  582,  274,  491,   60,   60,
      273,  582,   60,   60,  272,  582,  269,  493,   60,   60,
      268,  582,  267,  492,  266,   60,   60,  495,  582,   60,
 
       60,  265,  582,   60,   60,  262,  582,   60,   60,  261,
      582,   60,   60,  260,  582,   60,   60,   68,  582,  146,
      496,   60,   60,  146,  582,   60,   60,  226,  582,  223,
      497,  500,  222,   60,   60,  498,  582,  501,   60,   60,
      221,  582,  523,   60,   60,  220,  582,  219,   60,   60,
      216,  582,   60,   60,  215,  582,  524,  525,   60,   60,
      214,  582,   60,   60,  213,  582,   60,   60,  210,  582,
       60,   60,  527,  582,  526,   60,   60,  209,  582,   60,
       60,  208,  582,   60,   60,  529,  582,   60,   60,  207,
      582,  204,  531,  203,  202,  201,  533,   60,   60,  198,
 
      582,   60,   60,  530,  582,  197,  534,   60,   60,  189,
      582,   60,   60,  186,  582,   60,   60,  179,  582,   60,
       60,  178,  582,   63,  549,   60,   60,  138,  582,   60,
       60,  137,  582,   60,   60,  129,  582,   60,   60,  120,
      582,   60,   60,  119,  582,   60,   60,  118,  582,  109,
      550,   60,   60,  110,  582,   60,   60,  109,  582,   63,
      560,   38,   38,   38,   38,   42,   42,   42,   42,   67,
       67,  106,  106,  106,  106,  111,   49,  111,  111,  112,
      582,  112,  112,  115,  115,  115,  115,  199,  199,  199,
      199,  512,  582,  512,  512,  513,  582,  513,  513,    7,
 
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582
    } ;
 
static const flex_int16_t yy_chk[1342] =
    {   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,    2,    2,    3,    3,  591,    3,    4,    4,   44,
        4,    4,    5,    5,    6,    6,    9,    6,    6,    9,
       12,   13,   12,   13,   12,   15,   44,   15,   12,   37,
       37,   12,   12,   18,   53,   18,  365,   12,   20,   20,
       53,   20,   18,   12,   20,   21,   21,  585,   21,   22,
       22,   56,   22,   56,   21,   23,   23,  579,   23,   24,
 
       24,  365,   24,   18,   23,   25,   25,   22,   25,   56,
       24,   26,   26,  101,   26,   27,   27,  578,   27,  101,
       26,  482,   28,   28,   27,   28,   29,   29,  122,   29,
      127,   29,   30,   30,  482,   30,  127,   30,  577,   28,
      122,   35,   35,   30,   35,   28,   31,   31,  576,   31,
       30,   45,   45,   96,   96,   31,   32,   32,  575,   32,
       48,   34,   34,   48,   34,   32,   34,   32,   32,  187,
       63,   66,  203,   66,   32,  187,   66,   63,  203,   32,
       32,   64,   52,   32,   33,   33,   52,   33,   64,   33,
       52,   52,   52,   33,  574,   52,   55,   33,   63,   55,
 
       55,   59,   33,   59,  106,  106,   62,   55,   62,   64,
       59,   33,   36,  132,   65,   62,   65,   67,   67,  104,
       67,  104,   36,   65,   36,  132,   36,  108,  108,   36,
       36,   59,  261,   36,   36,  573,   62,  104,  261,   36,
       68,   68,   68,   68,   65,   36,   69,   69,  181,   69,
       70,   70,  571,   70,  406,   70,   71,   71,  138,   71,
      181,   72,   72,  192,   72,  138,   73,   73,   69,   73,
       68,   72,   71,   74,   74,  192,   74,   75,   75,  406,
       75,  509,   76,   76,   75,   76,  138,   73,   77,   77,
       74,   77,   78,   78,  509,   78,  569,   77,  477,   80,
 
       80,   76,   80,   79,   79,   76,   79,  139,   81,   81,
      567,   81,  113,  113,  139,   78,   81,  115,  115,   79,
       80,   82,   82,  477,   82,   79,   83,   83,  566,   83,
      504,   84,   84,   83,   84,  139,   82,   85,   85,  564,
       85,   86,   86,  563,   86,  141,   85,  141,   87,   87,
      141,   87,   84,  117,  117,  504,   86,   87,   88,   88,
      562,   88,   89,   89,   88,   89,   90,   90,  561,   90,
       91,   91,   90,   91,   92,   92,  559,   92,  558,   88,
       93,   93,  557,   93,   89,  556,   91,  554,   94,   94,
       92,   94,  553,   95,   95,  103,   95,  142,  103,  103,
 
      548,   99,  546,   93,  142,   99,  103,   94,   95,   99,
       99,   99,  143,  140,   99,  140,  545,  148,  148,  143,
      148,  542,  140,  149,  149,  142,  149,  150,  150,  541,
      150,  151,  151,  539,  151,  148,  199,  199,  538,  149,
      143,  200,  200,  140,  151,  537,  150,  152,  152,  536,
      152,  153,  153,  535,  153,  154,  154,  532,  154,  521,
      153,  155,  155,  520,  155,  518,  152,  156,  156,  517,
      156,  154,  157,  157,  516,  157,  156,  158,  158,  515,
      158,  160,  160,  514,  160,  155,  158,  510,  157,  507,
      158,  159,  159,  506,  159,  161,  161,  503,  161,  224,
 
      159,  502,  162,  162,  160,  162,  224,  163,  163,  499,
      163,  162,  163,  494,  161,  164,  164,  225,  164,  483,
      165,  165,  480,  165,  225,  166,  166,  224,  166,  167,
      167,  479,  167,  164,  168,  168,  476,  168,  164,  165,
      166,  475,  167,  169,  169,  225,  169,  170,  170,  470,
      170,  171,  171,  168,  171,  468,  169,  170,  172,  172,
      467,  172,  173,  173,  466,  173,  174,  174,  464,  174,
      463,  462,  461,  172,  171,  174,  176,  176,  459,  176,
      458,  173,  172,  175,  175,  176,  175,  457,  175,  177,
      177,  454,  177,  227,  227,  447,  227,  228,  228,  432,
 
      228,  229,  229,  430,  229,  429,  230,  230,  227,  230,
      428,  231,  231,  177,  231,  232,  232,  427,  232,  229,
      426,  233,  233,  230,  233,  234,  234,  425,  234,  235,
      235,  424,  235,  422,  236,  236,  232,  236,  237,  237,
      421,  237,  238,  238,  420,  238,  419,  233,  234,  418,
      235,  239,  239,  417,  239,  240,  240,  416,  240,  237,
      241,  241,  415,  241,  414,  238,  242,  242,  242,  411,
      242,  243,  243,  410,  243,  409,  240,  244,  244,  408,
      244,  407,  245,  245,  405,  245,  246,  246,  404,  246,
      247,  247,  402,  247,  243,  245,  244,  401,  248,  248,
 
      400,  248,  249,  397,  389,  247,  248,  375,  249,  249,
      374,  249,  250,  250,  373,  250,  251,  251,  251,  372,
      251,  252,  252,  369,  252,  253,  253,  368,  253,  367,
      252,  249,  366,  364,  253,  250,  254,  254,  363,  254,
      255,  255,  361,  255,  256,  256,  360,  256,  359,  255,
      358,  254,  257,  257,  357,  257,  258,  258,  355,  258,
      354,  259,  259,  353,  259,  307,  307,  257,  307,  256,
      259,  308,  308,  351,  308,  309,  309,  349,  309,  310,
      310,  348,  310,  347,  310,  345,  344,  343,  309,  307,
      342,  311,  311,  308,  311,  312,  312,  341,  312,  313,
 
      313,  340,  313,  314,  314,  339,  314,  337,  336,  313,
      315,  315,  335,  315,  334,  323,  314,  316,  316,  315,
      316,  305,  316,  317,  317,  304,  317,  318,  318,  303,
      318,  301,  317,  319,  319,  299,  319,  298,  297,  295,
      318,  320,  320,  294,  320,  317,  321,  321,  293,  321,
      322,  322,  292,  322,  324,  324,  319,  324,  291,  320,
      325,  325,  290,  325,  288,  326,  326,  324,  326,  325,
      327,  327,  287,  327,  328,  328,  286,  328,  329,  329,
      285,  329,  284,  329,  283,  282,  327,  326,  330,  330,
      281,  330,  331,  331,  332,  331,  280,  331,  279,  278,
 
      332,  332,  277,  332,  333,  333,  276,  333,  275,  330,
      376,  376,  274,  376,  273,  377,  377,  272,  377,  378,
      378,  271,  378,  332,  270,  269,  268,  333,  377,  379,
      379,  266,  379,  376,  380,  380,  265,  380,  264,  380,
      381,  381,  378,  381,  263,  381,  382,  382,  262,  382,
      383,  383,  379,  383,  384,  384,  260,  384,  385,  385,
      226,  385,  382,  386,  386,  223,  386,  383,  222,  384,
      387,  387,  221,  387,  388,  388,  220,  388,  390,  390,
      219,  390,  385,  391,  391,  218,  391,  217,  386,  392,
      392,  388,  392,  216,  390,  393,  393,  215,  393,  391,
 
      394,  394,  214,  394,  395,  395,  213,  395,  212,  395,
      211,  396,  396,  392,  396,  398,  398,  210,  398,  399,
      399,  394,  399,  208,  435,  435,  396,  435,  398,  207,
      206,  205,  399,  435,  436,  436,  204,  436,  437,  437,
      202,  437,  201,  438,  438,  198,  438,  439,  439,  197,
      439,  437,  438,  196,  439,  440,  440,  436,  440,  441,
      441,  195,  441,  442,  442,  194,  442,  193,  443,  443,
      440,  443,  444,  444,  191,  444,  190,  443,  445,  445,
      189,  445,  446,  446,  188,  446,  186,  445,  448,  448,
      185,  448,  184,  444,  183,  449,  449,  448,  449,  450,
 
      450,  182,  450,  451,  451,  180,  451,  452,  452,  179,
      452,  453,  453,  178,  453,  455,  455,  147,  455,  146,
      450,  456,  456,  145,  456,  485,  485,  144,  485,  137,
      452,  455,  136,  486,  486,  453,  486,  456,  487,  487,
      135,  487,  486,  488,  488,  134,  488,  133,  489,  489,
      131,  489,  490,  490,  130,  490,  487,  489,  491,  491,
      129,  491,  492,  492,  128,  492,  493,  493,  126,  493,
      495,  495,  492,  495,  491,  496,  496,  125,  496,  497,
      497,  124,  497,  498,  498,  496,  498,  500,  500,  123,
      500,  121,  498,  120,  119,  114,  500,  501,  501,  110,
 
      501,  523,  523,  497,  523,  105,  501,  524,  524,  102,
      524,  525,  525,  100,  525,  526,  526,   98,  526,  527,
      527,   97,  527,   61,  524,  529,  529,   58,  529,  530,
      530,   57,  530,  531,  531,   54,  531,  533,  533,   51,
      533,  534,  534,   50,  534,  549,  549,   47,  549,   43,
      530,  550,  550,   41,  550,  560,  560,   40,  560,   16,
      550,  583,  583,  583,  583,  584,  584,  584,  584,  586,
      586,  587,  587,  587,  587,  588,   11,  588,  588,  589,
        7,  589,  589,  590,  590,  590,  590,  592,  592,  592,
      592,  593,    0,  593,  593,  594,    0,  594,  594,  582,
 
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582,  582,  582,  582,  582,  582,  582,  582,  582,  582,
      582
    } ;
 
static yy_state_type yy_last_accepting_state;
static char *yy_last_accepting_cpos;
 
extern int yy_flex_debug;
int yy_flex_debug = 0;
 
/* 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
char *yytext;
#line 1 "hecmw_heclex.l"
#line 2 "hecmw_heclex.l"
#include <string.h>
#include <errno.h>
#include "hecmw_heclex.h"
#include "hecmw_util.h"
 
typedef union {
    double dval;
    char *str;
} YYSTYPE;
 
static YYSTYPE yylval;
static int lineno;
static int lineno_inc;
static int flag_including = 0;
static FILE *incfp;
static char include_filename[HECMW_FILENAME_LEN+1];
static YY_BUFFER_STATE prev_state;
static int flag_header;
 
static void set_flag_header(int flag);
#line 1212 "<stdout>"
 
#line 1214 "<stdout>"
 
#define INITIAL 0
#define HEADER 1
#define INCLUDE 2
 
#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
 
static int yy_init_globals ( void );
 
/* Accessor methods to globals.
   These are made visible to non-reentrant scanners for convenience. */
 
int yylex_destroy ( void );
 
int yyget_debug ( void );
 
void yyset_debug ( int debug_flag  );
 
YY_EXTRA_TYPE yyget_extra ( void );
 
void yyset_extra ( YY_EXTRA_TYPE user_defined  );
 
FILE *yyget_in ( void );
 
void yyset_in  ( FILE * _in_str  );
 
FILE *yyget_out ( void );
 
void yyset_out  ( FILE * _out_str  );
 
            int yyget_leng ( void );
 
char *yyget_text ( void );
 
int yyget_lineno ( void );
 
void yyset_lineno ( int _line_number  );
 
/* Macros after this point can all be overridden by user definitions in
 * section 1.
 */
 
#ifndef YY_SKIP_YYWRAP
#ifdef __cplusplus
extern "C" int yywrap ( void );
#else
extern int yywrap ( void );
#endif
#endif
 
#ifndef YY_NO_UNPUT
    
#endif
 
#ifndef yytext_ptr
static void yy_flex_strncpy ( char *, const char *, int );
#endif
 
#ifdef YY_NEED_STRLEN
static int yy_flex_strlen ( const char * );
#endif
 
#ifndef YY_NO_INPUT
#ifdef __cplusplus
static int yyinput ( void );
#else
static int input ( void );
#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 )
#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 (void);
 
#define YY_DECL int yylex (void)
#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 \
    if ( yyleng > 0 ) \
        YY_CURRENT_BUFFER_LVALUE->yy_at_bol = \
                (yytext[yyleng - 1] == '\n'); \
    YY_USER_ACTION
 
YY_DECL
{
    yy_state_type yy_current_state;
    char *yy_cp, *yy_bp;
    int yy_act;
    
    if ( !(yy_init) )
        {
        (yy_init) = 1;
 
#ifdef YY_USER_INIT
        YY_USER_INIT;
#endif
 
        if ( ! (yy_start) )
            (yy_start) = 1; /* first start state */
 
        if ( ! yyin )
            yyin = stdin;
 
        if ( ! yyout )
            yyout = stdout;
 
        if ( ! YY_CURRENT_BUFFER ) {
            yyensure_buffer_stack ();
            YY_CURRENT_BUFFER_LVALUE =
                yy_create_buffer( yyin, YY_BUF_SIZE );
        }
 
        yy_load_buffer_state(  );
        }
 
    {
#line 38 "hecmw_heclex.l"
 
 
#line 1437 "<stdout>"
 
    while ( /*CONSTCOND*/1 )        /* loops until end-of-file is reached */
        {
        yy_cp = (yy_c_buf_p);
 
        /* Support of yytext. */
        *yy_cp = (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 = (yy_start);
        yy_current_state += YY_AT_BOL();
yy_match:
        do
            {
            YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ;
            if ( yy_accept[yy_current_state] )
                {
                (yy_last_accepting_state) = yy_current_state;
                (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 >= 583 )
                    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] != 1300 );
 
yy_find_action:
        yy_act = yy_accept[yy_current_state];
        if ( yy_act == 0 )
            { /* have to back up */
            yy_cp = (yy_last_accepting_cpos);
            yy_current_state = (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 = (yy_hold_char);
            yy_cp = (yy_last_accepting_cpos);
            yy_current_state = (yy_last_accepting_state);
            goto yy_find_action;
 
case 1:
/* rule 1 can match eol */
YY_RULE_SETUP
#line 40 "hecmw_heclex.l"
{ lineno++; set_flag_header(0); }
    YY_BREAK
case 2:
/* rule 2 can match eol */
YY_RULE_SETUP
#line 41 "hecmw_heclex.l"
{ lineno++; set_flag_header(0); }
    YY_BREAK
case 3:
YY_RULE_SETUP
#line 42 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_HEADER : ' '; }
    YY_BREAK
case 4:
YY_RULE_SETUP
#line 43 "hecmw_heclex.l"
{
                        HECMW_heclex_unput_token();
                        set_flag_header(1);
                        BEGIN INITIAL;
                    }
    YY_BREAK
case 5:
YY_RULE_SETUP
#line 48 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_HEADER; }
    YY_BREAK
case 6:
/* rule 6 can match eol */
YY_RULE_SETUP
#line 50 "hecmw_heclex.l"
{ lineno_inc++; set_flag_header(0); return HECMW_HECLEX_NL; }
    YY_BREAK
case YY_STATE_EOF(INCLUDE):
#line 51 "hecmw_heclex.l"
{
                        yy_delete_buffer(YY_CURRENT_BUFFER);
                        yy_switch_to_buffer(prev_state);
                        if(fclose(incfp)) {
                            HECMW_set_error(HECMW_IO_E0006,
                                "File: %s, %s", include_filename, strerror(errno));
                        }
                        flag_including = 0;
                        BEGIN INITIAL;
                    }
    YY_BREAK
case 7:
/* rule 7 can match eol */
YY_RULE_SETUP
#line 62 "hecmw_heclex.l"
{ lineno++; set_flag_header(0); }
    YY_BREAK
case 8:
YY_RULE_SETUP
#line 63 "hecmw_heclex.l"
{ set_flag_header(0); }
    YY_BREAK
case 9:
/* rule 9 can match eol */
YY_RULE_SETUP
#line 64 "hecmw_heclex.l"
{ lineno++; set_flag_header(0); return HECMW_HECLEX_NL; }
    YY_BREAK
case 10:
YY_RULE_SETUP
#line 66 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_AMPLITUDE; }
    YY_BREAK
case 11:
YY_RULE_SETUP
#line 67 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_AMPLITUDE : ' '; }
    YY_BREAK
case 12:
YY_RULE_SETUP
#line 68 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_CONNECTIVITY; }
    YY_BREAK
case 13:
YY_RULE_SETUP
#line 69 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_CONNECTIVITY : ' '; }
    YY_BREAK
case 14:
YY_RULE_SETUP
#line 70 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_CONTACT_PAIR; }
    YY_BREAK
case 15:
YY_RULE_SETUP
#line 71 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_CONTACT_PAIR : ' '; }
    YY_BREAK
case 16:
YY_RULE_SETUP
#line 72 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_EMBED_PAIR; }
    YY_BREAK
case 17:
YY_RULE_SETUP
#line 73 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_EMBED_PAIR : ' '; }
    YY_BREAK
case 18:
YY_RULE_SETUP
#line 74 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_ECOPY; }
    YY_BREAK
case 19:
YY_RULE_SETUP
#line 75 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_ECOPY : ' '; }
    YY_BREAK
case 20:
YY_RULE_SETUP
#line 76 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_EGEN; }
    YY_BREAK
case 21:
YY_RULE_SETUP
#line 77 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_EGEN : ' '; }
    YY_BREAK
case 22:
YY_RULE_SETUP
#line 78 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_EGROUP; }
    YY_BREAK
case 23:
YY_RULE_SETUP
#line 79 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_EGROUP : ' '; }
    YY_BREAK
case 24:
YY_RULE_SETUP
#line 80 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_ELEMENT; }
    YY_BREAK
case 25:
YY_RULE_SETUP
#line 81 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_ELEMENT : ' '; }
    YY_BREAK
case 26:
YY_RULE_SETUP
#line 82 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_END; }
    YY_BREAK
case 27:
YY_RULE_SETUP
#line 83 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_END : ' '; }
    YY_BREAK
case 28:
YY_RULE_SETUP
#line 84 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_EQUATION; }
    YY_BREAK
case 29:
YY_RULE_SETUP
#line 85 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_EQUATION : ' '; }
    YY_BREAK
case 30:
YY_RULE_SETUP
#line 86 "hecmw_heclex.l"
{
                BEGIN HEADER;
                set_flag_header(1);
                return HECMW_HECLEX_H_HEADER;
            }
    YY_BREAK
case 31:
YY_RULE_SETUP
#line 91 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_INCLUDE; }
    YY_BREAK
case 32:
YY_RULE_SETUP
#line 92 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_INCLUDE : ' '; }
    YY_BREAK
case 33:
YY_RULE_SETUP
#line 93 "hecmw_heclex.l"
{
                            set_flag_header(1);
                            return HECMW_HECLEX_H_INITIAL;
                        }
    YY_BREAK
case 34:
YY_RULE_SETUP
#line 97 "hecmw_heclex.l"
{
                            return flag_header ? HECMW_HECLEX_H_INITIAL : ' ';
                        }
    YY_BREAK
case 35:
YY_RULE_SETUP
#line 100 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_ITEM; }
    YY_BREAK
case 36:
YY_RULE_SETUP
#line 101 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_ITEM : ' '; }
    YY_BREAK
case 37:
YY_RULE_SETUP
#line 102 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_MATERIAL; }
    YY_BREAK
case 38:
YY_RULE_SETUP
#line 103 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_MATERIAL : ' '; }
    YY_BREAK
case 39:
YY_RULE_SETUP
#line 104 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_NCOPY; }
    YY_BREAK
case 40:
YY_RULE_SETUP
#line 105 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_NCOPY : ' '; }
    YY_BREAK
case 41:
YY_RULE_SETUP
#line 106 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_NFILL; }
    YY_BREAK
case 42:
YY_RULE_SETUP
#line 107 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_NFILL : ' '; }
    YY_BREAK
case 43:
YY_RULE_SETUP
#line 108 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_NGEN; }
    YY_BREAK
case 44:
YY_RULE_SETUP
#line 109 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_NGEN : ' '; }
    YY_BREAK
case 45:
YY_RULE_SETUP
#line 110 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_NGROUP; }
    YY_BREAK
case 46:
YY_RULE_SETUP
#line 111 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_NGROUP : ' '; }
    YY_BREAK
case 47:
YY_RULE_SETUP
#line 112 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_NODE; }
    YY_BREAK
case 48:
YY_RULE_SETUP
#line 113 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_NODE : ' '; }
    YY_BREAK
case 49:
YY_RULE_SETUP
#line 114 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_SECTION; }
    YY_BREAK
case 50:
YY_RULE_SETUP
#line 115 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_SECTION : ' '; }
    YY_BREAK
case 51:
YY_RULE_SETUP
#line 116 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_SGROUP; }
    YY_BREAK
case 52:
YY_RULE_SETUP
#line 117 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_SGROUP : ' '; }
    YY_BREAK
case 53:
YY_RULE_SETUP
#line 118 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_SYSTEM; }
    YY_BREAK
case 54:
YY_RULE_SETUP
#line 119 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_SYSTEM : ' '; }
    YY_BREAK
case 55:
YY_RULE_SETUP
#line 120 "hecmw_heclex.l"
{ set_flag_header(1); return HECMW_HECLEX_H_ZERO; }
    YY_BREAK
case 56:
YY_RULE_SETUP
#line 121 "hecmw_heclex.l"
{ return flag_header ? HECMW_HECLEX_H_ZERO : ' '; }
    YY_BREAK
case 57:
YY_RULE_SETUP
#line 124 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_INP; }
    YY_BREAK
case 58:
YY_RULE_SETUP
#line 125 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_ABSOLUTE; }
    YY_BREAK
case 59:
YY_RULE_SETUP
#line 126 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_BEAM; }
    YY_BREAK
case 60:
YY_RULE_SETUP
#line 127 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_COMPOSITE; }
    YY_BREAK
case 61:
YY_RULE_SETUP
#line 128 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_DEFINITION; }
    YY_BREAK
case 62:
YY_RULE_SETUP
#line 129 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_EGRP; }
    YY_BREAK
case 63:
YY_RULE_SETUP
#line 130 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_GENERATE; }
    YY_BREAK
case 64:
YY_RULE_SETUP
#line 131 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_HECMW; }
    YY_BREAK
case 65:
YY_RULE_SETUP
#line 132 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_INPUT; }
    YY_BREAK
case 66:
YY_RULE_SETUP
#line 133 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_INTERFACE; }
    YY_BREAK
case 67:
YY_RULE_SETUP
#line 134 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_ITEM; }
    YY_BREAK
case 68:
YY_RULE_SETUP
#line 135 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_MATERIAL; }
    YY_BREAK
case 69:
YY_RULE_SETUP
#line 136 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_MATITEM; }
    YY_BREAK
case 70:
YY_RULE_SETUP
#line 137 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_NAME; }
    YY_BREAK
case 71:
YY_RULE_SETUP
#line 138 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_NASTRAN; }
    YY_BREAK
case 72:
YY_RULE_SETUP
#line 139 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_NGRP; }
    YY_BREAK
case 73:
YY_RULE_SETUP
#line 140 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_NODE_SURF; }
    YY_BREAK
case 74:
YY_RULE_SETUP
#line 141 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_NODE_ELEM; }
    YY_BREAK
case 75:
YY_RULE_SETUP
#line 142 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_RELATIVE; }
    YY_BREAK
case 76:
YY_RULE_SETUP
#line 143 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SECOPT; }
    YY_BREAK
case 77:
YY_RULE_SETUP
#line 144 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SECTION; }
    YY_BREAK
case 78:
YY_RULE_SETUP
#line 145 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SGRP; }
    YY_BREAK
case 79:
YY_RULE_SETUP
#line 146 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SHELL; }
    YY_BREAK
case 80:
YY_RULE_SETUP
#line 147 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SOLID; }
    YY_BREAK
case 81:
YY_RULE_SETUP
#line 148 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_STEP_TIME; }
    YY_BREAK
case 82:
YY_RULE_SETUP
#line 149 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TOTAL_TIME; }
    YY_BREAK
case 83:
YY_RULE_SETUP
#line 150 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SUBITEM; }
    YY_BREAK
case 84:
YY_RULE_SETUP
#line 151 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SURF_SURF; }
    YY_BREAK
case 85:
YY_RULE_SETUP
#line 152 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_SYSTEM; }
    YY_BREAK
case 86:
YY_RULE_SETUP
#line 153 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TABLE; }
    YY_BREAK
case 87:
YY_RULE_SETUP
#line 154 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TABULAR; }
    YY_BREAK
case 88:
YY_RULE_SETUP
#line 155 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TEMPERATURE; }
    YY_BREAK
case 89:
YY_RULE_SETUP
#line 156 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TIME; }
    YY_BREAK
case 90:
YY_RULE_SETUP
#line 157 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TYPE; }
    YY_BREAK
case 91:
YY_RULE_SETUP
#line 158 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_VALUE; }
    YY_BREAK
case 92:
YY_RULE_SETUP
#line 159 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_TIMEVALUE; }
    YY_BREAK
case 93:
YY_RULE_SETUP
#line 160 "hecmw_heclex.l"
{ set_flag_header(0); return HECMW_HECLEX_K_VALUETIME; }
    YY_BREAK
case 94:
YY_RULE_SETUP
#line 162 "hecmw_heclex.l"
{ set_flag_header(0); return '='; }
    YY_BREAK
case 95:
YY_RULE_SETUP
#line 163 "hecmw_heclex.l"
{ set_flag_header(0); return ','; }
    YY_BREAK
case 96:
YY_RULE_SETUP
#line 164 "hecmw_heclex.l"
{ set_flag_header(0); return 'C'; }
    YY_BREAK
case 97:
YY_RULE_SETUP
#line 165 "hecmw_heclex.l"
{ set_flag_header(0); return 'R'; }
    YY_BREAK
case 98:
YY_RULE_SETUP
#line 167 "hecmw_heclex.l"
{
                yylval.dval = atof(yytext);
                set_flag_header(0);
                return HECMW_HECLEX_INT;
            }
    YY_BREAK
case 99:
YY_RULE_SETUP
#line 172 "hecmw_heclex.l"
{
                yylval.dval = atof(yytext);
                set_flag_header(0);
                return HECMW_HECLEX_DOUBLE;
            }
    YY_BREAK
case 100:
YY_RULE_SETUP
#line 177 "hecmw_heclex.l"
{
                yylval.str = yytext;
                set_flag_header(0);
                return HECMW_HECLEX_NAME;
            }
    YY_BREAK
case 101:
YY_RULE_SETUP
#line 182 "hecmw_heclex.l"
{
                yylval.str = yytext;
                set_flag_header(0);
                return HECMW_HECLEX_FILENAME;
            }
    YY_BREAK
case 102:
YY_RULE_SETUP
#line 187 "hecmw_heclex.l"
{ set_flag_header(0); return yytext[0]; }
    YY_BREAK
case YY_STATE_EOF(INITIAL):
case YY_STATE_EOF(HEADER):
#line 188 "hecmw_heclex.l"
{ return 0; }
    YY_BREAK
case 103:
YY_RULE_SETUP
#line 190 "hecmw_heclex.l"
ECHO;
    YY_BREAK
#line 2062 "<stdout>"
 
    case YY_END_OF_BUFFER:
        {
        /* Amount of text matched not including the EOB char. */
        int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
 
        /* Undo the effects of YY_DO_BEFORE_ACTION. */
        *yy_cp = (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.
             */
            (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 ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
            { /* This was really a NUL. */
            yy_state_type yy_next_state;
 
            (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
 
            yy_current_state = yy_get_previous_state(  );
 
            /* 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 );
 
            yy_bp = (yytext_ptr) + YY_MORE_ADJ;
 
            if ( yy_next_state )
                {
                /* Consume the NUL. */
                yy_cp = ++(yy_c_buf_p);
                yy_current_state = yy_next_state;
                goto yy_match;
                }
 
            else
                {
                yy_cp = (yy_c_buf_p);
                goto yy_find_action;
                }
            }
 
        else switch ( yy_get_next_buffer(  ) )
            {
            case EOB_ACT_END_OF_FILE:
                {
                (yy_did_buffer_switch_on_eof) = 0;
 
                if ( yywrap(  ) )
                    {
                    /* 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.
                     */
                    (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
 
                    yy_act = YY_STATE_EOF(YY_START);
                    goto do_action;
                    }
 
                else
                    {
                    if ( ! (yy_did_buffer_switch_on_eof) )
                        YY_NEW_FILE;
                    }
                break;
                }
 
            case EOB_ACT_CONTINUE_SCAN:
                (yy_c_buf_p) =
                    (yytext_ptr) + yy_amount_of_matched_text;
 
                yy_current_state = yy_get_previous_state(  );
 
                yy_cp = (yy_c_buf_p);
                yy_bp = (yytext_ptr) + YY_MORE_ADJ;
                goto yy_match;
 
            case EOB_ACT_LAST_MATCH:
                (yy_c_buf_p) =
                &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
 
                yy_current_state = yy_get_previous_state(  );
 
                yy_cp = (yy_c_buf_p);
                yy_bp = (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 (void)
{
        char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
    char *source = (yytext_ptr);
    int number_to_move, i;
    int ret_val;
 
    if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(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 ( (yy_c_buf_p) - (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) ((yy_c_buf_p) - (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 = (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) ((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)  );
                }
            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" );
 
            (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]),
            (yy_n_chars), num_to_read );
 
        YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
        }
 
    if ( (yy_n_chars) == 0 )
        {
        if ( number_to_move == YY_MORE_ADJ )
            {
            ret_val = EOB_ACT_END_OF_FILE;
            yyrestart( yyin  );
            }
 
        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 (((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 = (yy_n_chars) + number_to_move + ((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  );
        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);
    }
 
    (yy_n_chars) += number_to_move;
    YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
    YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
 
    (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 (void)
{
    yy_state_type yy_current_state;
    char *yy_cp;
    
    yy_current_state = (yy_start);
    yy_current_state += YY_AT_BOL();
 
    for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (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] )
            {
            (yy_last_accepting_state) = yy_current_state;
            (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 >= 583 )
                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 )
{
    int yy_is_jam;
        char *yy_cp = (yy_c_buf_p);
 
    YY_CHAR yy_c = 1;
    if ( yy_accept[yy_current_state] )
        {
        (yy_last_accepting_state) = yy_current_state;
        (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 >= 583 )
            yy_c = yy_meta[yy_c];
        }
    yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
    yy_is_jam = (yy_current_state == 582);
 
        return yy_is_jam ? 0 : yy_current_state;
}
 
#ifndef YY_NO_UNPUT
 
#endif
 
#ifndef YY_NO_INPUT
#ifdef __cplusplus
    static int yyinput (void)
#else
    static int input  (void)
#endif
 
{
    int c;
    
    *(yy_c_buf_p) = (yy_hold_char);
 
    if ( *(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 ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
            /* This was really a NUL. */
            *(yy_c_buf_p) = '\0';
 
        else
            { /* need more input */
            int offset = (int) ((yy_c_buf_p) - (yytext_ptr));
            ++(yy_c_buf_p);
 
            switch ( yy_get_next_buffer(  ) )
                {
                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 );
 
                    /*FALLTHROUGH*/
 
                case EOB_ACT_END_OF_FILE:
                    {
                    if ( yywrap(  ) )
                        return 0;
 
                    if ( ! (yy_did_buffer_switch_on_eof) )
                        YY_NEW_FILE;
#ifdef __cplusplus
                    return yyinput();
#else
                    return input();
#endif
                    }
 
                case EOB_ACT_CONTINUE_SCAN:
                    (yy_c_buf_p) = (yytext_ptr) + offset;
                    break;
                }
            }
        }
 
    c = *(unsigned char *) (yy_c_buf_p);    /* cast for 8-bit char's */
    *(yy_c_buf_p) = '\0';   /* preserve yytext */
    (yy_hold_char) = *++(yy_c_buf_p);
 
    YY_CURRENT_BUFFER_LVALUE->yy_at_bol = (c == '\n');
 
    return c;
}
#endif  /* ifndef YY_NO_INPUT */
 
    void yyrestart  (FILE * input_file )
{
    
    if ( ! YY_CURRENT_BUFFER ){
        yyensure_buffer_stack ();
        YY_CURRENT_BUFFER_LVALUE =
            yy_create_buffer( yyin, YY_BUF_SIZE );
    }
 
    yy_init_buffer( YY_CURRENT_BUFFER, input_file );
    yy_load_buffer_state(  );
}
 
    void yy_switch_to_buffer  (YY_BUFFER_STATE  new_buffer )
{
    
    /* TODO. We should be able to replace this entire function body
     * with
     *      yypop_buffer_state();
     *      yypush_buffer_state(new_buffer);
     */
    yyensure_buffer_stack ();
    if ( YY_CURRENT_BUFFER == new_buffer )
        return;
 
    if ( YY_CURRENT_BUFFER )
        {
        /* Flush out information for old buffer. */
        *(yy_c_buf_p) = (yy_hold_char);
        YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
        YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
        }
 
    YY_CURRENT_BUFFER_LVALUE = new_buffer;
    yy_load_buffer_state(  );
 
    /* 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.
     */
    (yy_did_buffer_switch_on_eof) = 1;
}
 
static void yy_load_buffer_state  (void)
{
        (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
    (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
    yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
    (yy_hold_char) = *(yy_c_buf_p);
}
 
    YY_BUFFER_STATE yy_create_buffer  (FILE * file, int  size )
{
    YY_BUFFER_STATE b;
    
    b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state )  );
    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)  );
    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 );
 
    return b;
}
 
    void yy_delete_buffer (YY_BUFFER_STATE  b )
{
    
    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  );
 
    yyfree( (void *) b  );
}
 
/* 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 )
 
{
    int oerrno = errno;
    
    yy_flush_buffer( b );
 
    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;
}
 
    void yy_flush_buffer (YY_BUFFER_STATE  b )
{
        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(  );
}
 
void yypush_buffer_state (YY_BUFFER_STATE new_buffer )
{
        if (new_buffer == NULL)
        return;
 
    yyensure_buffer_stack();
 
    /* This block is copied from yy_switch_to_buffer. */
    if ( YY_CURRENT_BUFFER )
        {
        /* Flush out information for old buffer. */
        *(yy_c_buf_p) = (yy_hold_char);
        YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
        YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
        }
 
    /* Only push if top exists. Otherwise, replace top. */
    if (YY_CURRENT_BUFFER)
        (yy_buffer_stack_top)++;
    YY_CURRENT_BUFFER_LVALUE = new_buffer;
 
    /* copied from yy_switch_to_buffer. */
    yy_load_buffer_state(  );
    (yy_did_buffer_switch_on_eof) = 1;
}
 
void yypop_buffer_state (void)
{
        if (!YY_CURRENT_BUFFER)
        return;
 
    yy_delete_buffer(YY_CURRENT_BUFFER );
    YY_CURRENT_BUFFER_LVALUE = NULL;
    if ((yy_buffer_stack_top) > 0)
        --(yy_buffer_stack_top);
 
    if (YY_CURRENT_BUFFER) {
        yy_load_buffer_state(  );
        (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 (void)
{
    yy_size_t num_to_alloc;
    
    if (!(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... */
        (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc
                                (num_to_alloc * sizeof(struct yy_buffer_state*)
                                );
        if ( ! (yy_buffer_stack) )
            YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
 
        memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
 
        (yy_buffer_stack_max) = num_to_alloc;
        (yy_buffer_stack_top) = 0;
        return;
    }
 
    if ((yy_buffer_stack_top) >= ((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 = (yy_buffer_stack_max) + grow_size;
        (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc
                                ((yy_buffer_stack),
                                num_to_alloc * sizeof(struct yy_buffer_state*)
                                );
        if ( ! (yy_buffer_stack) )
            YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
 
        /* zero only the new slots.*/
        memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
        (yy_buffer_stack_max) = num_to_alloc;
    }
}
 
YY_BUFFER_STATE yy_scan_buffer  (char * base, yy_size_t  size )
{
    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 )  );
    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  );
 
    return b;
}
 
YY_BUFFER_STATE yy_scan_string (const char * yystr )
{
    
    return yy_scan_bytes( yystr, (int) strlen(yystr) );
}
 
YY_BUFFER_STATE yy_scan_bytes  (const char * yybytes, int  _yybytes_len )
{
    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  );
    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 );
    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 )
{
            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] = (yy_hold_char); \
        (yy_c_buf_p) = yytext + yyless_macro_arg; \
        (yy_hold_char) = *(yy_c_buf_p); \
        *(yy_c_buf_p) = '\0'; \
        yyleng = yyless_macro_arg; \
        } \
    while ( 0 )
 
/* Accessor  methods (get/set functions) to struct members. */
 
int yyget_lineno  (void)
{
    
    return yylineno;
}
 
FILE *yyget_in  (void)
{
        return yyin;
}
 
FILE *yyget_out  (void)
{
        return yyout;
}
 
int yyget_leng  (void)
{
        return yyleng;
}
 
char *yyget_text  (void)
{
        return yytext;
}
 
void yyset_lineno (int  _line_number )
{
    
    yylineno = _line_number;
}
 
void yyset_in (FILE *  _in_str )
{
        yyin = _in_str ;
}
 
void yyset_out (FILE *  _out_str )
{
        yyout = _out_str ;
}
 
int yyget_debug  (void)
{
        return yy_flex_debug;
}
 
void yyset_debug (int  _bdebug )
{
        yy_flex_debug = _bdebug ;
}
 
static int yy_init_globals (void)
{
        /* Initialization is the same as for the non-reentrant scanner.
     * This function is called from yylex_destroy(), so don't allocate here.
     */
 
    (yy_buffer_stack) = NULL;
    (yy_buffer_stack_top) = 0;
    (yy_buffer_stack_max) = 0;
    (yy_c_buf_p) = NULL;
    (yy_init) = 0;
    (yy_start) = 0;
 
/* 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  (void)
{
    
    /* Pop the buffer stack, destroying each element. */
    while(YY_CURRENT_BUFFER){
        yy_delete_buffer( YY_CURRENT_BUFFER  );
        YY_CURRENT_BUFFER_LVALUE = NULL;
        yypop_buffer_state();
    }
 
    /* Destroy the stack itself. */
    yyfree((yy_buffer_stack) );
    (yy_buffer_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( );
 
    return 0;
}
 
/*
 * Internal utility routines.
 */
 
#ifndef yytext_ptr
static void yy_flex_strncpy (char* s1, const char * s2, int n )
{
        
    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 )
{
    int n;
    for ( n = 0; s[n]; ++n )
        ;
 
    return n;
}
#endif
 
void *yyalloc (yy_size_t  size )
{
            return malloc(size);
}
 
void *yyrealloc  (void * ptr, yy_size_t  size )
{
        
    /* 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 )
{
            free( (char *) ptr );   /* see yyrealloc() for (char *) cast */
}
 
#define YYTABLES_NAME "yytables"
 
#line 190 "hecmw_heclex.l"
 
 
static void
set_flag_header(int flag)
{
    flag_header = flag ? 1 : 0;
}
 
 
int
HECMW_heclex_get_lineno(void)
{
    return flag_including ? lineno_inc : lineno;
}
 
 
double
HECMW_heclex_get_number(void)
{
    return yylval.dval;
}
 
 
char *
HECMW_heclex_get_text(void)
{
    return yytext;
}
 
 
int
HECMW_heclex_is_including(void)
{
    return flag_including ? 1 : 0;
}
 
 
int
HECMW_heclex_next_token(void)
{
    return yylex();
}
 
 
int
HECMW_heclex_next_token_skip(int skip_token)
{
    int token;
    while((token = yylex())) {
        if(token != skip_token) break;
    }
    return token;
}
 
 
int
HECMW_heclex_set_input(FILE *fp)
{
    static int first = 1;
    if(fp == NULL) return -1;
    if(first) {
        yyin = fp;
        first = 0;
    } else {
        yyrestart(fp);
    }
    lineno = 1;
    return 0;
}
 
 
int
HECMW_heclex_skip_line(void)
{
    int token;
    while((token = HECMW_heclex_next_token())) {
        if(token == HECMW_HECLEX_NL) break;
    }
    return token;
}
 
 
int
HECMW_heclex_switch_to_include(const char *filename)
{
    if(filename == NULL) return -1;
    if(flag_including) {
        HECMW_set_error(HECMW_IO_E0004, "File: %s, %s", filename);
        return -1;
    }
    if((incfp = fopen(filename, "r")) == NULL) {
        HECMW_set_error(HECMW_IO_E0005, "File: %s, %s", filename, strerror(errno));
        return -1;
    }
    snprintf(include_filename, sizeof(include_filename), "%s", filename);
    prev_state = YY_CURRENT_BUFFER;
    yy_switch_to_buffer(yy_create_buffer(incfp, YY_BUF_SIZE));
    lineno_inc = 1;
    flag_including = 1;
    BEGIN INCLUDE;
    return 0;
}
 
 
int
HECMW_heclex_unput_token(void)
{
    char *p = yytext;
    while(*p) {
        if(*p == '\n') {
            if(YYSTATE == INCLUDE) {
                lineno_inc--;
            } else {
                lineno--;
            }
        }
        p++;
    }
    yyless(0);
    return 0;
}
 
 
int
HECMW_hecwrap(void)
{
    return 1;
}