view tests/agcl/examples/good/jrc.cpp @ 6:607e3be6bad8

Adjust to the moving target called the C++ standard. Apparently nowadays it's not allowed to define an explicit copy constructor but not an assignment operator. Consequently, defining the explicit copy constructor in terms of the implicit/automatic assignment operator for general convenience no longer works. Add assignment operators. Caution: not tested with the IBM compiler, but there's no particular reason it shouldn't work.
author David A. Holland
date Mon, 30 May 2022 23:46:22 -0400
parents 13d2b8934445
children
line wrap: on
line source

/*

    Copyright (C) 1989,1990 James A. Roskind, All rights reserved.

    This grammar was developed  and  written  by  James  A.  Roskind.
    Copying  of  this  grammar  description, as a whole, is permitted
    providing this notice is intact and applicable  in  all  complete
    copies.   Translations as a whole to other parser generator input
    languages  (or  grammar  description  languages)   is   permitted
    provided  that  this  notice is intact and applicable in all such
    copies,  along  with  a  disclaimer  that  the  contents  are   a
    translation.   The reproduction of derived text, such as modified
    versions of this grammar, or the output of parser generators,  is
    permitted,  provided  the  resulting  work includes the copyright
    notice "Portions Copyright (c)  1989,  1990  James  A.  Roskind".
    Derived products, such as compilers, translators, browsers, etc.,
    that  use  this  grammar,  must also provide the notice "Portions
    Copyright  (c)  1989,  1990  James  A.  Roskind"  in   a   manner
    appropriate  to  the  utility,  and in keeping with copyright law
    (e.g.: EITHER displayed when first invoked/executed; OR displayed
    continuously on display terminal; OR via placement in the  object
    code  in  form  readable in a printout, with or near the title of
    the work, or at the end of the file).  No royalties, licenses  or
    commissions  of  any  kind are required to copy this grammar, its
    translations, or derivative products, when the copies are made in
    compliance with this notice. Persons or corporations that do make
    copies in compliance with this notice may charge  whatever  price
    is  agreeable  to  a  buyer, for such copies or derivative works.
    THIS GRAMMAR IS PROVIDED ``AS IS'' AND  WITHOUT  ANY  EXPRESS  OR
    IMPLIED  WARRANTIES,  INCLUDING,  WITHOUT LIMITATION, THE IMPLIED
    WARRANTIES  OF  MERCHANTABILITY  AND  FITNESS  FOR  A  PARTICULAR
    PURPOSE.

    James A. Roskind
    Independent Consultant
    516 Latania Palm Drive
    Indialantic FL, 32903
    (407)729-4348
    jar@ileaf.com
    or ...!uunet!leafusa!jar


 ******************************************************************************

 Translation to AnaGram and Interfacing
 Copyright 1993 Parsifal Software. All rights reserved.

 This software is provided 'as-is', without any express or implied
 warranty.  In no event will the authors be held liable for any damages
 arising from the use of this software.

 Permission is granted to anyone to use this software for any purpose,
 including commercial applications, and to alter it and redistribute it
 freely, subject to the following restrictions:

 1. The origin of this software must not be misrepresented; you must not
    claim that you wrote the original software. If you use this software
    in a product, an acknowledgment in the product documentation would be
    appreciated but is not required.
 2. Altered source versions must be plainly marked as such, and must not be
    misrepresented as being the original software.
 3. This notice may not be removed or altered from any source distribution.

 ******************************************************************************

*/

#include "mpp.h"


/*
 * AnaGram, A System for Syntax Directed Programming
 * File generated by: ...
 *
 * AnaGram Parsing Engine
 * Copyright 1993-2002 Parsifal Software. All Rights Reserved.
 *
 * This software is provided 'as-is', without any express or implied
 * warranty.  In no event will the authors be held liable for any damages
 * arising from the use of this software.
 *
 * Permission is granted to anyone to use this software for any purpose,
 * including commercial applications, and to alter it and redistribute it
 * freely, subject to the following restrictions:
 *
 * 1. The origin of this software must not be misrepresented; you must not
 *    claim that you wrote the original software. If you use this software
 *    in a product, an acknowledgment in the product documentation would be
 *    appreciated but is not required.
 * 2. Altered source versions must be plainly marked as such, and must not be
 *    misrepresented as being the original software.
 * 3. This notice may not be removed or altered from any source distribution.
 */

#ifndef JRC_H
#include "jrc.h"
#endif

#ifndef JRC_H
#error Mismatched header file
#endif

#include <ctype.h>
#include <stdio.h>

#define RULE_CONTEXT (&((PCB).cs[(PCB).ssx]))
#define ERROR_CONTEXT ((PCB).cs[(PCB).error_frame_ssx])
#define CONTEXT ((PCB).cs[(PCB).ssx])



cc_pcb_type cc_pcb;
#define PCB cc_pcb
#define CHANGE_REDUCTION(x) cc_change_reduction(cc_##x##_token)
int cc_change_reduction(cc_token_type);

#define INPUT_VALUE(type) *(type *) &(PCB).input_value

#line - "jrc.syn"
                                           // Embedded C

#define SYNTAX_ERROR syntax_error(PCB.error_message)
#define INPUT_CODE(T) (T).id

static int typedef_flag = 0;
static int use_count = 0;

symbol_type_enum symbol_table[N_SYMBOLS];


static void do_typedef(token t) {
  if (typedef_flag == 0) return;
  typedef_flag = 0;
  symbol_table[t.handle] = typedef_name;
}

static token check_typedef(token t) {
  if (symbol_table[t.handle] == typedef_name)
    CHANGE_REDUCTION(TYPEDEFname);
  return t;
}

// Member Functions for Class c_parser

// Constructor

/*
  This parser has no provisions for multiple simultaneous parses or for
  recursion. The purpose of use_count is to make sure that there is only one
  copy of the parser active at any time.
*/


c_parser::c_parser() {
  assert(use_count == 0);
  use_count++;
  typedef_flag = 0;
  memset(symbol_table, 0, sizeof(symbol_table));
  init_cc();                                // init parse
}


// Destructor

c_parser::~c_parser() {
  use_count--;                              // Makes parser available
}


// Reset Parser

c_parser &reset(c_parser &c) {
  typedef_flag = 0;
  memset(symbol_table, 0, sizeof(symbol_table));
  init_cc();                                // init parse
  return c;
}


// Transmit token to c_parser

/*
  The overloaded operator "<<" is used to transmit data to a parser.
  Newline tokens are filtered out, since they are passed along by the
  token scanner only in case text output of the preprocessor is
  required.

  If the parser has encountered an error, there is no point in giving
  it any further input.

  Otherwise, the input_code and input_value fields of the pcb are set
  up and cc() is called to deal with the token.
*/

token_sink &c_parser::operator << (token c) {
  if (PCB.exit_flag != AG_RUNNING_CODE || (int) c.id == '\n') return *this;
  PCB.input_code = c.id;
  PCB.input_value = c;
  cc();
  return *this;
}

token_sink &c_parser::operator << (token *s) {
  while (s->id != END_OF_FILE && PCB.exit_flag == AG_RUNNING_CODE) {
    if ((int) s->id == 10) continue;
    PCB.input_code = s->id;
    PCB.input_value = *s++;
    cc();
  }
  return *this;
}

#line - "jrc.cpp"

#ifndef CONVERT_CASE
#define CONVERT_CASE(c) (c)
#endif
#ifndef TAB_SPACING
#define TAB_SPACING 8
#endif

static void ag_rp_1(void) {
#line - "jrc.syn"
  typedef_flag = 1;
#line - "jrc.cpp"
}

static void ag_rp_2(int f) {
#line - "jrc.syn"
  typedef_flag = f;
#line - "jrc.cpp"
}

static int ag_rp_3(void) {
#line - "jrc.syn"
int f = typedef_flag; typedef_flag = 0; return f;
#line - "jrc.cpp"
}

static void ag_rp_4(token s) {
#line - "jrc.syn"
  do_typedef(s);
#line - "jrc.cpp"
}

static token ag_rp_5(token t) {
#line - "jrc.syn"
  return check_typedef(t);
#line - "jrc.cpp"
}


#ifndef AG_TRACE_FILE_NAME
#define AG_TRACE_FILE_NAME "jrc.etr"
#endif

static void ag_trace_error(void) {
  FILE *ag_file = fopen(AG_TRACE_FILE_NAME, "w");
  int i;
  if (ag_file == NULL) return;
  fprintf(ag_file, "%d\n", (PCB).ssx);
  for (i = 0; i < (PCB).ssx; i++) fprintf(ag_file, "%d\n", (PCB).ss[i]);
  fprintf(ag_file, "%d\n", (PCB).sn);
  fprintf(ag_file, "%d\n", (PCB).token_number);
  fclose(ag_file);
}


#define READ_COUNTS 
#define WRITE_COUNTS 
#undef V
#define V(i,t) (*t (&(PCB).vs[(PCB).ssx + i]))
#undef VS
#define VS(i) (PCB).vs[(PCB).ssx + i]

#ifndef GET_CONTEXT
#define GET_CONTEXT CONTEXT = (PCB).input_context
#endif

typedef enum {
  ag_action_1,
  ag_action_2,
  ag_action_3,
  ag_action_4,
  ag_action_5,
  ag_action_6,
  ag_action_7,
  ag_action_8,
  ag_action_9,
  ag_action_10,
  ag_action_11,
  ag_action_12
} ag_parser_action;


#ifndef NULL_VALUE_INITIALIZER
#define NULL_VALUE_INITIALIZER = { 0 }
#endif

static cc_vs_type const ag_null_value NULL_VALUE_INITIALIZER;

static const unsigned char far ag_rpx[] = {
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  2,  0,  3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  4,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  5
};

#define AG_TCV(x) ag_tcv[(x)]

static const unsigned char far ag_tcv[] = {
    5,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 40,  0,  0,
    0, 43, 35,  0, 16, 18, 36, 37, 29, 38, 23, 42,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0, 67, 84, 49, 69, 50, 66,  0, 62, 77, 25,  0, 27, 71,142,
   54, 78, 52, 26, 51, 46, 75, 72, 74, 70, 55, 79, 64, 73, 47, 76, 11, 13,
    0, 20,  0, 21, 58,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,125, 60,127,
   39,  0,  0, 10,  9,  8,  7,186,110,167,155,113,102,166,156,163,118,160,
  137,108,117,164,165,159,115,116,111,168,114,119, 33,109,128,161,107,129,
  120,112,103,162,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0
};

#ifndef SYNTAX_ERROR
#define SYNTAX_ERROR fprintf(stderr,"%s, line %d, column %d\n", \
  (PCB).error_message, (PCB).line, (PCB).column)
#endif

#ifndef FIRST_LINE
#define FIRST_LINE 1
#endif

#ifndef FIRST_COLUMN
#define FIRST_COLUMN 1
#endif

#ifndef PARSER_STACK_OVERFLOW
#define PARSER_STACK_OVERFLOW {fprintf(stderr, \
   "\nParser stack overflow, line %d, column %d\n",\
   (PCB).line, (PCB).column);}
#endif

#ifndef REDUCTION_TOKEN_ERROR
#define REDUCTION_TOKEN_ERROR {fprintf(stderr, \
    "\nReduction token error, line %d, column %d\n", \
    (PCB).line, (PCB).column);}
#endif


#ifndef AG_NEWLINE
#define AG_NEWLINE 10
#endif

#ifndef AG_RETURN
#define AG_RETURN 13
#endif

#ifndef AG_FORMFEED
#define AG_FORMFEED 12
#endif

#ifndef AG_TABCHAR
#define AG_TABCHAR 9
#endif

static void ag_track(void) {
  switch ((PCB).input_code) {
  case AG_NEWLINE:
    (PCB).column = 1, (PCB).line++;
  case AG_RETURN:
  case AG_FORMFEED:
    break;
  case AG_TABCHAR:
    (PCB).column += (TAB_SPACING) - ((PCB).column - 1) % (TAB_SPACING);
    break;
  default:
    (PCB).column++;
  }
  (PCB).read_flag = 1;
}


static void ag_prot(void) {
  int ag_k;
  ag_k = 128 - ++(PCB).btsx;
  if (ag_k <= (PCB).ssx) {
    ag_trace_error();
    (PCB).exit_flag = AG_STACK_ERROR_CODE;
    PARSER_STACK_OVERFLOW;
    return;
  }
  (PCB).bts[(PCB).btsx] = (PCB).sn;
  (PCB).bts[ag_k] = (PCB).ssx;
  (PCB).vs[ag_k] = (PCB).vs[(PCB).ssx];
  (PCB).ss[ag_k] = (PCB).ss[(PCB).ssx];
}

static void ag_undo(void) {
  if ((PCB).drt == -1) return;
  while ((PCB).btsx) {
    int ag_k = 128 - (PCB).btsx;
    (PCB).sn = (PCB).bts[(PCB).btsx--];
    (PCB).ssx = (PCB).bts[ag_k];
    (PCB).vs[(PCB).ssx] = (PCB).vs[ag_k];
    (PCB).ss[(PCB).ssx] = (PCB).ss[ag_k];
  }
  (PCB).token_number = (cc_token_type) (PCB).drt;
  (PCB).ssx = (PCB).dssx;
  (PCB).sn = (PCB).dsn;
  (PCB).drt = -1;
}



static const int far ag_rtt[] = {
   15,106,  0
};

static const unsigned char far ag_tstt[] = {
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,5,0,1,3,4,15,82,83,85,86,87,88,89,91,92,94,95,96,97,98,99,101,
  104,105,106,121,123,169,170,171,179,180,181,182,
186,125,0,15,24,106,
129,128,0,122,124,
186,36,16,0,15,171,179,180,181,182,
186,103,102,36,16,0,15,89,91,101,171,179,180,181,182,
111,110,109,108,107,103,102,0,99,101,
120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,102,0,99,101,
  104,
111,110,109,108,107,103,102,0,99,100,101,
120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,102,0,99,100,
  101,104,
20,16,0,174,185,
84,29,0,
84,29,0,
111,110,109,108,107,103,102,84,0,99,101,
111,110,109,108,107,103,102,84,0,99,100,101,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,157,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,0,15,89,99,101,104,105,106,121,123,171,179,180,181,182,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,0,15,89,99,100,101,104,105,106,121,123,171,179,180,181,182,
186,36,16,0,15,89,93,106,145,171,172,173,175,176,177,179,180,181,182,
186,36,16,0,15,89,93,106,145,171,172,173,175,176,177,179,180,181,182,
125,84,0,150,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,5,0,15,82,83,85,86,87,88,89,91,92,94,95,96,97,98,99,101,104,
  105,106,121,123,169,170,171,179,180,181,182,
5,0,
125,0,
186,0,15,24,106,138,
186,125,0,15,24,106,
18,0,
20,18,16,0,174,185,
18,0,
186,103,102,36,16,0,15,89,101,171,179,180,181,182,
186,40,39,38,37,36,35,33,27,26,21,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,
  32,41,44,45,48,53,56,57,59,61,63,65,80,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,18,0,15,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,121,123,
  140,141,143,146,
20,0,
186,36,16,0,15,89,179,180,181,
186,36,16,0,15,89,93,106,145,172,173,175,176,177,179,180,181,
186,36,16,0,15,89,93,106,145,172,173,175,176,177,179,180,181,
186,36,16,0,15,89,93,106,145,172,173,175,176,177,179,180,181,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,0,15,89,99,101,104,105,106,121,123,179,180,181,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,16,0,15,89,99,100,101,104,105,106,121,123,179,180,181,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,
186,168,167,166,165,164,163,162,161,159,156,155,137,129,128,127,125,120,119,
  118,117,116,115,114,113,112,111,110,109,108,107,103,102,84,40,39,38,37,
  36,35,33,27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,
  44,45,48,53,56,57,59,61,63,65,81,82,83,85,86,87,88,91,92,94,95,96,97,98,
  99,101,104,105,106,121,123,149,150,151,152,153,154,157,158,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,157,
125,84,69,29,0,90,150,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,157,
125,84,69,29,0,90,150,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,157,
186,36,16,0,15,106,171,173,175,176,177,178,179,180,181,182,
20,16,0,174,185,
186,103,102,36,16,0,15,89,91,101,106,145,171,173,175,176,177,179,180,181,
  182,
125,0,150,
84,69,29,0,90,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,157,
125,0,150,
84,69,29,0,90,
186,0,15,24,106,138,
127,69,29,0,139,
127,29,0,
125,0,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,0,85,91,94,97,
  98,101,104,105,106,121,123,126,130,131,132,
20,16,0,174,185,
20,16,0,174,185,
13,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,
27,26,25,23,20,16,0,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,40,39,38,37,36,
  35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,31,32,34,41,44,
  45,48,53,56,57,59,61,63,65,85,91,94,97,98,101,104,105,106,121,123,
43,42,36,0,
38,37,0,
47,46,0,
52,51,50,49,0,
55,54,0,
35,0,
58,0,
60,0,
62,0,
66,64,0,
21,0,
111,110,109,108,107,103,102,0,99,101,
111,110,109,108,107,103,102,0,99,100,101,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,29,20,18,16,0,15,89,99,101,104,105,106,121,123,144,174,179,180,
  181,183,184,185,
186,36,20,16,0,15,89,106,144,145,174,175,176,179,180,181,183,184,185,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,29,20,18,16,0,15,89,99,100,101,104,105,106,121,123,144,174,179,
  180,181,183,184,185,
186,36,20,16,0,15,89,106,144,145,174,175,176,179,180,181,183,184,185,
29,0,
18,0,
29,18,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,63,65,80,
186,36,16,0,15,179,180,181,
186,103,102,36,16,0,15,89,91,101,179,180,181,
20,16,0,174,185,
84,69,29,0,90,
186,36,16,0,15,106,173,175,176,177,178,179,180,181,
186,103,102,36,16,0,15,89,91,101,106,145,173,175,176,177,179,180,181,
84,69,29,0,90,
84,69,29,0,90,
84,69,29,0,90,
79,78,77,76,75,74,73,72,71,70,69,0,68,
29,0,
84,79,78,77,76,75,74,73,72,71,70,69,67,66,64,62,60,58,55,54,52,51,50,49,47,
  46,43,42,38,37,36,35,29,27,26,25,23,20,16,0,
186,84,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,81,
84,0,
84,0,
186,0,15,24,106,
16,0,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
16,0,
16,0,
16,0,
84,0,
67,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,63,65,80,
67,0,
186,168,167,166,165,164,163,162,161,159,156,155,127,125,84,40,39,38,37,36,
  35,33,27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,
  45,48,53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,111,110,109,108,107,103,102,67,36,16,0,
186,168,167,166,165,164,163,162,161,159,156,155,137,129,128,127,125,120,119,
  118,117,116,115,114,113,112,111,110,109,108,107,103,102,84,40,39,38,37,
  36,35,33,27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,
  44,45,48,53,56,57,59,61,63,65,81,82,83,85,86,87,88,91,92,94,95,96,97,98,
  99,101,104,105,106,121,123,149,150,151,152,153,154,158,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,
186,125,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,147,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,
20,16,0,174,185,
18,0,
186,36,16,0,15,106,171,173,175,176,177,178,179,180,181,182,
18,0,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,18,0,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,121,123,140,
  141,143,
186,103,102,36,16,0,15,89,101,106,145,171,173,175,176,177,179,180,181,182,
186,36,16,0,15,106,171,173,175,176,177,178,179,180,181,182,
186,137,129,128,125,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,82,83,85,86,87,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,150,
127,29,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,63,65,80,
186,0,15,24,106,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,0,85,91,94,97,
  98,101,104,105,106,121,123,126,130,131,132,
103,102,0,101,
103,102,0,101,
120,119,118,117,116,115,114,113,112,103,102,0,101,104,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,67,36,16,0,15,
  89,101,104,105,106,121,123,133,136,179,180,181,
186,67,36,16,0,15,89,93,106,134,136,145,172,173,175,176,177,179,180,181,
84,29,0,
84,29,0,
186,137,129,128,127,120,119,118,117,116,115,114,113,112,103,102,0,85,91,94,
  97,98,101,104,105,106,121,123,130,131,132,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,40,39,38,37,36,
  35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,31,32,34,41,44,
  45,48,53,56,57,59,61,63,65,85,91,94,97,98,101,104,105,106,121,123,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,0,15,24,106,
186,0,15,24,106,
186,40,39,38,37,36,35,33,27,26,18,16,13,11,10,9,8,7,0,6,12,14,15,19,22,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,137,129,128,120,119,118,117,116,115,114,113,112,103,102,36,20,18,16,0,
  101,104,105,106,121,123,144,174,183,184,185,
36,20,16,0,144,174,183,184,185,
18,0,
29,18,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,20,18,16,0,15,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,
  121,123,140,141,143,174,179,180,181,183,184,185,
186,103,102,36,20,16,0,15,89,91,101,144,174,179,180,181,183,184,185,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,20,18,16,0,15,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,
  121,123,140,141,143,174,175,176,179,180,181,183,184,185,
186,103,102,36,20,16,0,15,89,91,101,106,144,145,174,175,176,179,180,181,183,
  184,185,
186,142,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,
  103,102,0,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,121,123,143,
186,0,15,
21,0,
20,18,16,0,174,185,
186,103,102,36,16,0,15,89,101,179,180,181,
186,36,16,0,15,106,173,175,176,177,178,179,180,181,
186,103,102,36,16,0,15,89,101,106,145,173,175,176,177,179,180,181,
186,36,16,0,15,106,173,175,176,177,178,179,180,181,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,30,31,
  32,41,44,45,48,53,56,57,59,61,63,65,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,30,31,
  32,41,44,45,48,53,56,57,59,61,63,65,
84,0,
84,0,
186,84,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,81,
162,0,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
67,0,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,168,167,166,165,164,163,162,161,159,156,155,127,125,84,40,39,38,37,36,
  35,33,27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,
  45,48,53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,125,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,147,148,
18,0,
20,16,0,174,185,
20,18,16,0,174,185,
20,16,0,174,185,
186,36,16,0,15,106,171,173,175,176,177,178,179,180,181,182,
20,18,16,0,174,185,
127,69,29,0,139,
186,137,129,128,127,120,119,118,117,116,115,114,113,112,103,102,0,85,91,94,
  97,98,101,104,105,106,121,123,130,131,132,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,63,65,80,
84,67,29,0,135,136,
84,67,29,0,135,136,
186,67,36,16,0,15,89,133,136,179,180,181,
186,67,36,16,0,15,89,93,106,134,136,145,172,173,175,176,177,179,180,181,
18,0,
29,18,0,
29,21,0,
186,137,129,128,120,119,118,117,116,115,114,113,112,111,110,109,108,107,103,
  102,36,20,18,16,0,83,85,88,91,92,94,95,96,97,98,99,101,104,105,106,121,
  123,140,141,143,174,183,184,185,
103,102,36,20,16,0,91,101,144,174,183,184,185,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
43,42,36,0,
43,42,36,0,
38,37,0,
38,37,0,
47,46,0,
47,46,0,
47,46,0,
47,46,0,
52,51,50,49,0,
52,51,50,49,0,
55,54,0,
35,0,
58,0,
60,0,
67,29,0,
62,0,
18,0,
18,0,
18,0,
186,103,102,36,20,16,0,15,89,101,144,174,179,180,181,183,184,185,
186,103,102,36,20,16,0,15,89,101,106,144,145,174,175,176,179,180,181,183,
  184,185,
186,36,16,0,15,106,173,175,176,177,178,179,180,181,
84,0,
16,0,
29,18,0,
29,18,0,
29,18,0,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
127,29,0,
20,18,16,0,174,185,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,30,31,
  32,41,44,45,48,53,56,57,59,61,63,65,
103,102,36,20,16,0,101,144,174,183,184,185,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,30,31,32,
  41,44,45,48,53,56,57,59,61,63,65,
20,16,0,174,185,
186,84,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,81,
186,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,30,
  31,32,41,44,45,48,53,56,57,59,61,63,65,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
186,127,125,40,39,38,37,36,35,33,27,26,16,13,11,10,9,8,7,0,6,12,14,15,19,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,147,
84,0,
29,18,0,
160,0,
186,40,39,38,37,36,35,33,27,26,18,16,13,11,10,9,8,7,0,6,12,14,15,17,19,28,
  30,31,32,41,44,45,48,53,56,57,59,61,63,65,81,
84,0,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
18,0,
186,168,167,166,165,164,163,162,161,159,156,155,125,84,40,39,38,37,36,35,33,
  27,26,16,13,11,10,9,8,7,0,2,6,12,14,15,17,19,24,28,30,31,32,41,44,45,48,
  53,56,57,59,61,63,65,81,106,149,150,151,152,153,154,
  0
};


static unsigned const char far ag_astt[5043] = {
  2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,8,7,0,1,1,2,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,1,7,1,1,1,1,1,7,2,1,2,1,1,7,2,1,1,
  1,1,1,2,1,1,1,1,7,2,3,1,1,3,3,1,3,3,3,3,3,3,2,9,9,5,3,3,9,9,9,9,9,9,9,9,9,
  3,3,3,3,2,9,9,5,3,3,3,9,9,9,9,2,9,9,5,3,3,3,9,9,9,9,9,9,9,9,9,9,9,9,9,2,9,
  9,5,3,3,3,3,1,1,5,3,1,3,1,7,3,1,7,3,3,3,3,2,9,9,3,5,3,3,9,9,9,9,2,9,9,3,5,
  3,3,3,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,3,1,2,1,4,4,3,3,3,3,3,3,3,3,3,3,3,3,3,2,9,9,1,1,7,2,1,3,3,
  3,3,3,1,3,1,1,1,1,1,2,1,4,4,3,3,3,3,3,3,3,3,3,9,9,9,9,2,9,9,1,1,7,2,1,3,3,
  3,3,3,3,1,3,1,1,1,1,1,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,2,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,3,7,3,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,
  1,5,7,2,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,1,1,1,1,1,3,7,1,5,2,
  7,1,1,1,1,2,1,7,1,1,1,1,7,1,3,1,7,3,1,1,7,2,9,9,1,1,7,2,3,3,3,3,1,3,3,2,1,
  1,1,1,1,1,1,1,1,3,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,3,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,5,2,1,1,7,2,1,1,1,1,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,2,1,
  1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,2,1,4,4,3,
  3,3,3,3,3,3,3,3,3,3,3,3,2,9,9,1,1,7,2,1,3,3,3,3,3,1,3,1,1,1,2,1,4,4,3,3,3,
  3,3,3,3,3,3,9,9,9,9,2,9,9,1,1,7,2,1,3,3,3,3,3,3,1,3,1,1,1,2,1,4,4,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,2,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,2,1,
  1,1,1,1,1,1,1,1,1,1,1,4,4,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,8,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,7,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,2,1,4,4,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,2,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,1,5,1,
  5,7,3,3,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,3,1,1,5,1,5,7,3,3,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,
  1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,2,1,1,7,2,1,1,1,1,1,1,1,
  1,1,1,1,1,1,5,3,1,2,1,1,1,1,7,2,3,1,1,1,3,3,3,3,3,3,3,1,3,3,1,5,3,5,1,5,7,
  3,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,3,1,1,5,3,5,1,5,7,3,2,7,1,1,1,1,5,1,5,7,3,3,1,7,1,5,2,1,4,4,1,
  1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,3,1,1,1,5,3,1,9,
  5,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,2,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,7,1,1,1,1,1,3,1,3,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,
  1,3,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,9,9,1,1,1,1,5,2,1,
  4,4,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,7,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,5,1,1,5,1,1,5,1,
  1,1,1,5,1,1,5,1,5,1,5,1,5,1,5,1,1,5,3,7,3,3,3,3,2,9,9,5,3,3,9,9,9,9,2,9,9,
  5,3,3,3,2,1,4,4,3,3,3,3,3,3,3,3,3,3,3,3,3,2,9,9,1,5,1,5,1,7,2,3,3,3,3,3,3,
  1,3,3,3,3,1,3,3,3,1,2,1,1,1,5,2,3,1,3,3,3,3,3,3,1,3,3,3,1,2,1,4,4,3,3,3,3,
  3,3,3,3,3,9,9,9,9,2,9,9,1,5,1,5,1,7,2,3,3,3,3,3,3,3,1,3,3,3,3,1,3,3,3,1,2,
  1,1,1,5,2,3,1,3,3,3,3,3,3,1,3,3,3,1,1,5,3,7,1,3,7,2,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,2,1,1,1,2,1,1,
  1,1,7,2,3,1,1,3,1,3,1,1,5,3,1,5,1,5,7,3,2,1,1,7,2,1,1,1,1,1,1,1,1,1,2,1,1,
  1,1,7,2,3,1,1,1,3,3,3,3,3,3,1,3,5,1,5,7,3,5,1,5,7,3,5,1,5,7,3,1,1,1,1,1,1,
  1,1,1,1,1,5,1,1,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
  5,5,5,5,5,5,5,5,5,5,5,7,2,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,7,3,7,2,7,1,1,1,1,7,2,1,1,1,1,1,1,1,1,1,
  1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,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,7,1,7,1,7,3,7,1,7,2,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,2,1,1,1,1,1,1,1,1,
  1,1,1,3,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,5,5,5,5,5,5,5,5,5,5,5,7,2,1,1,1,1,1,1,1,
  1,1,1,1,1,4,4,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,8,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,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,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,2,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,2,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,2,1,4,4,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,2,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,2,1,
  4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,3,1,1,7,1,1,1,7,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,7,2,1,4,4,1,1,1,1,
  1,1,1,1,1,1,1,1,1,2,1,1,3,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,9,9,
  1,1,7,2,3,3,1,3,3,3,3,3,3,3,1,3,3,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,2,1,4,4,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,3,3,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,3,3,2,7,1,1,1,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,9,9,5,3,9,9,5,3,9,9,9,9,9,9,9,9,9,9,9,5,3,3,2,1,4,4,3,3,3,3,3,3,
  3,3,3,9,9,1,1,1,7,2,1,3,3,3,3,1,3,3,3,1,1,1,2,1,1,1,7,2,1,1,1,3,3,1,1,1,1,
  1,1,1,1,1,3,1,7,3,1,7,2,1,4,4,3,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,
  1,1,3,1,1,2,1,4,4,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,7,
  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,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,7,
  3,3,3,2,7,3,3,3,2,1,1,1,1,1,1,1,1,1,3,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,4,4,3,3,3,3,3,3,3,3,3,9,9,1,1,5,1,7,3,3,3,3,
  1,3,3,3,3,3,1,1,1,1,5,3,3,3,3,1,1,7,1,3,7,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,7,1,1,1,1,1,3,1,3,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,3,2,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,3,2,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,
  1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,2,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,
  1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,
  2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,
  1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,4,
  4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,3,1,7,2,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,1,1,1,1,1,5,2,3,1,1,3,3,3,1,3,3,3,1,2,1,4,4,1,
  1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,3,1,7,2,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,1,1,1,1,1,5,2,3,1,1,1,3,3,3,3,3,3,1,3,3,3,1,2,
  3,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,3,2,7,3,3,7,1,3,1,7,3,1,2,9,9,1,1,7,2,3,3,3,1,3,2,1,1,7,2,1,1,1,1,1,1,1,
  1,1,2,9,9,1,1,7,2,3,3,1,3,3,3,3,3,3,1,3,2,1,1,7,2,1,1,1,1,1,1,1,1,1,2,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,3,2,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,
  7,3,7,2,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,
  3,3,3,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,2,1,1,1,1,1,1,
  1,1,1,1,1,3,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,7,1,1,5,3,1,1,3,1,7,1,1,1,
  1,5,3,1,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,3,1,7,1,1,5,1,5,7,3,2,1,4,4,3,1,
  1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,3,1,1,2,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,5,1,5,7,3,3,5,1,5,7,3,
  3,2,1,1,1,7,2,1,3,3,1,1,1,2,1,1,1,7,2,1,1,1,3,3,1,1,1,1,1,1,1,1,1,3,7,1,3,
  7,1,3,7,2,1,4,4,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,3,1,7,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,5,1,1,3,3,3,3,1,2,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,3,1,1,1,5,1,1,1,5,1,1,5,1,1,5,1,1,5,1,1,
  5,1,1,5,1,1,5,1,1,1,1,5,1,1,1,1,5,1,1,5,1,5,1,5,1,5,1,1,7,1,5,3,7,3,7,1,7,
  2,9,9,1,1,1,5,2,3,3,3,3,3,1,3,3,3,1,2,9,9,1,1,1,5,2,3,3,1,3,3,3,3,3,3,1,3,
  3,3,1,2,1,1,7,2,1,1,1,1,1,1,1,1,1,1,7,1,7,1,1,7,1,1,7,1,1,7,2,1,1,1,1,1,1,
  1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,3,1,7,1,3,1,7,1,1,2,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,7,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,3,9,9,1,1,1,5,3,3,3,
  3,3,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,3,1,1,5,3,1,2,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,
  3,3,2,1,1,1,1,1,1,1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,2,1,1,1,1,1,1,1,1,1,
  1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,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,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,
  1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,1,7,1,1,7,1,5,2,1,1,1,1,1,1,1,1,1,8,
  1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,7,2,1,1,1,1,
  1,1,1,1,1,1,1,1,8,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,3,3,3,3,3,3,1,7,2,1,1,1,1,1,1,1,1,1,1,1,1,8,1,
  1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
  1,1,1,1,3,3,3,3,3,3,11
};


static const unsigned short far ag_pstt[] = {
312,1,148,148,6,6,6,6,6,6,6,6,6,16,16,16,16,132,15,15,4,3,21,0,0,20,21,287,
  20,13,12,11,10,16,19,15,18,17,8,7,6,5,16,15,6,12,5,2,12,20,20,14,19,9,
  19,14,
312,23,1,22,22,22,
24,24,2,146,24,
312,4,3,3,287,25,27,26,27,25,
312,28,28,4,3,4,287,282,28,28,290,282,9,282,290,
126,126,126,126,132,131,131,102,126,131,
119,119,119,119,119,119,119,119,119,112,112,112,112,132,118,118,100,112,118,
  119,
128,128,128,128,132,128,128,99,128,128,128,
115,115,115,115,115,115,115,115,115,114,114,114,114,132,114,114,97,114,114,
  114,115,
29,30,280,284,31,
90,32,10,
89,33,11,
120,120,120,120,132,125,125,88,101,120,125,
122,122,122,122,132,122,122,87,98,122,122,122,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,14,38,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,247,38,
312,1,148,148,117,117,117,117,117,117,117,117,117,104,104,104,104,132,107,
  107,4,3,15,287,41,104,107,117,124,130,2,124,40,41,9,41,40,
312,1,148,148,113,113,113,113,113,113,113,113,113,105,105,105,105,132,105,
  105,4,3,16,287,43,105,105,105,113,121,127,2,121,42,43,9,43,42,
312,47,45,17,287,48,49,46,49,44,49,49,49,49,49,48,9,48,44,
312,47,45,18,287,51,52,46,52,50,52,52,52,52,52,51,9,51,50,
39,241,19,242,
312,1,148,148,6,6,6,6,6,6,6,6,6,16,16,16,16,132,15,15,4,3,2,20,287,238,13,
  12,11,10,16,19,15,18,17,8,7,6,5,16,15,6,12,5,2,12,238,238,14,19,9,19,14,
3,21,
53,171,
312,23,54,54,54,55,
312,57,24,56,56,56,
58,25,
29,288,30,26,284,31,
59,27,
312,107,107,4,3,28,287,283,107,291,283,9,283,291,
312,62,62,62,62,62,62,61,63,64,301,66,60,65,65,65,65,65,29,65,60,65,65,65,
  67,62,67,67,68,69,70,71,72,73,74,75,76,77,77,
312,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,299,30,86,79,78,82,80,
  83,81,8,7,6,5,82,80,6,78,5,2,78,85,84,84,86,
87,298,
312,89,88,32,287,91,91,90,91,
312,93,92,33,287,94,94,46,94,94,94,94,94,94,94,90,94,
312,93,92,34,287,49,49,46,49,49,49,49,49,49,49,90,49,
312,93,92,35,287,52,52,46,52,52,52,52,52,52,52,90,52,
312,1,148,148,117,117,117,117,117,117,117,117,117,104,104,104,104,132,107,
  107,89,88,36,287,95,104,107,117,124,130,2,124,95,90,95,
312,1,148,148,113,113,113,113,113,113,113,113,113,105,105,105,105,132,105,
  105,89,88,37,287,96,105,105,105,113,121,127,2,121,96,90,96,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,38,223,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,252,
312,100,101,102,103,104,105,106,107,108,110,111,1,148,148,218,39,6,6,6,6,6,
  6,6,6,6,37,37,37,37,132,36,36,109,62,62,62,62,62,62,61,63,64,66,60,65,
  65,65,65,65,39,113,65,60,65,99,98,65,112,98,97,62,67,67,68,69,70,71,72,
  73,74,75,76,98,109,115,13,12,11,10,37,36,35,34,8,7,6,5,37,36,6,12,114,2,
  12,113,113,113,113,113,113,115,113,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,40,116,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,251,116,
39,202,117,202,41,92,246,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,42,118,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,250,118,
39,202,117,202,43,91,245,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,44,119,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,249,119,
312,47,122,45,287,120,25,121,123,123,121,120,27,26,27,25,
29,124,261,262,31,
312,125,125,47,126,47,287,282,125,125,46,265,290,272,265,265,272,282,9,282,
  290,
39,258,244,
202,117,202,49,95,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,50,127,13,12,11,10,
  37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,248,127,
39,258,243,
202,117,202,52,94,
312,53,54,54,54,128,
174,129,174,54,172,
169,130,55,
131,151,
312,1,148,148,134,134,134,134,134,134,134,134,134,135,135,57,133,135,136,
  134,132,135,134,133,132,2,133,139,139,138,137,
29,124,293,294,31,
29,124,285,286,31,
10,13,
312,62,62,62,62,62,62,61,63,64,140,60,65,65,65,65,65,61,65,60,65,65,65,29,
  62,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,62,65,60,65,65,65,28,62,
  28,
312,62,62,62,62,62,62,61,63,64,141,60,65,65,65,65,65,63,65,60,65,65,65,27,
  62,
312,62,62,62,62,62,62,61,63,64,141,60,65,65,65,65,65,64,65,60,65,65,65,26,
  62,
22,21,142,143,145,144,25,
312,1,148,148,134,134,134,134,134,134,134,134,134,146,146,62,62,62,62,62,62,
  61,63,64,66,60,65,65,65,65,65,66,65,60,65,65,149,65,149,97,62,67,148,67,
  68,69,70,71,72,73,74,75,76,149,133,146,147,134,132,146,134,133,132,2,
  133,
150,151,152,43,
153,154,46,
155,156,49,
157,158,159,160,54,
161,162,57,
163,59,
164,61,
165,63,
166,65,
167,168,67,
302,77,
120,120,120,120,132,125,125,101,120,125,
122,122,122,122,132,122,122,98,122,122,122,
312,1,148,148,117,117,117,117,117,117,117,117,117,104,104,104,104,132,107,
  107,170,191,29,191,169,80,287,193,104,107,117,124,130,2,124,192,192,193,
  90,193,192,192,31,
312,172,29,171,187,287,189,46,188,190,188,190,190,189,90,189,188,188,31,
312,1,148,148,113,113,113,113,113,113,113,113,113,105,105,105,105,132,105,
  105,170,184,29,184,169,82,287,186,105,105,105,113,121,127,2,121,185,185,
  186,90,186,185,185,31,
312,172,29,171,180,287,182,46,181,183,181,183,183,182,90,182,181,181,31,
173,176,
300,85,
174,292,86,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,87,65,60,65,65,65,67,62,
  67,67,68,69,70,71,72,73,74,75,76,175,175,
312,89,88,88,287,27,176,27,
312,177,177,89,88,89,287,282,177,177,282,90,282,
29,124,280,284,31,
202,117,202,91,93,
312,93,178,92,287,120,121,123,123,121,120,27,176,27,
312,179,179,93,180,93,287,282,179,179,46,265,272,265,265,272,282,90,282,
202,117,202,94,96,
202,117,202,95,92,
202,117,202,96,91,
181,181,181,181,181,181,181,181,181,181,181,37,181,
182,86,
11,11,11,11,11,11,11,11,11,11,11,11,196,11,11,11,11,11,11,11,11,11,11,11,11,
  11,11,11,11,11,11,11,11,11,11,11,11,11,11,99,
312,183,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,100,65,60,65,65,98,
  65,98,97,62,67,67,68,69,70,71,72,73,74,75,76,98,183,
235,101,
234,102,
312,103,184,184,184,
185,104,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,105,186,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,186,186,186,186,186,186,
187,106,
188,107,
189,108,
226,109,
190,110,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,111,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,74,75,76,191,191,
192,112,
312,100,101,102,103,104,105,106,107,108,110,111,220,39,109,62,62,62,62,62,
  62,61,63,64,66,60,65,65,65,65,65,113,225,65,60,65,99,98,65,112,98,97,62,
  67,67,68,69,70,71,72,73,74,75,76,98,109,112,225,225,225,225,225,225,
129,129,129,129,129,129,129,129,197,129,129,114,
312,100,101,102,103,104,105,106,107,108,110,111,1,148,148,219,39,6,6,6,6,6,
  6,6,6,6,37,37,37,37,132,36,36,109,62,62,62,62,62,62,61,63,64,66,60,65,
  65,65,65,65,115,193,65,60,65,99,98,65,112,98,97,62,67,67,68,69,70,71,72,
  73,74,75,76,98,109,223,13,12,11,10,37,36,35,34,8,7,6,5,37,36,6,12,114,2,
  12,193,193,193,193,193,193,193,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,116,223,13,12,11,
  10,37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,256,
312,194,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,117,65,60,65,65,65,
  203,97,62,67,67,68,69,70,71,72,73,74,75,76,203,203,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,118,223,13,12,11,
  10,37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,255,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,119,223,13,12,11,
  10,37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,254,
29,124,120,195,31,
196,121,
312,47,122,122,287,197,25,121,123,123,121,197,27,26,27,25,
198,123,
312,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,299,124,79,78,82,80,
  83,81,8,7,6,5,82,80,6,78,5,2,78,85,84,84,
312,107,107,47,199,125,287,283,107,46,266,291,273,266,266,273,283,9,283,291,
312,47,122,126,287,200,25,121,123,123,121,200,27,26,27,25,
312,1,148,148,39,6,6,6,6,6,6,6,6,6,37,37,37,37,132,36,36,127,223,13,12,11,
  10,37,36,35,34,8,7,6,5,37,36,6,12,5,2,12,253,
170,130,128,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,129,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,74,75,76,175,175,
312,130,201,201,201,
312,1,148,148,134,134,134,134,134,134,134,134,134,135,135,131,133,135,136,
  134,132,135,134,133,132,2,133,202,202,138,137,
131,131,102,131,
125,125,101,125,
119,119,119,119,119,119,119,119,119,118,118,100,118,119,
312,1,148,148,117,117,117,117,117,117,117,117,117,107,107,203,89,88,135,287,
  204,107,117,124,130,2,124,158,158,204,90,204,
312,203,93,92,136,287,205,205,46,160,160,205,205,205,205,205,205,205,90,205,
157,206,137,
156,207,138,
312,1,148,148,149,134,134,134,134,134,134,134,134,134,135,135,139,133,135,
  136,134,132,135,134,133,132,2,133,155,138,137,
312,1,148,148,134,134,134,134,134,134,134,134,134,146,146,62,62,62,62,62,62,
  61,63,64,66,60,65,65,65,65,65,140,65,60,65,65,149,65,149,97,62,67,208,
  67,68,69,70,71,72,73,74,75,76,149,133,146,147,134,132,146,134,133,132,2,
  133,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,141,65,60,65,65,149,65,
  149,97,62,67,67,68,69,70,71,72,73,74,75,76,149,
312,142,20,20,20,
312,143,19,19,19,
312,62,62,62,62,62,62,61,63,64,17,66,60,65,65,65,65,65,144,65,60,65,65,65,
  209,209,97,62,67,67,68,69,70,71,72,73,74,75,76,209,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,145,65,60,65,65,210,65,
  210,97,62,67,67,68,69,70,71,72,73,74,75,76,210,
312,1,148,148,117,117,117,117,117,117,117,117,117,107,107,212,29,200,211,
  146,107,117,124,130,2,124,201,201,201,201,31,
212,29,211,198,199,199,199,199,31,
213,148,
182,14,149,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,150,65,60,65,65,65,42,
  62,42,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,151,65,60,65,65,65,41,
  62,41,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,152,65,60,65,65,65,40,
  62,40,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,153,65,60,65,65,65,214,
  62,214,214,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,154,65,60,65,65,65,215,
  62,215,215,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,155,65,60,65,65,65,67,
  62,67,67,216,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,156,65,60,65,65,65,67,
  62,67,67,217,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,157,65,60,65,65,65,67,
  62,67,67,68,218,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,158,65,60,65,65,65,67,
  62,67,67,68,219,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,159,65,60,65,65,65,67,
  62,67,67,68,220,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,160,65,60,65,65,65,67,
  62,67,67,68,221,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,161,65,60,65,65,65,67,
  62,67,67,68,69,222,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,162,65,60,65,65,65,67,
  62,67,67,68,69,223,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,163,65,60,65,65,65,67,
  62,67,67,68,69,70,224,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,164,65,60,65,65,65,67,
  62,67,67,68,69,70,71,225,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,165,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,226,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,166,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,227,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,167,65,60,65,65,228,65,
  228,97,62,67,67,68,69,70,71,72,73,74,75,76,228,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,168,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,74,229,
312,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,170,29,299,169,169,
  287,79,78,82,80,83,81,8,7,6,5,82,80,6,78,5,2,78,85,84,84,230,27,176,27,
  232,231,31,
312,233,233,170,29,169,304,287,282,233,233,306,306,282,90,282,306,306,31,
312,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,172,29,299,171,171,
  287,79,78,82,80,83,81,8,7,6,5,82,80,6,78,5,2,78,85,84,84,230,123,123,27,
  176,27,232,231,31,
312,234,234,172,29,171,304,287,282,234,234,46,306,265,306,265,265,282,90,
  282,306,306,31,
312,177,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,173,79,78,82,80,
  83,81,8,7,6,5,82,80,6,78,5,2,78,179,
312,174,195,
303,175,
29,288,124,176,284,31,
312,107,107,89,88,177,287,283,107,283,90,283,
312,93,178,178,287,197,121,123,123,121,197,27,176,27,
312,107,107,93,235,179,287,283,107,46,266,273,266,266,273,283,90,283,
312,93,178,180,287,200,121,123,123,121,200,27,176,27,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,181,65,60,65,65,65,70,
  97,62,67,67,68,69,70,71,72,73,74,75,76,70,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,182,65,60,65,65,65,83,
  97,62,67,67,68,69,70,71,72,73,74,75,76,83,
236,183,
233,184,
312,236,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,185,65,60,65,65,98,
  65,98,97,62,67,67,68,69,70,71,72,73,74,75,76,98,236,
237,186,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,187,65,60,65,65,238,65,
  238,97,62,67,67,68,69,70,71,72,73,74,75,76,238,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,188,65,60,65,65,239,65,
  239,97,62,67,67,68,69,70,71,72,73,74,75,76,239,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,189,65,60,65,65,240,65,
  240,97,62,67,67,68,69,70,71,72,73,74,75,76,240,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,190,217,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,217,217,217,217,217,217,
241,191,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,192,215,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,215,215,215,215,215,215,
312,100,101,102,103,104,105,106,107,108,110,111,221,39,109,62,62,62,62,62,
  62,61,63,64,66,60,65,65,65,65,65,193,225,65,60,65,99,98,65,112,98,97,62,
  67,67,68,69,70,71,72,73,74,75,76,98,109,112,225,225,225,225,225,225,
312,194,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,194,65,60,65,65,65,
  242,97,62,67,67,68,69,70,71,72,73,74,75,76,242,242,242,
275,195,
29,124,274,276,31,
29,278,124,197,195,31,
29,124,267,268,31,
312,47,122,199,287,243,25,121,123,123,121,243,27,26,27,25,
29,270,124,200,195,31,
174,129,174,201,173,
312,1,148,148,150,134,134,134,134,134,134,134,134,134,135,135,202,133,135,
  136,134,132,135,134,133,132,2,133,155,138,137,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,203,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,74,75,76,168,168,
166,203,166,204,164,164,
166,203,166,205,162,162,
312,203,89,88,206,287,204,159,159,204,90,204,
312,203,93,92,207,287,205,205,46,161,161,205,205,205,205,205,205,205,90,205,
30,208,
244,18,209,
182,16,210,
312,1,148,148,6,6,6,6,6,6,6,6,6,82,82,82,82,132,80,80,212,29,299,211,211,79,
  78,82,80,83,81,8,7,6,5,82,80,6,78,5,2,78,85,84,84,230,232,231,31,
245,245,212,29,211,304,245,245,306,306,306,306,31,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,213,65,60,65,65,65,38,
  62,38,
150,151,152,45,
150,151,152,44,
153,154,48,
153,154,47,
155,156,53,
155,156,52,
155,156,51,
155,156,50,
157,158,159,160,56,
157,158,159,160,55,
161,162,58,
163,60,
164,62,
165,64,
246,182,228,
166,66,
310,230,
309,231,
247,232,
312,107,107,170,29,169,305,287,283,107,307,307,283,90,283,307,307,31,
312,107,107,172,29,171,305,287,283,107,46,307,266,307,266,266,283,90,283,
  307,307,31,
312,93,178,235,287,243,121,123,123,121,243,27,176,27,
248,236,
249,237,
182,250,238,
182,251,239,
182,252,240,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,241,216,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,216,216,216,216,216,216,
204,253,242,
29,271,124,243,195,31,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,244,65,60,65,65,65,24,
  97,62,67,67,68,69,70,71,72,73,74,75,76,24,
107,107,212,29,211,305,107,307,307,307,307,31,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,246,65,60,65,65,65,67,
  62,67,67,68,69,70,71,72,73,74,75,76,68,
29,124,308,311,31,
312,254,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,248,65,60,65,65,98,
  65,98,97,62,67,67,68,69,70,71,72,73,74,75,76,98,254,
312,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,249,65,60,65,65,255,65,
  255,97,62,67,67,68,69,70,71,72,73,74,75,76,255,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,250,230,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,230,230,230,230,230,230,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,251,229,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,229,229,229,229,229,229,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,252,256,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,256,256,256,256,256,256,
312,205,194,62,62,62,62,62,62,61,63,64,66,60,65,65,65,65,65,253,65,60,65,65,
  65,208,97,62,67,67,68,69,70,71,72,73,74,75,76,208,208,
257,254,
182,258,255,
259,227,
312,62,62,62,62,62,62,61,63,64,260,66,60,65,65,65,65,65,257,65,60,65,65,98,
  65,98,97,62,67,67,68,69,70,71,72,73,74,75,76,98,260,
231,258,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,259,228,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,228,228,228,228,228,228,
261,260,
312,100,101,102,103,104,105,106,107,108,110,111,39,109,62,62,62,62,62,62,61,
  63,64,66,60,65,65,65,65,65,261,232,65,60,65,99,98,65,112,98,97,62,67,67,
  68,69,70,71,72,73,74,75,76,98,109,112,232,232,232,232,232,232,
  0
};


static const unsigned short far ag_sbt[] = {
     0,  56,  62,  67,  77,  92, 102, 122, 133, 154, 159, 162, 165, 176,
   188, 232, 269, 307, 326, 345, 349, 402, 404, 406, 412, 418, 420, 426,
   428, 442, 481, 525, 527, 536, 553, 570, 587, 622, 658, 701, 804, 848,
   855, 899, 906, 950, 966, 971, 992, 995,1000,1044,1047,1052,1058,1063,
  1066,1068,1099,1104,1109,1111,1136,1162,1187,1212,1219,1284,1288,1291,
  1294,1299,1302,1304,1306,1308,1310,1313,1315,1325,1336,1379,1398,1442,
  1461,1463,1465,1468,1506,1514,1527,1532,1537,1551,1570,1575,1580,1585,
  1598,1600,1640,1681,1683,1685,1690,1692,1754,1756,1758,1760,1762,1764,
  1802,1804,1867,1879,1981,2024,2064,2107,2150,2155,2157,2173,2175,2217,
  2237,2253,2296,2299,2337,2342,2373,2377,2381,2395,2427,2447,2450,2453,
  2484,2549,2588,2593,2598,2638,2677,2708,2717,2719,2722,2748,2774,2800,
  2827,2854,2882,2910,2939,2968,2997,3026,3056,3086,3117,3149,3182,3216,
  3255,3290,3343,3362,3417,3440,3480,3483,3485,3491,3503,3517,3535,3549,
  3587,3625,3627,3629,3670,3672,3711,3750,3789,3851,3853,3915,3978,4019,
  4021,4026,4032,4037,4053,4059,4064,4095,4133,4139,4145,4157,4177,4179,
  4182,4185,4234,4247,4273,4277,4281,4284,4287,4290,4293,4296,4299,4304,
  4309,4312,4314,4316,4318,4321,4323,4325,4327,4329,4347,4369,4383,4385,
  4387,4390,4393,4396,4458,4461,4467,4505,4517,4554,4559,4600,4639,4701,
  4763,4825,4866,4868,4871,4873,4914,4916,4978,4980,5042
};


static const unsigned short far ag_sbe[] = {
    23,  58,  64,  70,  82,  99, 118, 129, 149, 156, 161, 164, 173, 184,
   209, 254, 291, 310, 329, 347, 372, 403, 405, 407, 414, 419, 423, 427,
   433, 460, 502, 526, 530, 539, 556, 573, 609, 644, 679, 751, 825, 852,
   876, 903, 927, 953, 968, 976, 993, 998,1021,1045,1050,1053,1061,1065,
  1067,1083,1101,1106,1110,1128,1153,1179,1204,1218,1250,1287,1290,1293,
  1298,1301,1303,1305,1307,1309,1312,1314,1322,1332,1361,1383,1423,1446,
  1462,1464,1467,1485,1509,1519,1529,1535,1540,1556,1573,1578,1583,1596,
  1599,1639,1658,1682,1684,1686,1691,1722,1755,1757,1759,1761,1763,1781,
  1803,1835,1878,1929,2002,2042,2085,2128,2152,2156,2160,2174,2196,2222,
  2240,2274,2298,2316,2338,2357,2375,2379,2392,2413,2431,2449,2452,2469,
  2515,2566,2589,2594,2616,2655,2696,2711,2718,2721,2739,2765,2791,2817,
  2844,2871,2899,2927,2956,2985,3014,3043,3073,3103,3134,3166,3199,3233,
  3272,3314,3349,3386,3423,3461,3481,3484,3488,3496,3506,3522,3538,3566,
  3604,3626,3628,3647,3671,3689,3728,3767,3819,3852,3883,3946,3996,4020,
  4023,4029,4034,4040,4056,4062,4080,4112,4136,4142,4149,4161,4178,4181,
  4184,4209,4239,4264,4276,4280,4283,4286,4289,4292,4295,4298,4303,4308,
  4311,4313,4315,4317,4320,4322,4324,4326,4328,4335,4353,4372,4384,4386,
  4389,4392,4395,4426,4460,4464,4484,4510,4534,4556,4577,4617,4669,4731,
  4793,4844,4867,4870,4872,4891,4915,4946,4979,5010,5042
};


static const unsigned char far ag_fl[] = {
  1,0,1,2,1,1,1,1,1,1,2,1,1,1,3,1,4,3,4,3,3,2,2,1,3,1,2,2,2,2,4,1,1,1,1,
  1,1,1,4,1,3,3,3,1,3,3,1,3,3,1,3,3,3,3,1,3,3,1,3,1,3,1,3,1,3,1,3,1,5,1,
  3,1,1,1,1,1,1,1,1,1,1,1,1,3,1,0,1,2,2,2,2,3,3,4,3,3,4,1,1,1,1,1,1,1,2,
  2,1,2,1,1,1,1,2,2,2,2,1,2,2,2,2,2,2,1,2,2,2,2,2,1,2,2,1,1,1,1,1,1,1,1,
  1,1,1,1,1,1,2,1,0,4,5,2,1,1,1,2,2,2,2,3,2,3,2,1,2,1,0,1,2,4,5,2,2,4,0,
  2,1,3,1,3,1,2,2,2,1,2,2,1,2,2,2,1,2,2,1,3,1,1,1,2,1,2,0,2,3,4,1,1,3,1,
  1,1,1,1,1,3,4,3,2,3,3,4,1,2,1,2,2,5,7,5,5,7,9,3,2,2,3,1,2,1,1,2,2,3,3,
  3,3,2,3,3,3,3,3,4,4,4,4,1,1,1,1,1,2,1,1,2,3,3,4,1,4,5,2,3,3,4,4,1,3,1,
  1,1,2,3,2,3,4,1,3,1,2,3,4,3,4,1,1,1,1,2,3,2,3,4,1,2,2,3,3,3,3,4,1
};

static const unsigned char far ag_ptt[] = {
    0,  4,  4,  1,  6,  6,  6,  6,  6, 12, 12, 14, 14, 14, 14, 19, 19, 19,
   19, 19, 19, 19, 19, 22, 22, 30, 30, 30, 30, 30, 30, 31, 31, 31, 31, 31,
   31, 32, 32, 41, 41, 41, 41, 44, 44, 44, 45, 45, 45, 48, 48, 48, 48, 48,
   53, 53, 53, 56, 56, 57, 57, 59, 59, 61, 61, 63, 63, 65, 65, 28, 28, 68,
   68, 68, 68, 68, 68, 68, 68, 68, 68, 68, 17, 17, 80, 81, 81, 82, 82, 82,
   82, 87, 87, 87, 86, 86, 86, 92, 92, 92, 94, 94, 94, 88, 88, 88, 91, 91,
  100,100,101,101, 95, 95, 95, 95, 97, 97, 97, 97, 83, 83, 83, 85, 85, 85,
   96, 96, 96, 98, 98, 98, 99, 99, 99, 99, 99,104,104,104,104,104,104,104,
  104,104,105,105,121,122,122,122,124,124,126,126,130,130,132,132,131,131,
  134,134,133,133,135,135,136,123,123,123,138,138,139,139,140,140,141,141,
  143,143,143,143,143,143,143,143,143,143,143,143,143,143,146,146, 24, 24,
   34, 34, 34, 34, 90, 90,147,147,147,148,148,  2,  2,  2,  2,  2,  2,149,
  149,149,150,150,150,150,157,157,158,158,151,152,152,152,153,153,153,154,
  154,154,154,  3,  3,169,169,169,170,170,170,170,170,170,170,170,170,170,
  170,170,170,170,170, 93, 93,172,172,145,145,145,175,175,175,176,176,173,
  173,173,173,173,177,177,177,178,178, 89, 89,179,179,179,181,181,181,180,
  180,171,171,171,182,182,182,144,144,144,174,174,174,185,185,185,183,183,
  183,183,184,184,184,184, 15
};

static const unsigned char far  *ag_valid(int ag_k) {
  const unsigned char far  *ag_tp = &ag_tstt[ag_sbt[(PCB).sn+1]];
  while (*--ag_tp != (unsigned char) ag_k) if (*ag_tp == 0) return NULL;
  return ag_tp;
}

int cc_change_reduction(cc_token_type ag_k) {
  if (!ag_valid(ag_k)) return 0;
  (PCB).reduction_token = ag_k;
  return 1;
}

static void ag_default(const  int *ag_tp) {
  (PCB).ag_dsn = (PCB).sn;
  (PCB).ag_dtl = ag_tp;
  while (!ag_valid((cc_token_type) *ag_tp)) ag_tp++;
  (PCB).reduction_token = (cc_token_type) *ag_tp;
}



static void ag_ra(void)
{
  switch(ag_rpx[(PCB).ag_ap]) {
    case 1: ag_rp_1(); break;
    case 2: ag_rp_2(V(0,(int *))); break;
    case 3: V(0,(int *)) = ag_rp_3(); break;
    case 4: ag_rp_4(V(0,(token *))); break;
    case 5: ag_default(&ag_rtt[0]); V(0,(token *)) = ag_rp_5(V(0,(token *))); break;
  }
}

#define TOKEN_NAMES cc_token_names
const char *const cc_token_names[187] = {
  "prog start",
  "prog start",
  "statement",
  "translation unit",
  "",
  "eof",
  "constant",
  "FLOATINGconstant",
  "INTEGERconstant",
  "OCTALconstant",
  "HEXconstant",
  "CHARACTERconstant",
  "string literal list",
  "STRINGliteral",
  "primary expression",
  "IDENTIFIER",
  "'('",
  "expression",
  "')'",
  "postfix expression",
  "'['",
  "']'",
  "argument expression list",
  "'.'",
  "identifier or typedef name",
  "ARROW",
  "ICR",
  "DECR",
  "assignment expression",
  "','",
  "unary expression",
  "unary operator",
  "cast expression",
  "SIZEOF",
  "type name",
  "'&'",
  "'*'",
  "'+'",
  "'-'",
  "'~'",
  "'!'",
  "multiplicative expression",
  "'/'",
  "'%'",
  "additive expression",
  "shift expression",
  "LS",
  "RS",
  "relational expression",
  "'<'",
  "'>'",
  "LE",
  "GE",
  "equality expression",
  "EQ",
  "NE",
  "AND expression",
  "exclusive OR expression",
  "'^'",
  "inclusive OR expression",
  "'|'",
  "logical AND expression",
  "ANDAND",
  "logical OR expression",
  "OROR",
  "conditional expression",
  "'\\?'",
  "':'",
  "assignment operator",
  "'='",
  "MULTassign",
  "DIVassign",
  "MODassign",
  "PLUSassign",
  "MINUSassign",
  "LSassign",
  "RSassign",
  "ANDassign",
  "ERassign",
  "ORassign",
  "constant expression",
  "expression opt",
  "declaration",
  "sue declaration specifier",
  "';'",
  "sue type specifier",
  "declaring list",
  "default declaring list",
  "declaration qualifier list",
  "identifier declarator",
  "initializer opt",
  "type qualifier list",
  "declaration specifier",
  "declarator",
  "type specifier",
  "basic declaration specifier",
  "typedef declaration specifier",
  "basic type specifier",
  "typedef type specifier",
  "storage class",
  "declaration qualifier",
  "type qualifier",
  "CONST",
  "VOLATILE",
  "basic type name",
  "elaborated type name",
  "TYPEDEFname",
  "TYPEDEF",
  "EXTERN",
  "STATIC",
  "AUTO",
  "REGISTER",
  "VOID",
  "CHAR",
  "SHORT",
  "INT",
  "LONG",
  "FLOAT",
  "DOUBLE",
  "SIGNED",
  "UNSIGNED",
  "save flag",
  "struct or union specifier",
  "enum specifier",
  "struct or union",
  "'{'",
  "struct declaration list",
  "'}'",
  "STRUCT",
  "UNION",
  "struct declaration",
  "struct declaring list",
  "struct default declaring list",
  "struct identifier declarator",
  "struct declarator",
  "bit field size opt",
  "bit field size",
  "ENUM",
  "enumerator list",
  "enumerator value opt",
  "parameter type list",
  "parameter list",
  "ELLIPSIS",
  "parameter declaration",
  "abstract declarator",
  "parameter typedef declarator",
  "identifier list",
  "initializer",
  "initializer list",
  "labeled statement",
  "compound statement",
  "expression statement",
  "selection statement",
  "iteration statement",
  "jump statement",
  "CASE",
  "DEFAULT",
  "declaration list",
  "statement list",
  "IF",
  "ELSE",
  "SWITCH",
  "WHILE",
  "DO",
  "FOR",
  "GOTO",
  "CONTINUE",
  "BREAK",
  "RETURN",
  "external definition",
  "function definition",
  "old function declarator",
  "typedef declarator",
  "paren typedef declarator",
  "postfixing abstract declarator",
  "clean typedef declarator",
  "clean postfix typedef declarator",
  "paren postfix typedef declarator",
  "simple paren typedef declarator",
  "unary identifier declarator",
  "paren identifier declarator",
  "postfix identifier declarator",
  "postfix old function declarator",
  "unary abstract declarator",
  "postfix abstract declarator",
  "array abstract declarator",
  "NAME",

};

#ifndef MISSING_FORMAT
#define MISSING_FORMAT "Missing %s"
#endif
#ifndef UNEXPECTED_FORMAT
#define UNEXPECTED_FORMAT "Unexpected %s"
#endif
#ifndef UNNAMED_TOKEN
#define UNNAMED_TOKEN "input"
#endif


static void ag_diagnose(void) {
  int ag_snd = (PCB).sn;
  int ag_k = ag_sbt[ag_snd];

  if (*TOKEN_NAMES[ag_tstt[ag_k]] && ag_astt[ag_k + 1] == ag_action_8) {
    sprintf((PCB).ag_msg, MISSING_FORMAT, TOKEN_NAMES[ag_tstt[ag_k]]);
  }
  else if (ag_astt[ag_sbe[(PCB).sn]] == ag_action_8
          && (ag_k = (int) ag_sbe[(PCB).sn] + 1) == (int) ag_sbt[(PCB).sn+1] - 1
          && *TOKEN_NAMES[ag_tstt[ag_k]]) {
    sprintf((PCB).ag_msg, MISSING_FORMAT, TOKEN_NAMES[ag_tstt[ag_k]]);
  }
  else if ((PCB).token_number && *TOKEN_NAMES[(PCB).token_number]) {
    sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, TOKEN_NAMES[(PCB).token_number]);
  }
  else if (isprint(((PCB).input_code)) && ((PCB).input_code) != '\\') {
    char buf[20];
    sprintf(buf, "\'%c\'", (char) ((PCB).input_code));
    sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, buf);
  }
  else sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, UNNAMED_TOKEN);
  (PCB).error_message = (PCB).ag_msg;


}
static int ag_action_1_r_proc(void);
static int ag_action_2_r_proc(void);
static int ag_action_3_r_proc(void);
static int ag_action_4_r_proc(void);
static int ag_action_1_s_proc(void);
static int ag_action_3_s_proc(void);
static int ag_action_1_proc(void);
static int ag_action_2_proc(void);
static int ag_action_3_proc(void);
static int ag_action_4_proc(void);
static int ag_action_5_proc(void);
static int ag_action_6_proc(void);
static int ag_action_7_proc(void);
static int ag_action_8_proc(void);
static int ag_action_9_proc(void);
static int ag_action_10_proc(void);
static int ag_action_11_proc(void);
static int ag_action_8_proc(void);


static int (*const  ag_r_procs_scan[])(void) = {
  ag_action_1_r_proc,
  ag_action_2_r_proc,
  ag_action_3_r_proc,
  ag_action_4_r_proc
};

static int (*const  ag_s_procs_scan[])(void) = {
  ag_action_1_s_proc,
  ag_action_2_r_proc,
  ag_action_3_s_proc,
  ag_action_4_r_proc
};

static int (*const  ag_gt_procs_scan[])(void) = {
  ag_action_1_proc,
  ag_action_2_proc,
  ag_action_3_proc,
  ag_action_4_proc,
  ag_action_5_proc,
  ag_action_6_proc,
  ag_action_7_proc,
  ag_action_8_proc,
  ag_action_9_proc,
  ag_action_10_proc,
  ag_action_11_proc,
  ag_action_8_proc
};


static int ag_action_10_proc(void) {
  (PCB).btsx = 0, (PCB).drt = -1;
  ag_track();
  return 0;
}

static int ag_action_11_proc(void) {
  (PCB).btsx = 0, (PCB).drt = -1;
  (*(token *) &(PCB).vs[(PCB).ssx]) = (PCB).input_value;
  (PCB).ssx--;
  ag_ra();
  (PCB).ssx++;
  ag_track();
  return 0;
}

static int ag_action_3_r_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap] - 1;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  (PCB).btsx = 0, (PCB).drt = -1;
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  ag_ra();
  return (PCB).exit_flag == AG_RUNNING_CODE;
}

static int ag_action_3_s_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap] - 1;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  (PCB).btsx = 0, (PCB).drt = -1;
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  ag_ra();
  return (PCB).exit_flag == AG_RUNNING_CODE;
}

static int ag_action_4_r_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap] - 1;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  return 1;
}

static int ag_action_2_proc(void) {
  (PCB).btsx = 0, (PCB).drt = -1;
  if ((PCB).ssx >= 128) {
    ag_trace_error();
    (PCB).exit_flag = AG_STACK_ERROR_CODE;
    PARSER_STACK_OVERFLOW;
  }
  (*(token *) &(PCB).vs[(PCB).ssx]) = (PCB).input_value;
  (PCB).ss[(PCB).ssx] = (PCB).sn;
  (PCB).ssx++;
  (PCB).sn = (PCB).ag_ap;
  ag_track();
  return 0;
}

static int ag_action_9_proc(void) {
  if ((PCB).drt == -1) {
    (PCB).drt=(PCB).token_number;
    (PCB).dssx=(PCB).ssx;
    (PCB).dsn=(PCB).sn;
  }
  ag_prot();
  (PCB).ss[(PCB).ssx] = (PCB).sn;
  (PCB).ssx++;
  (PCB).sn = (PCB).ag_ap;
  return (PCB).exit_flag == AG_RUNNING_CODE;
}

static int ag_action_2_r_proc(void) {
  (PCB).ssx++;
  (PCB).sn = (PCB).ag_ap;
  return 0;
}

static int ag_action_7_proc(void) {
  --(PCB).ssx;
  (PCB).exit_flag = AG_SUCCESS_CODE;
  return 0;
}

static int ag_action_1_proc(void) {
  (PCB).exit_flag = AG_SUCCESS_CODE;
  ag_track();
  return 0;
}

static int ag_action_1_r_proc(void) {
  (PCB).exit_flag = AG_SUCCESS_CODE;
  return 0;
}

static int ag_action_1_s_proc(void) {
  (PCB).exit_flag = AG_SUCCESS_CODE;
  return 0;
}

static int ag_action_4_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap] - 1;
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  (PCB).btsx = 0, (PCB).drt = -1;
  (*(token *) &(PCB).vs[(PCB).ssx]) = (PCB).input_value;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  else (PCB).ss[(PCB).ssx] = (PCB).sn;
  ag_track();
  while ((PCB).exit_flag == AG_RUNNING_CODE) {
    unsigned ag_t1 = ag_sbe[(PCB).sn] + 1;
    unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1;
    do {
      unsigned ag_tx = (ag_t1 + ag_t2)/2;
      if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1;
      else ag_t2 = ag_tx;
    } while (ag_t1 < ag_t2);
    if (ag_tstt[ag_t1] != (PCB).reduction_token) {
      (PCB).exit_flag = AG_REDUCTION_ERROR_CODE; ag_trace_error();
      REDUCTION_TOKEN_ERROR; break;}
      (PCB).ag_ap = ag_pstt[ag_t1];
    if ((ag_s_procs_scan[ag_astt[ag_t1]])() == 0) break;
  }
  return 0;
}

static int ag_action_3_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap] - 1;
  (PCB).btsx = 0, (PCB).drt = -1;
  (*(token *) &(PCB).vs[(PCB).ssx]) = (PCB).input_value;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  else (PCB).ss[(PCB).ssx] = (PCB).sn;
  ag_track();
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  ag_ra();
  while ((PCB).exit_flag == AG_RUNNING_CODE) {
    unsigned ag_t1 = ag_sbe[(PCB).sn] + 1;
    unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1;
    do {
      unsigned ag_tx = (ag_t1 + ag_t2)/2;
      if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1;
      else ag_t2 = ag_tx;
    } while (ag_t1 < ag_t2);
    if (ag_tstt[ag_t1] != (PCB).reduction_token) {
      (PCB).exit_flag = AG_REDUCTION_ERROR_CODE; ag_trace_error();
      REDUCTION_TOKEN_ERROR; break;}
      (PCB).ag_ap = ag_pstt[ag_t1];
    if ((ag_s_procs_scan[ag_astt[ag_t1]])() == 0) break;
  }
  return 0;
}

static int ag_action_8_proc(void) {
  ag_undo();
  ag_trace_error();
  (PCB).exit_flag = AG_SYNTAX_ERROR_CODE;
  ag_diagnose();
  SYNTAX_ERROR;
  ag_track();
  return (PCB).exit_flag == AG_RUNNING_CODE;
}

static int ag_action_5_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap];
  (PCB).btsx = 0, (PCB).drt = -1;
  if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  else {
    (PCB).ss[(PCB).ssx] = (PCB).sn;
  }
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  ag_ra();
  while ((PCB).exit_flag == AG_RUNNING_CODE) {
    unsigned ag_t1 = ag_sbe[(PCB).sn] + 1;
    unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1;
    do {
      unsigned ag_tx = (ag_t1 + ag_t2)/2;
      if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1;
      else ag_t2 = ag_tx;
    } while (ag_t1 < ag_t2);
    if (ag_tstt[ag_t1] != (PCB).reduction_token) {
      (PCB).exit_flag = AG_REDUCTION_ERROR_CODE; ag_trace_error();
      REDUCTION_TOKEN_ERROR; break;}
      (PCB).ag_ap = ag_pstt[ag_t1];
    if ((ag_r_procs_scan[ag_astt[ag_t1]])() == 0) break;
  }
  return (PCB).exit_flag == AG_RUNNING_CODE;
}

static int ag_action_6_proc(void) {
  int ag_sd = ag_fl[(PCB).ag_ap];
  (PCB).reduction_token = (cc_token_type) ag_ptt[(PCB).ag_ap];
  if ((PCB).drt == -1) {
    (PCB).drt=(PCB).token_number;
    (PCB).dssx=(PCB).ssx;
    (PCB).dsn=(PCB).sn;
  }
  if (ag_sd) {
    (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd];
  }
  else {
    ag_prot();
    (PCB).vs[(PCB).ssx] = ag_null_value;
    (PCB).ss[(PCB).ssx] = (PCB).sn;
  }
  while ((PCB).exit_flag == AG_RUNNING_CODE) {
    unsigned ag_t1 = ag_sbe[(PCB).sn] + 1;
    unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1;
    do {
      unsigned ag_tx = (ag_t1 + ag_t2)/2;
      if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1;
      else ag_t2 = ag_tx;
    } while (ag_t1 < ag_t2);
    if (ag_tstt[ag_t1] != (PCB).reduction_token) {
      (PCB).exit_flag = AG_REDUCTION_ERROR_CODE; ag_trace_error();
      REDUCTION_TOKEN_ERROR; break;}
      (PCB).ag_ap = ag_pstt[ag_t1];
    if ((ag_r_procs_scan[ag_astt[ag_t1]])() == 0) break;
  }
  return (PCB).exit_flag == AG_RUNNING_CODE;
}


void init_cc(void) {
  unsigned ag_t1;
  ag_t1 = 0;
  (PCB).ss[0] = (PCB).sn = (PCB).ssx = 0;
  (PCB).exit_flag = AG_RUNNING_CODE;
  (PCB).line = FIRST_LINE;
  (PCB).column = FIRST_COLUMN;
  (PCB).btsx = 0, (PCB).drt = -1;
  while (ag_tstt[ag_t1] == 0) {
    (PCB).ag_ap = ag_pstt[ag_t1];
    (ag_gt_procs_scan[ag_astt[ag_t1]])();
    ag_t1 = ag_sbt[(PCB).sn];
  }
}

void cc(void) {
  (PCB).token_number = (cc_token_type) AG_TCV((PCB).input_code);
  while (1) {
    unsigned ag_t1 = ag_sbt[(PCB).sn];
    unsigned ag_t2 = ag_sbe[(PCB).sn] - 1;
    do {
      unsigned ag_tx = (ag_t1 + ag_t2)/2;
      if (ag_tstt[ag_tx] > (unsigned char)(PCB).token_number)
        ag_t1 = ag_tx + 1;
      else ag_t2 = ag_tx;
    } while (ag_t1 < ag_t2);
    if (ag_tstt[ag_t1] != (unsigned char)(PCB).token_number)
      ag_t1 = ag_sbe[(PCB).sn];
    (PCB).ag_ap = ag_pstt[ag_t1];
    if ((ag_gt_procs_scan[ag_astt[ag_t1]])() == 0) break;
  }
}