#include "config.h"
#define maxbytes 10000 
#define maxnames 1000 
#define hashsize 353 
#define bufsize 100 
#define linelength 80 
typedef unsigned char ASCIIcode  ; 
typedef file_ptr /* of  ASCIIcode */ textfile  ; 
typedef unsigned char eightbits  ; 
typedef unsigned short sixteenbits  ; 
typedef integer namepointer  ; 
schar history  ; 
ASCIIcode xord[256]  ; 
ASCIIcode xchr[256]  ; 
textfile mffile  ; 
textfile changefile  ; 
textfile stylefile  ; 
textfile texfile  ; 
ASCIIcode buffer[bufsize + 1]  ; 
integer line  ; 
integer otherline  ; 
integer templine  ; 
integer limit  ; 
integer loc  ; 
boolean inputhasended  ; 
boolean changing  ; 
boolean styling  ; 
ASCIIcode changebuffer[bufsize + 1]  ; 
integer changelimit  ; 
ASCIIcode bytemem[maxbytes + 1]  ; 
sixteenbits bytestart[maxnames + 1]  ; 
sixteenbits link[maxnames + 1]  ; 
sixteenbits ilk[maxnames + 1]  ; 
namepointer nameptr  ; 
integer byteptr  ; 
integer idfirst  ; 
integer idloc  ; 
sixteenbits hash[hashsize + 1]  ; 
namepointer translation[256]  ; 
ASCIIcode i  ; 
namepointer trle, trge, trne, tramp, trsharp, trskip, trps, trquad  ; 
eightbits curtype  ; 
integer curtok  ; 
eightbits prevtype  ; 
integer prevtok  ; 
boolean startofline  ; 
boolean emptybuffer  ; 
schar charclass[256]  ; 
ASCIIcode outbuf[linelength + 1]  ; 
integer outptr  ; 
integer outline  ; 
char mffilename[PATHMAX + 1], changefilename[PATHMAX + 1], 
stylefilename[PATHMAX + 1], texfilename[PATHMAX + 1]  ; 
boolean nochange, nostyle  ; 

#include "mft.h"
void error ( ) 
{integer k, l  ; 
  {
    if ( styling ) 
    (void) Fputs( stdout ,  ". (style file " ) ; 
    else if ( changing ) 
    (void) Fputs( stdout ,  ". (change file " ) ; 
    else
    (void) Fputs( stdout ,  ". (" ) ; 
    (void) fprintf( stdout , "%s%ld%c\n",  "l." , (long)line , ')' ) ; 
    if ( loc >= limit ) 
    l = limit ; 
    else l = loc ; 
    {register integer for_end; k = 1 ; for_end = l ; if ( k <= for_end) do 
      (void) putc( xchr [ buffer [ k - 1 ] ] ,  stdout );
    while ( k++ < for_end ) ; } 
    (void) putc('\n',  stdout );
    {register integer for_end; k = 1 ; for_end = l ; if ( k <= for_end) do 
      (void) putc( ' ' ,  stdout );
    while ( k++ < for_end ) ; } 
    {register integer for_end; k = l + 1 ; for_end = limit ; if ( k <= 
    for_end) do 
      (void) putc( xchr [ buffer [ k - 1 ] ] ,  stdout );
    while ( k++ < for_end ) ; } 
  } 
  flush ( stdout ) ; 
  history = 2 ; 
} 
void jumpout ( ) 
{switch ( history ) 
  {case 0 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(No errors were found.)" ) ; 
    } 
    break ; 
  case 1 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(Did you see the warning message above?)" ) ; 
    } 
    break ; 
  case 2 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(Pardon me, but I think I spotted something wrong.)" ) 
      ; 
    } 
    break ; 
  case 3 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(That was a fatal error, my friend.)" ) ; 
    } 
    break ; 
  } 
  (void) putc('\n',  stdout );
  if ( ( history != 0 ) && ( history != 1 ) ) 
  uexit ( 1 ) ; 
  else uexit ( 0 ) ; 
} 
void scanargs ( ) 
{integer dotpos, slashpos, i, a  ; 
  char whichfilenext  ; 
  char fname[PATHMAX + 1]  ; 
  boolean foundmf, foundchange, foundstyle  ; 
  setpaths ( MFINPUTPATHBIT + TEXINPUTPATHBIT ) ; 
  foundmf = false ; 
  {
    changefilename [ 1 ] = '/' ; 
    changefilename [ 2 ] = 'd' ; 
    changefilename [ 3 ] = 'e' ; 
    changefilename [ 4 ] = 'v' ; 
    changefilename [ 5 ] = '/' ; 
    changefilename [ 6 ] = 'n' ; 
    changefilename [ 7 ] = 'u' ; 
    changefilename [ 8 ] = 'l' ; 
    changefilename [ 9 ] = 'l' ; 
    changefilename [ 10 ] = ' ' ; 
  } 
  foundchange = true ; 
  {
    stylefilename [ 1 ] = 'p' ; 
    stylefilename [ 2 ] = 'l' ; 
    stylefilename [ 3 ] = 'a' ; 
    stylefilename [ 4 ] = 'i' ; 
    stylefilename [ 5 ] = 'n' ; 
    stylefilename [ 6 ] = '.' ; 
    stylefilename [ 7 ] = 'm' ; 
    stylefilename [ 8 ] = 'f' ; 
    stylefilename [ 9 ] = 't' ; 
    stylefilename [ 10 ] = ' ' ; 
  } 
  foundstyle = true ; 
  {register integer for_end; a = 1 ; for_end = argc - 1 ; if ( a <= for_end) 
  do 
    {
      argv ( a , fname ) ; 
      if ( fname [ 1 ] != '-' ) 
      {
	if ( ! foundmf ) 
	{
	  dotpos = -1 ; 
	  slashpos = -1 ; 
	  i = 1 ; 
	  while ( ( fname [ i ] != ' ' ) && ( i <= PATHMAX - 5 ) ) {
	      
	    mffilename [ i ] = fname [ i ] ; 
	    if ( fname [ i ] == '.' ) 
	    dotpos = i ; 
	    if ( fname [ i ] == '/' ) 
	    slashpos = i ; 
	    i = i + 1 ; 
	  } 
	  if ( ( dotpos == -1 ) || ( dotpos < slashpos ) ) 
	  {
	    dotpos = i ; 
	    mffilename [ dotpos ] = '.' ; 
	    mffilename [ dotpos + 1 ] = 'm' ; 
	    mffilename [ dotpos + 2 ] = 'f' ; 
	    mffilename [ dotpos + 3 ] = ' ' ; 
	  } 
	  {register integer for_end; i = 1 ; for_end = dotpos ; if ( i <= 
	  for_end) do 
	    {
	      texfilename [ i ] = mffilename [ i ] ; 
	    } 
	  while ( i++ < for_end ) ; } 
	  texfilename [ dotpos + 1 ] = 't' ; 
	  texfilename [ dotpos + 2 ] = 'e' ; 
	  texfilename [ dotpos + 3 ] = 'x' ; 
	  texfilename [ dotpos + 4 ] = ' ' ; 
	  whichfilenext = 'z' ; 
	  foundmf = true ; 
	} 
	else if ( ! foundchange ) 
	{
	  if ( whichfilenext != 's' ) 
	  {
	    {
	      dotpos = -1 ; 
	      slashpos = -1 ; 
	      i = 1 ; 
	      while ( ( fname [ i ] != ' ' ) && ( i <= PATHMAX - 5 ) ) {
		  
		changefilename [ i ] = fname [ i ] ; 
		if ( fname [ i ] == '.' ) 
		dotpos = i ; 
		if ( fname [ i ] == '/' ) 
		slashpos = i ; 
		i = i + 1 ; 
	      } 
	      if ( ( dotpos == -1 ) || ( dotpos < slashpos ) ) 
	      {
		dotpos = i ; 
		changefilename [ dotpos ] = '.' ; 
		changefilename [ dotpos + 1 ] = 'c' ; 
		changefilename [ dotpos + 2 ] = 'h' ; 
		changefilename [ dotpos + 3 ] = ' ' ; 
	      } 
	      whichfilenext = 'z' ; 
	      foundchange = true ; 
	    } 
	    whichfilenext = 's' ; 
	  } 
	  else {
	      
	    dotpos = -1 ; 
	    slashpos = -1 ; 
	    i = 1 ; 
	    while ( ( fname [ i ] != ' ' ) && ( i <= PATHMAX - 5 ) ) {
		
	      stylefilename [ i ] = fname [ i ] ; 
	      if ( fname [ i ] == '.' ) 
	      dotpos = i ; 
	      if ( fname [ i ] == '/' ) 
	      slashpos = i ; 
	      i = i + 1 ; 
	    } 
	    if ( ( dotpos == -1 ) || ( dotpos < slashpos ) ) 
	    {
	      dotpos = i ; 
	      stylefilename [ dotpos ] = '.' ; 
	      stylefilename [ dotpos + 1 ] = 'm' ; 
	      stylefilename [ dotpos + 2 ] = 'f' ; 
	      stylefilename [ dotpos + 3 ] = 't' ; 
	      stylefilename [ dotpos + 4 ] = ' ' ; 
	    } 
	    whichfilenext = 'z' ; 
	    foundstyle = true ; 
	  } 
	} 
	else if ( ! foundstyle ) 
	{
	  if ( whichfilenext == 's' ) 
	  {
	    {
	      dotpos = -1 ; 
	      slashpos = -1 ; 
	      i = 1 ; 
	      while ( ( fname [ i ] != ' ' ) && ( i <= PATHMAX - 5 ) ) {
		  
		stylefilename [ i ] = fname [ i ] ; 
		if ( fname [ i ] == '.' ) 
		dotpos = i ; 
		if ( fname [ i ] == '/' ) 
		slashpos = i ; 
		i = i + 1 ; 
	      } 
	      if ( ( dotpos == -1 ) || ( dotpos < slashpos ) ) 
	      {
		dotpos = i ; 
		stylefilename [ dotpos ] = '.' ; 
		stylefilename [ dotpos + 1 ] = 'm' ; 
		stylefilename [ dotpos + 2 ] = 'f' ; 
		stylefilename [ dotpos + 3 ] = 't' ; 
		stylefilename [ dotpos + 4 ] = ' ' ; 
	      } 
	      whichfilenext = 'z' ; 
	      foundstyle = true ; 
	    } 
	    whichfilenext = 'c' ; 
	  } 
	} 
	else {
	    
	  (void) fprintf( stdout , "%s\n",            "Usage: mft file[.mf] [-cs] [change[.ch]] [style[.mft]]." ) ; 
	  uexit ( 1 ) ; 
	} 
      } 
      else {
	  
	i = 2 ; 
	while ( ( fname [ i ] != ' ' ) && ( i <= PATHMAX - 5 ) ) {
	    
	  if ( fname [ i ] == 'c' ) 
	  {
	    foundchange = false ; 
	    if ( whichfilenext != 's' ) 
	    whichfilenext = 'c' ; 
	  } 
	  else if ( fname [ i ] == 's' ) 
	  {
	    foundstyle = false ; 
	    if ( whichfilenext != 'c' ) 
	    whichfilenext = 's' ; 
	  } 
	  else {
	      
	    (void) putc('\n',  stdout );
	    (void) fprintf( stdout , "%s%c%c",  "Invalid flag " , xchr [ xord [ fname [ i ] ] ] ,             '.' ) ; 
	  } 
	  i = i + 1 ; 
	} 
      } 
    } 
  while ( a++ < for_end ) ; } 
  if ( ! foundmf ) 
  {
    (void) fprintf( stdout , "%s\n",      "Usage: mft file[.mf] [-cs] [change[.ch]] [style[.mft]]." ) ; 
    uexit ( 1 ) ; 
  } 
} 
void initialize ( ) 
{unsigned char i  ; 
  integer h  ; 
  history = 0 ; 
  xchr [ 32 ] = ' ' ; 
  xchr [ 33 ] = '!' ; 
  xchr [ 34 ] = '"' ; 
  xchr [ 35 ] = '#' ; 
  xchr [ 36 ] = '$' ; 
  xchr [ 37 ] = '%' ; 
  xchr [ 38 ] = '&' ; 
  xchr [ 39 ] = '\'' ; 
  xchr [ 40 ] = '(' ; 
  xchr [ 41 ] = ')' ; 
  xchr [ 42 ] = '*' ; 
  xchr [ 43 ] = '+' ; 
  xchr [ 44 ] = ',' ; 
  xchr [ 45 ] = '-' ; 
  xchr [ 46 ] = '.' ; 
  xchr [ 47 ] = '/' ; 
  xchr [ 48 ] = '0' ; 
  xchr [ 49 ] = '1' ; 
  xchr [ 50 ] = '2' ; 
  xchr [ 51 ] = '3' ; 
  xchr [ 52 ] = '4' ; 
  xchr [ 53 ] = '5' ; 
  xchr [ 54 ] = '6' ; 
  xchr [ 55 ] = '7' ; 
  xchr [ 56 ] = '8' ; 
  xchr [ 57 ] = '9' ; 
  xchr [ 58 ] = ':' ; 
  xchr [ 59 ] = ';' ; 
  xchr [ 60 ] = '<' ; 
  xchr [ 61 ] = '=' ; 
  xchr [ 62 ] = '>' ; 
  xchr [ 63 ] = '?' ; 
  xchr [ 64 ] = '@' ; 
  xchr [ 65 ] = 'A' ; 
  xchr [ 66 ] = 'B' ; 
  xchr [ 67 ] = 'C' ; 
  xchr [ 68 ] = 'D' ; 
  xchr [ 69 ] = 'E' ; 
  xchr [ 70 ] = 'F' ; 
  xchr [ 71 ] = 'G' ; 
  xchr [ 72 ] = 'H' ; 
  xchr [ 73 ] = 'I' ; 
  xchr [ 74 ] = 'J' ; 
  xchr [ 75 ] = 'K' ; 
  xchr [ 76 ] = 'L' ; 
  xchr [ 77 ] = 'M' ; 
  xchr [ 78 ] = 'N' ; 
  xchr [ 79 ] = 'O' ; 
  xchr [ 80 ] = 'P' ; 
  xchr [ 81 ] = 'Q' ; 
  xchr [ 82 ] = 'R' ; 
  xchr [ 83 ] = 'S' ; 
  xchr [ 84 ] = 'T' ; 
  xchr [ 85 ] = 'U' ; 
  xchr [ 86 ] = 'V' ; 
  xchr [ 87 ] = 'W' ; 
  xchr [ 88 ] = 'X' ; 
  xchr [ 89 ] = 'Y' ; 
  xchr [ 90 ] = 'Z' ; 
  xchr [ 91 ] = '[' ; 
  xchr [ 92 ] = '\\' ; 
  xchr [ 93 ] = ']' ; 
  xchr [ 94 ] = '^' ; 
  xchr [ 95 ] = '_' ; 
  xchr [ 96 ] = '`' ; 
  xchr [ 97 ] = 'a' ; 
  xchr [ 98 ] = 'b' ; 
  xchr [ 99 ] = 'c' ; 
  xchr [ 100 ] = 'd' ; 
  xchr [ 101 ] = 'e' ; 
  xchr [ 102 ] = 'f' ; 
  xchr [ 103 ] = 'g' ; 
  xchr [ 104 ] = 'h' ; 
  xchr [ 105 ] = 'i' ; 
  xchr [ 106 ] = 'j' ; 
  xchr [ 107 ] = 'k' ; 
  xchr [ 108 ] = 'l' ; 
  xchr [ 109 ] = 'm' ; 
  xchr [ 110 ] = 'n' ; 
  xchr [ 111 ] = 'o' ; 
  xchr [ 112 ] = 'p' ; 
  xchr [ 113 ] = 'q' ; 
  xchr [ 114 ] = 'r' ; 
  xchr [ 115 ] = 's' ; 
  xchr [ 116 ] = 't' ; 
  xchr [ 117 ] = 'u' ; 
  xchr [ 118 ] = 'v' ; 
  xchr [ 119 ] = 'w' ; 
  xchr [ 120 ] = 'x' ; 
  xchr [ 121 ] = 'y' ; 
  xchr [ 122 ] = 'z' ; 
  xchr [ 123 ] = '{' ; 
  xchr [ 124 ] = '|' ; 
  xchr [ 125 ] = '}' ; 
  xchr [ 126 ] = '~' ; 
  {register integer for_end; i = 1 ; for_end = 31 ; if ( i <= for_end) do 
    xchr [ i ] = chr ( i ) ; 
  while ( i++ < for_end ) ; } 
  {register integer for_end; i = 127 ; for_end = 255 ; if ( i <= for_end) do 
    xchr [ i ] = chr ( i ) ; 
  while ( i++ < for_end ) ; } 
  {register integer for_end; i = 0 ; for_end = 255 ; if ( i <= for_end) do 
    xord [ chr ( i ) ] = 127 ; 
  while ( i++ < for_end ) ; } 
  {register integer for_end; i = 128 ; for_end = 255 ; if ( i <= for_end) do 
    xord [ xchr [ i ] ] = i ; 
  while ( i++ < for_end ) ; } 
  {register integer for_end; i = 1 ; for_end = 126 ; if ( i <= for_end) do 
    xord [ xchr [ i ] ] = i ; 
  while ( i++ < for_end ) ; } 
  scanargs () ; 
  rewrite ( texfile , texfilename ) ; 
  bytestart [ 0 ] = 0 ; 
  byteptr = 0 ; 
  bytestart [ 1 ] = 0 ; 
  nameptr = 1 ; 
  {register integer for_end; h = 0 ; for_end = hashsize - 1 ; if ( h <= 
  for_end) do 
    hash [ h ] = 0 ; 
  while ( h++ < for_end ) ; } 
  curtype = 1 ; 
  curtok = 0 ; 
  {register integer for_end; i = 48 ; for_end = 57 ; if ( i <= for_end) do 
    charclass [ i ] = 0 ; 
  while ( i++ < for_end ) ; } 
  charclass [ 46 ] = 1 ; 
  charclass [ 32 ] = 2 ; 
  charclass [ 37 ] = 3 ; 
  charclass [ 34 ] = 4 ; 
  charclass [ 44 ] = 5 ; 
  charclass [ 59 ] = 6 ; 
  charclass [ 40 ] = 7 ; 
  charclass [ 41 ] = 8 ; 
  {register integer for_end; i = 65 ; for_end = 90 ; if ( i <= for_end) do 
    charclass [ i ] = 9 ; 
  while ( i++ < for_end ) ; } 
  {register integer for_end; i = 97 ; for_end = 122 ; if ( i <= for_end) do 
    charclass [ i ] = 9 ; 
  while ( i++ < for_end ) ; } 
  charclass [ 95 ] = 9 ; 
  charclass [ 60 ] = 10 ; 
  charclass [ 61 ] = 10 ; 
  charclass [ 62 ] = 10 ; 
  charclass [ 58 ] = 10 ; 
  charclass [ 124 ] = 10 ; 
  charclass [ 96 ] = 11 ; 
  charclass [ 39 ] = 11 ; 
  charclass [ 43 ] = 12 ; 
  charclass [ 45 ] = 12 ; 
  charclass [ 47 ] = 13 ; 
  charclass [ 42 ] = 13 ; 
  charclass [ 92 ] = 13 ; 
  charclass [ 33 ] = 14 ; 
  charclass [ 63 ] = 14 ; 
  charclass [ 35 ] = 15 ; 
  charclass [ 38 ] = 15 ; 
  charclass [ 64 ] = 15 ; 
  charclass [ 36 ] = 15 ; 
  charclass [ 94 ] = 16 ; 
  charclass [ 126 ] = 16 ; 
  charclass [ 91 ] = 17 ; 
  charclass [ 93 ] = 18 ; 
  charclass [ 123 ] = 19 ; 
  charclass [ 125 ] = 19 ; 
  {register integer for_end; i = 0 ; for_end = 31 ; if ( i <= for_end) do 
    charclass [ i ] = 20 ; 
  while ( i++ < for_end ) ; } 
  charclass [ 13 ] = 21 ; 
  {register integer for_end; i = 127 ; for_end = 255 ; if ( i <= for_end) do 
    charclass [ i ] = 20 ; 
  while ( i++ < for_end ) ; } 
  outptr = 1 ; 
  outbuf [ 1 ] = 32 ; 
  outline = 1 ; 
  (void) Fputs( texfile ,  "\\input mftmac" ) ; 
  outbuf [ 0 ] = 92 ; 
} 
void openinput ( ) 
{if ( testreadaccess ( mffilename , MFINPUTPATH ) ) 
  reset ( mffile , mffilename ) ; 
  else {
      
    printpascalstring ( mffilename ) ; 
    (void) Fputs( stdout ,  ": Metafont source file not found" ) ; 
    uexit ( 1 ) ; 
  } 
  reset ( changefile , changefilename ) ; 
  if ( testreadaccess ( stylefilename , TEXINPUTPATH ) ) 
  reset ( stylefile , stylefilename ) ; 
  else {
      
    printpascalstring ( stylefilename ) ; 
    (void) Fputs( stdout ,  ": Style file not found" ) ; 
    uexit ( 1 ) ; 
  } 
} 
boolean zinputln ( f ) 
textfile f ; 
{register boolean Result; integer finallimit  ; 
  limit = 0 ; 
  finallimit = 0 ; 
  if ( eof ( f ) ) 
  Result = false ; 
  else {
      
    while ( ! eoln ( f ) ) {
	
      buffer [ limit ] = xord [ getc ( f ) ] ; 
      limit = limit + 1 ; 
      if ( buffer [ limit - 1 ] != 32 ) 
      finallimit = limit ; 
      if ( limit == bufsize ) 
      {
	while ( ! eoln ( f ) ) vgetc ( f ) ; 
	limit = limit - 1 ; 
	if ( finallimit > limit ) 
	finallimit = limit ; 
	{
	  (void) putc('\n',  stdout );
	  (void) Fputs( stdout ,  "! Input line too long" ) ; 
	} 
	loc = 0 ; 
	error () ; 
      } 
    } 
    readln ( f ) ; 
    limit = finallimit ; 
    Result = true ; 
  } 
  return(Result) ; 
} 
boolean linesdontmatch ( ) 
{/* 10 */ register boolean Result; integer k  ; 
  Result = true ; 
  if ( changelimit != limit ) 
  goto lab10 ; 
  if ( limit > 0 ) 
  {register integer for_end; k = 0 ; for_end = limit - 1 ; if ( k <= for_end) 
  do 
    if ( changebuffer [ k ] != buffer [ k ] ) 
    goto lab10 ; 
  while ( k++ < for_end ) ; } 
  Result = false ; 
  lab10: ; 
  return(Result) ; 
} 
void primethechangebuffer ( ) 
{/* 22 30 10 */ integer k  ; 
  changelimit = 0 ; 
  while ( true ) {
      
    line = line + 1 ; 
    if ( ! inputln ( changefile ) ) 
    goto lab10 ; 
    if ( limit < 2 ) 
    goto lab22 ; 
    if ( buffer [ 0 ] != 64 ) 
    goto lab22 ; 
    if ( ( buffer [ 1 ] >= 88 ) && ( buffer [ 1 ] <= 90 ) ) 
    buffer [ 1 ] = buffer [ 1 ] + 32 ; 
    if ( buffer [ 1 ] == 120 ) 
    goto lab30 ; 
    if ( ( buffer [ 1 ] == 121 ) || ( buffer [ 1 ] == 122 ) ) 
    {
      loc = 2 ; 
      {
	(void) putc('\n',  stdout );
	(void) Fputs( stdout ,  "! Where is the matching @x?" ) ; 
	error () ; 
      } 
    } 
    lab22: ; 
  } 
  lab30: ; 
  do {
      line = line + 1 ; 
    if ( ! inputln ( changefile ) ) 
    {
      {
	(void) putc('\n',  stdout );
	(void) Fputs( stdout ,  "! Change file ended after @x" ) ; 
	error () ; 
      } 
      goto lab10 ; 
    } 
  } while ( ! ( limit > 0 ) ) ; 
  {
    changelimit = limit ; 
    if ( limit > 0 ) 
    {register integer for_end; k = 0 ; for_end = limit - 1 ; if ( k <= 
    for_end) do 
      changebuffer [ k ] = buffer [ k ] ; 
    while ( k++ < for_end ) ; } 
  } 
  lab10: ; 
} 
void checkchange ( ) 
{/* 10 */ integer n  ; 
  integer k  ; 
  if ( linesdontmatch () ) 
  goto lab10 ; 
  n = 0 ; 
  while ( true ) {
      
    changing = ! changing ; 
    templine = otherline ; 
    otherline = line ; 
    line = templine ; 
    line = line + 1 ; 
    if ( ! inputln ( changefile ) ) 
    {
      {
	(void) putc('\n',  stdout );
	(void) Fputs( stdout ,  "! Change file ended before @y" ) ; 
	error () ; 
      } 
      changelimit = 0 ; 
      changing = ! changing ; 
      templine = otherline ; 
      otherline = line ; 
      line = templine ; 
      goto lab10 ; 
    } 
    if ( limit > 1 ) 
    if ( buffer [ 0 ] == 64 ) 
    {
      if ( ( buffer [ 1 ] >= 88 ) && ( buffer [ 1 ] <= 90 ) ) 
      buffer [ 1 ] = buffer [ 1 ] + 32 ; 
      if ( ( buffer [ 1 ] == 120 ) || ( buffer [ 1 ] == 122 ) ) 
      {
	loc = 2 ; 
	{
	  (void) putc('\n',  stdout );
	  (void) Fputs( stdout ,  "! Where is the matching @y?" ) ; 
	  error () ; 
	} 
      } 
      else if ( buffer [ 1 ] == 121 ) 
      {
	if ( n > 0 ) 
	{
	  loc = 2 ; 
	  {
	    (void) putc('\n',  stdout );
	    (void) fprintf( stdout , "%s%ld%s",  "! Hmm... " , (long)n ,             " of the preceding lines failed to match" ) ; 
	    error () ; 
	  } 
	} 
	goto lab10 ; 
      } 
    } 
    {
      changelimit = limit ; 
      if ( limit > 0 ) 
      {register integer for_end; k = 0 ; for_end = limit - 1 ; if ( k <= 
      for_end) do 
	changebuffer [ k ] = buffer [ k ] ; 
      while ( k++ < for_end ) ; } 
    } 
    changing = ! changing ; 
    templine = otherline ; 
    otherline = line ; 
    line = templine ; 
    line = line + 1 ; 
    if ( ! inputln ( mffile ) ) 
    {
      {
	(void) putc('\n',  stdout );
	(void) Fputs( stdout ,  "! MF file ended during a change" ) ; 
	error () ; 
      } 
      inputhasended = true ; 
      goto lab10 ; 
    } 
    if ( linesdontmatch () ) 
    n = n + 1 ; 
  } 
  lab10: ; 
} 
void getline ( ) 
{/* 20 */ lab20: if ( styling ) 
  {
    line = line + 1 ; 
    if ( ! inputln ( stylefile ) ) 
    {
      styling = false ; 
      line = 0 ; 
    } 
  } 
  if ( ! styling ) 
  {
    if ( changing ) 
    {
      line = line + 1 ; 
      if ( ! inputln ( changefile ) ) 
      {
	{
	  (void) putc('\n',  stdout );
	  (void) Fputs( stdout ,  "! Change file ended without @z" ) ; 
	  error () ; 
	} 
	buffer [ 0 ] = 64 ; 
	buffer [ 1 ] = 122 ; 
	limit = 2 ; 
      } 
      if ( limit > 1 ) 
      if ( buffer [ 0 ] == 64 ) 
      {
	if ( ( buffer [ 1 ] >= 88 ) && ( buffer [ 1 ] <= 90 ) ) 
	buffer [ 1 ] = buffer [ 1 ] + 32 ; 
	if ( ( buffer [ 1 ] == 120 ) || ( buffer [ 1 ] == 121 ) ) 
	{
	  loc = 2 ; 
	  {
	    (void) putc('\n',  stdout );
	    (void) Fputs( stdout ,  "! Where is the matching @z?" ) ; 
	    error () ; 
	  } 
	} 
	else if ( buffer [ 1 ] == 122 ) 
	{
	  primethechangebuffer () ; 
	  changing = ! changing ; 
	  templine = otherline ; 
	  otherline = line ; 
	  line = templine ; 
	} 
      } 
    } 
    if ( ! changing ) 
    {
      {
	line = line + 1 ; 
	if ( ! inputln ( mffile ) ) 
	inputhasended = true ; 
	else if ( limit == changelimit ) 
	if ( buffer [ 0 ] == changebuffer [ 0 ] ) 
	if ( changelimit > 0 ) 
	checkchange () ; 
      } 
      if ( changing ) 
      goto lab20 ; 
    } 
  } 
} 
namepointer lookup ( ) 
{/* 31 */ register namepointer Result; integer i  ; 
  integer h  ; 
  integer k  ; 
  integer l  ; 
  namepointer p  ; 
  l = idloc - idfirst ; 
  h = buffer [ idfirst ] ; 
  i = idfirst + 1 ; 
  while ( i < idloc ) {
      
    h = ( h + h + buffer [ i ] ) % hashsize ; 
    i = i + 1 ; 
  } 
  p = hash [ h ] ; 
  while ( p != 0 ) {
      
    if ( bytestart [ p + 1 ] - bytestart [ p ] == l ) 
    {
      i = idfirst ; 
      k = bytestart [ p ] ; 
      while ( ( i < idloc ) && ( buffer [ i ] == bytemem [ k ] ) ) {
	  
	i = i + 1 ; 
	k = k + 1 ; 
      } 
      if ( i == idloc ) 
      goto lab31 ; 
    } 
    p = link [ p ] ; 
  } 
  p = nameptr ; 
  link [ p ] = hash [ h ] ; 
  hash [ h ] = p ; 
  lab31: ; 
  if ( p == nameptr ) 
  {
    if ( byteptr + l > maxbytes ) 
    {
      (void) putc('\n',  stdout );
      (void) fprintf( stdout , "%s%s%s",  "! Sorry, " , "byte memory" , " capacity exceeded" ) ; 
      error () ; 
      history = 3 ; 
      jumpout () ; 
    } 
    if ( nameptr + 1 > maxnames ) 
    {
      (void) putc('\n',  stdout );
      (void) fprintf( stdout , "%s%s%s",  "! Sorry, " , "name" , " capacity exceeded" ) ; 
      error () ; 
      history = 3 ; 
      jumpout () ; 
    } 
    i = idfirst ; 
    while ( i < idloc ) {
	
      bytemem [ byteptr ] = buffer [ i ] ; 
      byteptr = byteptr + 1 ; 
      i = i + 1 ; 
    } 
    nameptr = nameptr + 1 ; 
    bytestart [ nameptr ] = byteptr ; 
    ilk [ p ] = 33 ; 
  } 
  Result = p ; 
  return(Result) ; 
} 
void getnext ( ) 
{/* 25 85 86 30 31 10 */ ASCIIcode c  ; 
  ASCIIcode class  ; 
  prevtype = curtype ; 
  prevtok = curtok ; 
  if ( emptybuffer ) 
  {
    getline () ; 
    if ( inputhasended ) 
    {
      curtype = 2 ; 
      curtok = idfirst ; 
      goto lab10 ; 
    } 
    buffer [ limit ] = 13 ; 
    loc = 0 ; 
    startofline = true ; 
    emptybuffer = false ; 
  } 
  lab25: c = buffer [ loc ] ; 
  idfirst = loc ; 
  loc = loc + 1 ; 
  class = charclass [ c ] ; 
  switch ( class ) 
  {case 0 : 
    goto lab85 ; 
    break ; 
  case 1 : 
    {
      class = charclass [ buffer [ loc ] ] ; 
      if ( class > 1 ) 
      goto lab25 ; 
      else if ( class < 1 ) 
      goto lab86 ; 
    } 
    break ; 
  case 2 : 
    if ( startofline ) 
    {
      curtype = 0 ; 
      curtok = idfirst ; 
      goto lab10 ; 
    } 
    else goto lab25 ; 
    break ; 
  case 21 : 
    {
      curtype = 1 ; 
      curtok = idfirst ; 
      goto lab10 ; 
    } 
    break ; 
  case 4 : 
    while ( true ) {
	
      if ( buffer [ loc ] == 34 ) 
      {
	loc = loc + 1 ; 
	{
	  curtype = 7 ; 
	  curtok = idfirst ; 
	  goto lab10 ; 
	} 
      } 
      if ( loc == limit ) 
      {
	{
	  (void) putc('\n',  stdout );
	  (void) Fputs( stdout ,  "! Incomplete string will be ignored" ) ; 
	  error () ; 
	} 
	goto lab25 ; 
      } 
      loc = loc + 1 ; 
    } 
    break ; 
  case 5 : 
  case 6 : 
  case 7 : 
  case 8 : 
    goto lab31 ; 
    break ; 
  case 20 : 
    {
      {
	(void) putc('\n',  stdout );
	(void) Fputs( stdout ,  "! Invalid character will be ignored" ) ; 
	error () ; 
      } 
      goto lab25 ; 
    } 
    break ; 
    default: 
    ; 
    break ; 
  } 
  while ( charclass [ buffer [ loc ] ] == class ) loc = loc + 1 ; 
  goto lab31 ; 
  lab85: while ( charclass [ buffer [ loc ] ] == 0 ) loc = loc + 1 ; 
  if ( buffer [ loc ] != 46 ) 
  goto lab30 ; 
  if ( charclass [ buffer [ loc + 1 ] ] != 0 ) 
  goto lab30 ; 
  loc = loc + 1 ; 
  lab86: do {
      loc = loc + 1 ; 
  } while ( ! ( charclass [ buffer [ loc ] ] != 0 ) ) ; 
  lab30: {
      
    curtype = 6 ; 
    curtok = idfirst ; 
    goto lab10 ; 
  } 
  lab31: idloc = loc ; 
  curtok = lookup () ; 
  curtype = ilk [ curtok ] ; 
  lab10: ; 
} 
void zflushbuffer ( b , percent ) 
eightbits b ; 
boolean percent ; 
{/* 30 */ integer j, k  ; 
  j = b ; 
  if ( ! percent ) 
  while ( true ) {
      
    if ( j == 0 ) 
    goto lab30 ; 
    if ( outbuf [ j ] != 32 ) 
    goto lab30 ; 
    j = j - 1 ; 
  } 
  lab30: {
      register integer for_end; k = 1 ; for_end = j ; if ( k <= for_end) 
  do 
    (void) putc( xchr [ outbuf [ k ] ] ,  texfile );
  while ( k++ < for_end ) ; } 
  if ( percent ) 
  (void) putc( xchr [ 37 ] ,  texfile );
  (void) putc('\n',  texfile );
  outline = outline + 1 ; 
  if ( b < outptr ) 
  {register integer for_end; k = b + 1 ; for_end = outptr ; if ( k <= 
  for_end) do 
    outbuf [ k - b ] = outbuf [ k ] ; 
  while ( k++ < for_end ) ; } 
  outptr = outptr - b ; 
} 
void breakout ( ) 
{/* 10 */ integer k  ; 
  ASCIIcode d  ; 
  k = outptr ; 
  while ( true ) {
      
    if ( k == 0 ) 
    {
      {
	(void) putc('\n',  stdout );
	(void) fprintf( stdout , "%s%ld",  "! Line had to be broken (output l." , (long)outline ) ; 
      } 
      (void) fprintf( stdout , "%s\n",  "):" ) ; 
      {register integer for_end; k = 1 ; for_end = outptr - 1 ; if ( k <= 
      for_end) do 
	(void) putc( xchr [ outbuf [ k ] ] ,  stdout );
      while ( k++ < for_end ) ; } 
      (void) putc('\n',  stdout );
      if ( history == 0 ) 
      history = 1 ; 
      flushbuffer ( outptr - 1 , true ) ; 
      goto lab10 ; 
    } 
    d = outbuf [ k ] ; 
    if ( d == 32 ) 
    {
      flushbuffer ( k , false ) ; 
      goto lab10 ; 
    } 
    if ( ( d == 92 ) && ( outbuf [ k - 1 ] != 92 ) ) 
    {
      flushbuffer ( k - 1 , true ) ; 
      goto lab10 ; 
    } 
    k = k - 1 ; 
  } 
  lab10: ; 
} 
void zoutstr ( p ) 
namepointer p ; 
{integer k  ; 
  {register integer for_end; k = bytestart [ p ] ; for_end = bytestart [ p + 
  1 ] - 1 ; if ( k <= for_end) do 
    {
      if ( outptr == linelength ) 
      breakout () ; 
      outptr = outptr + 1 ; 
      outbuf [ outptr ] = bytemem [ k ] ; 
    } 
  while ( k++ < for_end ) ; } 
} 
void zoutname ( p ) 
namepointer p ; 
{integer k  ; 
  namepointer t  ; 
  {register integer for_end; k = bytestart [ p ] ; for_end = bytestart [ p + 
  1 ] - 1 ; if ( k <= for_end) do 
    {
      t = translation [ bytemem [ k ] ] ; 
      if ( t == 0 ) 
      {
	if ( outptr == linelength ) 
	breakout () ; 
	outptr = outptr + 1 ; 
	outbuf [ outptr ] = bytemem [ k ] ; 
      } 
      else outstr ( t ) ; 
    } 
  while ( k++ < for_end ) ; } 
} 
void zoutmacandname ( n , p ) 
ASCIIcode n ; 
namepointer p ; 
{{
    
    if ( outptr == linelength ) 
    breakout () ; 
    outptr = outptr + 1 ; 
    outbuf [ outptr ] = 92 ; 
  } 
  {
    if ( outptr == linelength ) 
    breakout () ; 
    outptr = outptr + 1 ; 
    outbuf [ outptr ] = n ; 
  } 
  if ( bytestart [ p + 1 ] - bytestart [ p ] == 1 ) 
  outname ( p ) ; 
  else {
      
    {
      if ( outptr == linelength ) 
      breakout () ; 
      outptr = outptr + 1 ; 
      outbuf [ outptr ] = 123 ; 
    } 
    outname ( p ) ; 
    {
      if ( outptr == linelength ) 
      breakout () ; 
      outptr = outptr + 1 ; 
      outbuf [ outptr ] = 125 ; 
    } 
  } 
} 
void zcopy ( firstloc ) 
integer firstloc ; 
{integer k  ; 
  {register integer for_end; k = firstloc ; for_end = loc - 1 ; if ( k <= 
  for_end) do 
    {
      if ( outptr == linelength ) 
      breakout () ; 
      outptr = outptr + 1 ; 
      outbuf [ outptr ] = buffer [ k ] ; 
    } 
  while ( k++ < for_end ) ; } 
} 
void dothetranslation ( ) 
{/* 20 21 30 10 */ integer k  ; 
  integer t  ; 
  lab20: if ( outptr > 0 ) 
  flushbuffer ( outptr , false ) ; 
  emptybuffer = true ; 
  while ( true ) {
      
    getnext () ; 
    if ( startofline ) 
    if ( curtype >= 6 ) 
    {
      {
	if ( outptr == linelength ) 
	breakout () ; 
	outptr = outptr + 1 ; 
	outbuf [ outptr ] = 36 ; 
      } 
      startofline = false ; 
      switch ( curtype ) 
      {case 10 : 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 33 ; 
	} 
	break ; 
      case 11 : 
      case 12 : 
      case 13 : 
      case 14 : 
      case 15 : 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 123 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 125 ; 
	} 
	break ; 
	default: 
	; 
	break ; 
      } 
    } 
    else if ( curtype == 1 ) 
    {
      outstr ( trskip ) ; 
      goto lab20 ; 
    } 
    else if ( curtype == 5 ) 
    goto lab20 ; 
    lab21: switch ( curtype ) 
    {case 6 : 
      if ( buffer [ loc ] == 47 ) 
      if ( charclass [ buffer [ loc + 1 ] ] == 0 ) 
      {
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 102 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 114 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 97 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 99 ; 
	} 
	copy ( curtok ) ; 
	getnext () ; 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 47 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 123 ; 
	} 
	getnext () ; 
	copy ( curtok ) ; 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 125 ; 
	} 
      } 
      else copy ( curtok ) ; 
      else copy ( curtok ) ; 
      break ; 
    case 7 : 
      {
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 55 ; 
	} 
	copy ( curtok ) ; 
      } 
      break ; 
    case 0 : 
      outstr ( trquad ) ; 
      break ; 
    case 1 : 
    case 5 : 
      {
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 36 ; 
	} 
	if ( ( loc < limit ) && ( curtype == 1 ) ) 
	{
	  curtype = 29 ; 
	  goto lab21 ; 
	} 
	else {
	    
	  {
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 92 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 112 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 97 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 114 ; 
	  } 
	  goto lab20 ; 
	} 
      } 
      break ; 
    case 2 : 
      goto lab10 ; 
      break ; 
    case 8 : 
      outmacandname ( 49 , curtok ) ; 
      break ; 
    case 9 : 
      outmacandname ( 50 , curtok ) ; 
      break ; 
    case 18 : 
      if ( prevtype == 9 ) 
      outmacandname ( 49 , curtok ) ; 
      else outmacandname ( 50 , curtok ) ; 
      break ; 
    case 10 : 
      outmacandname ( 51 , curtok ) ; 
      break ; 
    case 13 : 
      outmacandname ( 52 , curtok ) ; 
      break ; 
    case 17 : 
      outmacandname ( 53 , curtok ) ; 
      break ; 
    case 11 : 
      outmacandname ( 54 , curtok ) ; 
      break ; 
    case 19 : 
      outmacandname ( 56 , curtok ) ; 
      break ; 
    case 20 : 
      outmacandname ( 63 , curtok ) ; 
      break ; 
    case 16 : 
    case 27 : 
    case 12 : 
      outname ( curtok ) ; 
      break ; 
    case 23 : 
      {
	if ( outptr == linelength ) 
	breakout () ; 
	outptr = outptr + 1 ; 
	outbuf [ outptr ] = 92 ; 
	if ( outptr == linelength ) 
	breakout () ; 
	outptr = outptr + 1 ; 
	outbuf [ outptr ] = 59 ; 
      } 
      break ; 
    case 21 : 
      {
	outname ( curtok ) ; 
	getnext () ; 
	if ( curtype != 1 ) 
	if ( curtype != 10 ) 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 32 ; 
	} 
	goto lab21 ; 
      } 
      break ; 
    case 22 : 
      outstr ( translation [ 92 ] ) ; 
      break ; 
    case 15 : 
      outstr ( trps ) ; 
      break ; 
    case 24 : 
      outstr ( trle ) ; 
      break ; 
    case 25 : 
      outstr ( trge ) ; 
      break ; 
    case 26 : 
      outstr ( trne ) ; 
      break ; 
    case 14 : 
      outstr ( tramp ) ; 
      break ; 
    case 31 : 
      {
	outmacandname ( 50 , curtok ) ; 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 104 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 98 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 111 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 120 ; 
	} 
	while ( buffer [ loc ] == 32 ) loc = loc + 1 ; 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 123 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 116 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 116 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 32 ; 
	} 
	while ( ( buffer [ loc ] != 32 ) && ( buffer [ loc ] != 37 ) && ( 
	buffer [ loc ] != 59 ) && ( loc < limit ) ) {
	    
	  {
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = buffer [ loc ] ; 
	  } 
	  loc = loc + 1 ; 
	} 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 125 ; 
	} 
      } 
      break ; 
    case 28 : 
    case 29 : 
      {
	if ( curtype == 28 ) 
	{
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 92 ; 
	  if ( outptr == linelength ) 
	  breakout () ; 
	  outptr = outptr + 1 ; 
	  outbuf [ outptr ] = 57 ; 
	} 
	idfirst = loc ; 
	while ( ( loc < limit ) && ( buffer [ loc ] != 124 ) ) loc = loc + 1 ; 
	copy ( idfirst ) ; 
	if ( loc < limit ) 
	{
	  startofline = true ; 
	  loc = loc + 1 ; 
	  k = loc ; 
	  while ( ( k < limit ) && ( buffer [ k ] != 124 ) ) k = k + 1 ; 
	  buffer [ k ] = 13 ; 
	} 
	else {
	    
	  if ( outbuf [ outptr ] == 92 ) 
	  {
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 32 ; 
	  } 
	  {
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 92 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 112 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 97 ; 
	    if ( outptr == linelength ) 
	    breakout () ; 
	    outptr = outptr + 1 ; 
	    outbuf [ outptr ] = 114 ; 
	  } 
	  goto lab20 ; 
	} 
      } 
      break ; 
    case 3 : 
      {
	idfirst = loc ; 
	loc = limit ; 
	copy ( idfirst ) ; 
	if ( outptr == 0 ) 
	{
	  outptr = 1 ; 
	  outbuf [ 1 ] = 32 ; 
	} 
	goto lab20 ; 
      } 
      break ; 
    case 4 : 
      {
	startofline = false ; 
	getnext () ; 
	t = curtype ; 
	while ( curtype >= 8 ) {
	    
	  getnext () ; 
	  if ( curtype >= 8 ) 
	  ilk [ curtok ] = t ; 
	} 
	if ( curtype != 1 ) 
	if ( curtype != 5 ) 
	{
	  {
	    (void) putc('\n',  stdout );
	    (void) Fputs( stdout ,  "! Only symbolic tokens should appear after %%%"             ) ; 
	    error () ; 
	  } 
	  goto lab21 ; 
	} 
	emptybuffer = true ; 
	goto lab20 ; 
      } 
      break ; 
    case 30 : 
    case 32 : 
    case 33 : 
      {
	if ( bytestart [ curtok + 1 ] - bytestart [ curtok ] == 1 ) 
	outname ( curtok ) ; 
	else outmacandname ( 92 , curtok ) ; 
	getnext () ; 
	if ( bytemem [ bytestart [ prevtok ] ] == 39 ) 
	goto lab21 ; 
	switch ( prevtype ) 
	{case 30 : 
	  {
	    if ( ( curtype == 6 ) || ( curtype >= 30 ) ) 
	    {
	      if ( outptr == linelength ) 
	      breakout () ; 
	      outptr = outptr + 1 ; 
	      outbuf [ outptr ] = 92 ; 
	      if ( outptr == linelength ) 
	      breakout () ; 
	      outptr = outptr + 1 ; 
	      outbuf [ outptr ] = 44 ; 
	    } 
	    goto lab21 ; 
	  } 
	  break ; 
	case 32 : 
	  if ( curtype < 30 ) 
	  goto lab21 ; 
	  else {
	      
	    {
	      if ( outptr == linelength ) 
	      breakout () ; 
	      outptr = outptr + 1 ; 
	      outbuf [ outptr ] = 46 ; 
	    } 
	    curtype = 30 ; 
	    goto lab21 ; 
	  } 
	  break ; 
	case 33 : 
	  {
	    if ( curtype == 33 ) 
	    if ( bytemem [ bytestart [ curtok ] ] == 39 ) 
	    goto lab21 ; 
	    if ( ( curtype == 6 ) || ( curtype >= 30 ) ) 
	    {
	      {
		if ( outptr == linelength ) 
		breakout () ; 
		outptr = outptr + 1 ; 
		outbuf [ outptr ] = 95 ; 
		if ( outptr == linelength ) 
		breakout () ; 
		outptr = outptr + 1 ; 
		outbuf [ outptr ] = 123 ; 
	      } 
	      while ( true ) {
		  
		if ( curtype >= 30 ) 
		outname ( curtok ) ; 
		else copy ( curtok ) ; 
		if ( prevtype == 32 ) 
		{
		  getnext () ; 
		  goto lab30 ; 
		} 
		getnext () ; 
		if ( curtype < 30 ) 
		if ( curtype != 6 ) 
		goto lab30 ; 
		if ( curtype == prevtype ) 
		if ( curtype == 6 ) 
		{
		  if ( outptr == linelength ) 
		  breakout () ; 
		  outptr = outptr + 1 ; 
		  outbuf [ outptr ] = 92 ; 
		  if ( outptr == linelength ) 
		  breakout () ; 
		  outptr = outptr + 1 ; 
		  outbuf [ outptr ] = 44 ; 
		} 
		else if ( charclass [ bytemem [ bytestart [ curtok ] ] ] == 
		charclass [ bytemem [ bytestart [ prevtok ] ] ] ) 
		if ( bytemem [ bytestart [ prevtok ] ] != 46 ) 
		{
		  if ( outptr == linelength ) 
		  breakout () ; 
		  outptr = outptr + 1 ; 
		  outbuf [ outptr ] = 46 ; 
		} 
		else {
		    
		  if ( outptr == linelength ) 
		  breakout () ; 
		  outptr = outptr + 1 ; 
		  outbuf [ outptr ] = 92 ; 
		  if ( outptr == linelength ) 
		  breakout () ; 
		  outptr = outptr + 1 ; 
		  outbuf [ outptr ] = 44 ; 
		} 
	      } 
	      lab30: {
		  
		if ( outptr == linelength ) 
		breakout () ; 
		outptr = outptr + 1 ; 
		outbuf [ outptr ] = 125 ; 
	      } 
	      goto lab21 ; 
	    } 
	    else if ( curtype == 27 ) 
	    outstr ( trsharp ) ; 
	    else goto lab21 ; 
	  } 
	  break ; 
	} 
      } 
      break ; 
    } 
  } 
  lab10: ; 
} 
void main_body() {
    
  initialize () ; 
  (void) fprintf( stdout , "%s\n",  "This is MFT, C Version 2.0" ) ; 
  idloc = 18 ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 46 ; 
  buffer [ 17 ] = 46 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 19 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 91 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 93 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 125 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 123 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 58 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 20 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 58 ; 
  buffer [ 17 ] = 58 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 20 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 124 ; 
  buffer [ 16 ] = 124 ; 
  buffer [ 17 ] = 58 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 20 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 58 ; 
  buffer [ 17 ] = 61 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 44 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 59 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 21 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 92 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 22 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 92 ; 
  buffer [ 17 ] = 92 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 23 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 111 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 116 ; 
  buffer [ 13 ] = 108 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 98 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 103 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 103 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 117 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 117 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 100 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 108 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 109 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 105 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 100 ; 
  buffer [ 13 ] = 103 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 118 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 106 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 98 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 120 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 101 ; 
  buffer [ 8 ] = 120 ; 
  buffer [ 9 ] = 112 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 100 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 109 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 119 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 109 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 110 ; 
  buffer [ 8 ] = 101 ; 
  buffer [ 9 ] = 119 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 116 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 110 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 112 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 119 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 97 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 109 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 118 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 115 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 116 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 107 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 104 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 115 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 111 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 117 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 13 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 118 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 112 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 109 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 115 ; 
  buffer [ 7 ] = 101 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 111 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 116 ; 
  buffer [ 8 ] = 101 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 102 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 102 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 115 ; 
  buffer [ 11 ] = 117 ; 
  buffer [ 12 ] = 102 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 120 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 102 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 118 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 102 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 113 ; 
  buffer [ 14 ] = 117 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 120 ; 
  buffer [ 16 ] = 112 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 117 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 102 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 120 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 120 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 112 ; 
  buffer [ 12 ] = 114 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 101 ; 
  buffer [ 12 ] = 114 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 31 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 100 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 102 ; 
  buffer [ 17 ] = 105 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 108 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 102 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 110 ; 
  buffer [ 8 ] = 117 ; 
  buffer [ 9 ] = 108 ; 
  buffer [ 10 ] = 108 ; 
  buffer [ 11 ] = 112 ; 
  buffer [ 12 ] = 105 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 117 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 117 ; 
  buffer [ 13 ] = 108 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 106 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 98 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 109 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 112 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 99 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 103 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 32 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 61 ; 
  buffer [ 17 ] = 58 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 61 ; 
  buffer [ 16 ] = 58 ; 
  buffer [ 17 ] = 124 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 61 ; 
  buffer [ 15 ] = 58 ; 
  buffer [ 16 ] = 124 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 124 ; 
  buffer [ 16 ] = 61 ; 
  buffer [ 17 ] = 58 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 124 ; 
  buffer [ 15 ] = 61 ; 
  buffer [ 16 ] = 58 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 124 ; 
  buffer [ 15 ] = 61 ; 
  buffer [ 16 ] = 58 ; 
  buffer [ 17 ] = 124 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 124 ; 
  buffer [ 14 ] = 61 ; 
  buffer [ 15 ] = 58 ; 
  buffer [ 16 ] = 124 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 124 ; 
  buffer [ 13 ] = 61 ; 
  buffer [ 14 ] = 58 ; 
  buffer [ 15 ] = 124 ; 
  buffer [ 16 ] = 62 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 107 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 107 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 111 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 110 ; 
  buffer [ 6 ] = 111 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 109 ; 
  buffer [ 9 ] = 97 ; 
  buffer [ 10 ] = 108 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 118 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 107 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 119 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 117 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 107 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 119 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 110 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 109 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 114 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 118 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 109 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 107 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 109 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 107 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 116 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 116 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 108 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 103 ; 
  buffer [ 16 ] = 104 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 99 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 104 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 120 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 65 ; 
  buffer [ 14 ] = 83 ; 
  buffer [ 15 ] = 67 ; 
  buffer [ 16 ] = 73 ; 
  buffer [ 17 ] = 73 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 104 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 108 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 103 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 116 ; 
  buffer [ 6 ] = 117 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 110 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 103 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 117 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 98 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 120 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 121 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 120 ; 
  buffer [ 13 ] = 120 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 120 ; 
  buffer [ 13 ] = 121 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 121 ; 
  buffer [ 13 ] = 120 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 121 ; 
  buffer [ 13 ] = 121 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 113 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 120 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 4 ; 
  buffer [ 4 ] = 117 ; 
  buffer [ 5 ] = 110 ; 
  buffer [ 6 ] = 105 ; 
  buffer [ 7 ] = 102 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 109 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 118 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 104 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 114 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 120 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 115 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 103 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 99 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 8 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 116 ; 
  buffer [ 6 ] = 114 ; 
  buffer [ 7 ] = 97 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 103 ; 
  buffer [ 12 ] = 116 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 2 ; 
  buffer [ 2 ] = 116 ; 
  buffer [ 3 ] = 114 ; 
  buffer [ 4 ] = 97 ; 
  buffer [ 5 ] = 99 ; 
  buffer [ 6 ] = 105 ; 
  buffer [ 7 ] = 110 ; 
  buffer [ 8 ] = 103 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 113 ; 
  buffer [ 11 ] = 117 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 3 ; 
  buffer [ 3 ] = 116 ; 
  buffer [ 4 ] = 114 ; 
  buffer [ 5 ] = 97 ; 
  buffer [ 6 ] = 99 ; 
  buffer [ 7 ] = 105 ; 
  buffer [ 8 ] = 110 ; 
  buffer [ 9 ] = 103 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 112 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 117 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 4 ; 
  buffer [ 4 ] = 116 ; 
  buffer [ 5 ] = 114 ; 
  buffer [ 6 ] = 97 ; 
  buffer [ 7 ] = 99 ; 
  buffer [ 8 ] = 105 ; 
  buffer [ 9 ] = 110 ; 
  buffer [ 10 ] = 103 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 104 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 99 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 116 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 97 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 99 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 116 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 97 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 103 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 3 ; 
  buffer [ 3 ] = 116 ; 
  buffer [ 4 ] = 114 ; 
  buffer [ 5 ] = 97 ; 
  buffer [ 6 ] = 99 ; 
  buffer [ 7 ] = 105 ; 
  buffer [ 8 ] = 110 ; 
  buffer [ 9 ] = 103 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 109 ; 
  buffer [ 13 ] = 109 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 110 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 116 ; 
  buffer [ 6 ] = 114 ; 
  buffer [ 7 ] = 97 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 103 ; 
  buffer [ 12 ] = 109 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 116 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 97 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 103 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 116 ; 
  buffer [ 6 ] = 114 ; 
  buffer [ 7 ] = 97 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 103 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 117 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 116 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 97 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 116 ; 
  buffer [ 6 ] = 114 ; 
  buffer [ 7 ] = 97 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 103 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 121 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 109 ; 
  buffer [ 14 ] = 111 ; 
  buffer [ 15 ] = 110 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 100 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 109 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 104 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 104 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 102 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 109 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 119 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 104 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 99 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 120 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 100 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 115 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 122 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 112 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 118 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 112 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 120 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 115 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 121 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 115 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 112 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 117 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 115 ; 
  buffer [ 7 ] = 104 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 119 ; 
  buffer [ 10 ] = 115 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 112 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 102 ; 
  buffer [ 9 ] = 111 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 109 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 107 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 112 ; 
  buffer [ 11 ] = 114 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 109 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 97 ; 
  buffer [ 7 ] = 117 ; 
  buffer [ 8 ] = 116 ; 
  buffer [ 9 ] = 111 ; 
  buffer [ 10 ] = 114 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 117 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 103 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 97 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 117 ; 
  buffer [ 12 ] = 108 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 121 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 102 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 116 ; 
  buffer [ 7 ] = 117 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 110 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 99 ; 
  buffer [ 17 ] = 107 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 119 ; 
  buffer [ 7 ] = 97 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 110 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 99 ; 
  buffer [ 17 ] = 107 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 98 ; 
  buffer [ 7 ] = 111 ; 
  buffer [ 8 ] = 117 ; 
  buffer [ 9 ] = 110 ; 
  buffer [ 10 ] = 100 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 114 ; 
  buffer [ 13 ] = 121 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 104 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 30 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 43 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 12 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 45 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 12 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 42 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 12 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 47 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 43 ; 
  buffer [ 17 ] = 43 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 43 ; 
  buffer [ 16 ] = 45 ; 
  buffer [ 17 ] = 43 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 15 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 60 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 60 ; 
  buffer [ 17 ] = 61 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 24 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 62 ; 
  buffer [ 17 ] = 61 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 25 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 61 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 16 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 60 ; 
  buffer [ 17 ] = 62 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 26 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 117 ; 
  buffer [ 11 ] = 98 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 117 ; 
  buffer [ 13 ] = 98 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 100 ; 
  buffer [ 6 ] = 105 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 101 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 109 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 112 ; 
  buffer [ 14 ] = 111 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 112 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 112 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 112 ; 
  buffer [ 10 ] = 101 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 102 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 115 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 38 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 14 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 114 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 108 ; 
  buffer [ 13 ] = 97 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 104 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 116 ; 
  buffer [ 8 ] = 114 ; 
  buffer [ 9 ] = 97 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 102 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 109 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 120 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 121 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 122 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 1 ; 
  buffer [ 1 ] = 105 ; 
  buffer [ 2 ] = 110 ; 
  buffer [ 3 ] = 116 ; 
  buffer [ 4 ] = 101 ; 
  buffer [ 5 ] = 114 ; 
  buffer [ 6 ] = 115 ; 
  buffer [ 7 ] = 101 ; 
  buffer [ 8 ] = 99 ; 
  buffer [ 9 ] = 116 ; 
  buffer [ 10 ] = 105 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 109 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 11 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 117 ; 
  buffer [ 13 ] = 109 ; 
  buffer [ 14 ] = 101 ; 
  buffer [ 15 ] = 114 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 99 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 12 ; 
  buffer [ 12 ] = 115 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 114 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 98 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 112 ; 
  buffer [ 12 ] = 105 ; 
  buffer [ 13 ] = 99 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 117 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 116 ; 
  buffer [ 10 ] = 114 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 102 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 114 ; 
  buffer [ 17 ] = 109 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 105 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 18 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 100 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 100 ; 
  buffer [ 15 ] = 117 ; 
  buffer [ 16 ] = 109 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 10 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 98 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 99 ; 
  buffer [ 13 ] = 104 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 7 ; 
  buffer [ 7 ] = 110 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 110 ; 
  buffer [ 10 ] = 115 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 112 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 115 ; 
  buffer [ 9 ] = 99 ; 
  buffer [ 10 ] = 114 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 108 ; 
  buffer [ 13 ] = 108 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 5 ; 
  buffer [ 5 ] = 101 ; 
  buffer [ 6 ] = 114 ; 
  buffer [ 7 ] = 114 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 115 ; 
  buffer [ 11 ] = 116 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 112 ; 
  buffer [ 14 ] = 109 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 100 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 110 ; 
  buffer [ 15 ] = 110 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 13 ; 
  buffer [ 13 ] = 111 ; 
  buffer [ 14 ] = 117 ; 
  buffer [ 15 ] = 116 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 104 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 111 ; 
  buffer [ 15 ] = 107 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 115 ; 
  buffer [ 10 ] = 104 ; 
  buffer [ 11 ] = 111 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 104 ; 
  buffer [ 16 ] = 111 ; 
  buffer [ 17 ] = 119 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 6 ; 
  buffer [ 6 ] = 115 ; 
  buffer [ 7 ] = 104 ; 
  buffer [ 8 ] = 111 ; 
  buffer [ 9 ] = 119 ; 
  buffer [ 10 ] = 118 ; 
  buffer [ 11 ] = 97 ; 
  buffer [ 12 ] = 114 ; 
  buffer [ 13 ] = 105 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 98 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 2 ; 
  buffer [ 2 ] = 115 ; 
  buffer [ 3 ] = 104 ; 
  buffer [ 4 ] = 111 ; 
  buffer [ 5 ] = 119 ; 
  buffer [ 6 ] = 100 ; 
  buffer [ 7 ] = 101 ; 
  buffer [ 8 ] = 112 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 110 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 115 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 17 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 99 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 110 ; 
  buffer [ 14 ] = 116 ; 
  buffer [ 15 ] = 111 ; 
  buffer [ 16 ] = 117 ; 
  buffer [ 17 ] = 114 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 100 ; 
  buffer [ 9 ] = 111 ; 
  buffer [ 10 ] = 117 ; 
  buffer [ 11 ] = 98 ; 
  buffer [ 12 ] = 108 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 104 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 108 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 111 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 119 ; 
  buffer [ 12 ] = 105 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 112 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 119 ; 
  buffer [ 9 ] = 105 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 104 ; 
  buffer [ 12 ] = 119 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 103 ; 
  buffer [ 16 ] = 104 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 100 ; 
  buffer [ 11 ] = 114 ; 
  buffer [ 12 ] = 111 ; 
  buffer [ 13 ] = 112 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 107 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 112 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 110 ; 
  buffer [ 17 ] = 103 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 109 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 103 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 101 ; 
  buffer [ 9 ] = 114 ; 
  buffer [ 10 ] = 114 ; 
  buffer [ 11 ] = 109 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 115 ; 
  buffer [ 15 ] = 97 ; 
  buffer [ 16 ] = 103 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 101 ; 
  buffer [ 12 ] = 114 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 104 ; 
  buffer [ 15 ] = 101 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 112 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 99 ; 
  buffer [ 11 ] = 104 ; 
  buffer [ 12 ] = 97 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 108 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 115 ; 
  buffer [ 17 ] = 116 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 10 ; 
  buffer [ 10 ] = 108 ; 
  buffer [ 11 ] = 105 ; 
  buffer [ 12 ] = 103 ; 
  buffer [ 13 ] = 116 ; 
  buffer [ 14 ] = 97 ; 
  buffer [ 15 ] = 98 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 101 ; 
  buffer [ 9 ] = 120 ; 
  buffer [ 10 ] = 116 ; 
  buffer [ 11 ] = 101 ; 
  buffer [ 12 ] = 110 ; 
  buffer [ 13 ] = 115 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 98 ; 
  buffer [ 16 ] = 108 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 104 ; 
  buffer [ 9 ] = 101 ; 
  buffer [ 10 ] = 97 ; 
  buffer [ 11 ] = 100 ; 
  buffer [ 12 ] = 101 ; 
  buffer [ 13 ] = 114 ; 
  buffer [ 14 ] = 98 ; 
  buffer [ 15 ] = 121 ; 
  buffer [ 16 ] = 116 ; 
  buffer [ 17 ] = 101 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 9 ; 
  buffer [ 9 ] = 102 ; 
  buffer [ 10 ] = 111 ; 
  buffer [ 11 ] = 110 ; 
  buffer [ 12 ] = 116 ; 
  buffer [ 13 ] = 100 ; 
  buffer [ 14 ] = 105 ; 
  buffer [ 15 ] = 109 ; 
  buffer [ 16 ] = 101 ; 
  buffer [ 17 ] = 110 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 11 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 112 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 8 ; 
  buffer [ 8 ] = 110 ; 
  buffer [ 9 ] = 117 ; 
  buffer [ 10 ] = 109 ; 
  buffer [ 11 ] = 115 ; 
  buffer [ 12 ] = 112 ; 
  buffer [ 13 ] = 101 ; 
  buffer [ 14 ] = 99 ; 
  buffer [ 15 ] = 105 ; 
  buffer [ 16 ] = 97 ; 
  buffer [ 17 ] = 108 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 9 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 37 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 28 ) ; 
  idfirst = 16 ; 
  buffer [ 16 ] = 37 ; 
  buffer [ 17 ] = 37 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 3 ) ; 
  idfirst = 15 ; 
  buffer [ 15 ] = 37 ; 
  buffer [ 16 ] = 37 ; 
  buffer [ 17 ] = 37 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 4 ) ; 
  idfirst = 14 ; 
  buffer [ 14 ] = 37 ; 
  buffer [ 15 ] = 37 ; 
  buffer [ 16 ] = 37 ; 
  buffer [ 17 ] = 37 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 5 ) ; 
  idfirst = 17 ; 
  buffer [ 17 ] = 35 ; 
  curtok = lookup () ; 
  ilk [ curtok ] = ( 27 ) ; 
  {register integer for_end; i = 0 ; for_end = 255 ; if ( i <= for_end) do 
    translation [ i ] = 0 ; 
  while ( i++ < for_end ) ; } 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 36 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 36 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 35 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 35 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 38 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 38 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 123 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 123 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 125 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 125 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 95 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 95 ] = curtok ; 
  byteptr = byteptr + 2 ; 
  bytemem [ byteptr - 2 ] = 92 ; 
  bytemem [ byteptr - 1 ] = 37 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 37 ] = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 66 ; 
  bytemem [ byteptr - 2 ] = 83 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 92 ] = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 72 ; 
  bytemem [ byteptr - 2 ] = 65 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 94 ] = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 84 ; 
  bytemem [ byteptr - 2 ] = 73 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 126 ] = curtok ; 
  byteptr = byteptr + 5 ; 
  bytemem [ byteptr - 5 ] = 92 ; 
  bytemem [ byteptr - 4 ] = 97 ; 
  bytemem [ byteptr - 3 ] = 115 ; 
  bytemem [ byteptr - 2 ] = 116 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  translation [ 42 ] = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 65 ; 
  bytemem [ byteptr - 2 ] = 77 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  tramp = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 66 ; 
  bytemem [ byteptr - 2 ] = 76 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trskip = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 83 ; 
  bytemem [ byteptr - 2 ] = 72 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trsharp = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 80 ; 
  bytemem [ byteptr - 2 ] = 83 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trps = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 108 ; 
  bytemem [ byteptr - 2 ] = 101 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trle = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 103 ; 
  bytemem [ byteptr - 2 ] = 101 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trge = curtok ; 
  byteptr = byteptr + 4 ; 
  bytemem [ byteptr - 4 ] = 92 ; 
  bytemem [ byteptr - 3 ] = 110 ; 
  bytemem [ byteptr - 2 ] = 101 ; 
  bytemem [ byteptr - 1 ] = 32 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trne = curtok ; 
  byteptr = byteptr + 5 ; 
  bytemem [ byteptr - 5 ] = 92 ; 
  bytemem [ byteptr - 4 ] = 113 ; 
  bytemem [ byteptr - 3 ] = 117 ; 
  bytemem [ byteptr - 2 ] = 97 ; 
  bytemem [ byteptr - 1 ] = 100 ; 
  curtok = nameptr ; 
  nameptr = nameptr + 1 ; 
  bytestart [ nameptr ] = byteptr ; 
  trquad = curtok ; 
  {
    openinput () ; 
    line = 0 ; 
    otherline = 0 ; 
    changing = true ; 
    primethechangebuffer () ; 
    changing = ! changing ; 
    templine = otherline ; 
    otherline = line ; 
    line = templine ; 
    styling = true ; 
    limit = 0 ; 
    loc = 1 ; 
    buffer [ 0 ] = 32 ; 
    inputhasended = false ; 
  } 
  dothetranslation () ; 
  if ( changelimit != 0 ) 
  {
    {register integer for_end; loc = 0 ; for_end = changelimit ; if ( loc <= 
    for_end) do 
      buffer [ loc ] = changebuffer [ loc ] ; 
    while ( loc++ < for_end ) ; } 
    limit = changelimit ; 
    changing = true ; 
    line = otherline ; 
    loc = changelimit ; 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "! Change file entry did not match" ) ; 
      error () ; 
    } 
  } 
  switch ( history ) 
  {case 0 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(No errors were found.)" ) ; 
    } 
    break ; 
  case 1 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(Did you see the warning message above?)" ) ; 
    } 
    break ; 
  case 2 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(Pardon me, but I think I spotted something wrong.)" ) 
      ; 
    } 
    break ; 
  case 3 : 
    {
      (void) putc('\n',  stdout );
      (void) Fputs( stdout ,  "(That was a fatal error, my friend.)" ) ; 
    } 
    break ; 
  } 
  (void) putc('\n',  stdout );
  if ( ( history != 0 ) && ( history != 1 ) ) 
  uexit ( 1 ) ; 
  else uexit ( 0 ) ; 
}