

#include "BUILTIN.h"
extern OBJ _APErr_3(OBJ,OBJ,OBJ);extern OBJ __APErr_3;
extern OBJ _APErr_4(OBJ,OBJ,OBJ);extern OBJ __APErr_4;
extern OBJ _APErr_7(OBJ,OBJ,OBJ);extern OBJ __APErr_7;
extern OBJ _APErr_11(OBJ,OBJ);extern OBJ __APErr_11;
extern OBJ _APErr_15(OBJ);extern OBJ __APErr_15;
extern OBJ __APErr_16;
extern OBJ _APErr_17(OBJ);extern OBJ __APErr_17;
extern OBJ __AZOpts_14;
extern OBJ __AModName_1;
extern OBJ _AToken_8(OBJ,OBJ);extern OBJ __AToken_8;
extern OBJ _AToken_9(OBJ,OBJ);extern OBJ __AToken_9;
extern OBJ _AToken_16(OBJ);extern OBJ __AToken_16;
extern OBJ __AModExpr_1;
extern OBJ __ATerminal_4;
extern OBJ __ATerminal_34;
extern OBJ __ATerminal_36;
extern OBJ __ATerminal_38;
extern OBJ __ATerminal_40;
extern OBJ __ATerminal_42;
extern OBJ __ATerminal_44;
extern OBJ __ATerminal_46;
extern OBJ __ATerminal_50;
extern OBJ __ATerminal_54;
extern OBJ __ATerminal_62;
extern OBJ __ATerminal_64;
extern OBJ __ATerminal_70;
extern OBJ __ATerminal_72;
extern OBJ __ATerminal_82;
extern OBJ __ATerminal_84;
extern OBJ __ATerminal_94;
extern OBJ __ATerminal_100;
extern OBJ __ATerminal_108;
extern OBJ __ATerminal_138;
extern OBJ _ATerminal_141(OBJ,OBJ);extern OBJ __ATerminal_141;
extern OBJ _ATerminal_145(OBJ);extern OBJ __ATerminal_145;

#include "Denotation.h"
extern OBJ _APTypes_14(OBJ);extern OBJ __APTypes_14;
extern OBJ _ASeqFilter_7(OBJ,OBJ);extern OBJ __ASeqFilter_7;
extern OBJ _AModBase_8(OBJ,OBJ);extern OBJ __AModBase_8;
extern OBJ _AModBase_9(OBJ,OBJ,OBJ);extern OBJ __AModBase_9;
extern OBJ __AModBase_12;
extern OBJ __AModBase_13;
extern OBJ _ASetMap_5(OBJ,OBJ,OBJ,OBJ);extern OBJ __ASetMap_5;
extern OBJ __AOcError_15;
extern OBJ _ADEBUG_2(OBJ,OBJ,OBJ);extern OBJ __ADEBUG_2;
extern OBJ _ADEBUG_10(OBJ);extern OBJ __ADEBUG_10;
extern OBJ __ASeq_6;

#include "Array.h"
extern OBJ _ASet_39(OBJ,OBJ,OBJ);extern OBJ __ASet_39;
extern OBJ _ASet_40(OBJ,OBJ,OBJ);extern OBJ __ASet_40;
extern OBJ _ASet_44(OBJ,OBJ,OBJ);extern OBJ __ASet_44;

#include "Nat.h"

#include "Char.h"
extern OBJ _ASeqReduce_3(OBJ,OBJ,OBJ);extern OBJ __ASeqReduce_3;

#include "Int.h"
extern OBJ __AAbsy_2;

#include "Bitset.h"
extern OBJ _ABaseParser_2(OBJ);OBJ __ABaseParser_2; /* parser */
extern OBJ _ABaseParser_3(OBJ);OBJ __ABaseParser_3; /* parser? */
extern OBJ _ABaseParser_4(OBJ);OBJ __ABaseParser_4; /* pars */
extern OBJ _ABaseParser_5(OBJ,OBJ);OBJ __ABaseParser_5; /* <&.> */
extern OBJ _ABaseParser_6(OBJ,OBJ);OBJ __ABaseParser_6; /* <.&> */
extern OBJ _ABaseParser_7(OBJ,OBJ,OBJ);OBJ __ABaseParser_7; /* <&> */
extern OBJ _ABaseParser_8(OBJ,OBJ);OBJ __ABaseParser_8; /* <|> */
extern OBJ _ABaseParser_9(OBJ,OBJ);OBJ __ABaseParser_9; /* <&?.> */
extern OBJ _ABaseParser_10(OBJ,OBJ);OBJ __ABaseParser_10; /* <.&?> */
extern OBJ _ABaseParser_11(OBJ,OBJ,OBJ);OBJ __ABaseParser_11; /* <&?> */
extern OBJ _ABaseParser_12(OBJ,OBJ,OBJ);OBJ __ABaseParser_12; /* || */
extern OBJ _ABaseParser_13(OBJ,OBJ);OBJ __ABaseParser_13; /* + */
extern OBJ _ABaseParser_14(OBJ,OBJ);OBJ __ABaseParser_14; /* * */
extern OBJ _ABaseParser_15(OBJ,OBJ,OBJ);OBJ __ABaseParser_15; /* +,1 */
extern OBJ _ABaseParser_16(OBJ,OBJ,OBJ);OBJ __ABaseParser_16; /* *,1 */
extern OBJ _ABaseParser_17(OBJ);OBJ __ABaseParser_17; /* isA */
extern OBJ _ABaseParser_18(OBJ,OBJ);OBJ __ABaseParser_18; /* isIn */
extern OBJ _ABaseParser_19(OBJ);OBJ __ABaseParser_19; /* nil */
extern OBJ _ABaseParser_20(OBJ);OBJ __ABaseParser_20; /* empty */
extern OBJ _ABaseParser_21(OBJ);OBJ __ABaseParser_21; /* empty,1 */
extern OBJ _ABaseParser_22(OBJ);OBJ __ABaseParser_22; /* fail */
extern OBJ _ABaseParser_23(OBJ);OBJ __ABaseParser_23; /* fail,1 */
extern OBJ _ABaseParser_24(OBJ);OBJ __ABaseParser_24; /* isA? */
extern OBJ _ABaseParser_25(OBJ);OBJ __ABaseParser_25; /* isIn? */
extern OBJ _ABaseParser_26(OBJ,OBJ);OBJ __ABaseParser_26; /* @ */
extern OBJ _ABaseParser_27(OBJ,OBJ,OBJ);OBJ __ABaseParser_27; /* @,1 */
OBJ __ABaseParser_31; /* traceMt? */
extern OBJ _ABaseParser_32(OBJ,OBJ,OBJ);OBJ __ABaseParser_32; /* isIn,1 */
extern OBJ _ABaseParser_33(OBJ,OBJ);OBJ __ABaseParser_33; /* accept */
OBJ __ABaseParser_34; /* posSet */
extern OBJ _ABaseParser_35(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_35; /* <&>'35 */
extern OBJ _ABaseParser_36(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_36; /* <&>'36 */
extern OBJ _ABaseParser_37(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_37; /* <|>'37 */
extern OBJ _ABaseParser_38(OBJ,OBJ,OBJ);OBJ __ABaseParser_38; /* <|>'38 */
extern OBJ _ABaseParser_39(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_39; /* <&?>'39 */
extern OBJ _ABaseParser_40(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_40; /* <&?>'40 */
extern OBJ _ABaseParser_41(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_41; /* ||'41 */
extern OBJ _ABaseParser_42(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_42; /* ||'42 */
extern OBJ _ABaseParser_43(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_43; /* *,1'43 */
extern OBJ _ABaseParser_44(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_44; /* *,1'44 */
extern OBJ _ABaseParser_45(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_45; /* +,1'45 */
extern OBJ _ABaseParser_46(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_46; /* +,1'46 */
OBJ __ABaseParser_47; /* +'47 */
OBJ __ABaseParser_48; /* *'48 */
extern OBJ _ABaseParser_49(OBJ,OBJ,OBJ);OBJ __ABaseParser_49; /* isA'49 */
extern OBJ _ABaseParser_50(OBJ,OBJ);OBJ __ABaseParser_50; /* isA'50 */
OBJ __ABaseParser_51; /* isIn,1'51 */
extern OBJ _ABaseParser_52(OBJ);OBJ __ABaseParser_52; /* isIn,1'52 */
extern OBJ _ABaseParser_53(OBJ,OBJ,OBJ,OBJ);OBJ __ABaseParser_53; /* isIn'53 */
extern OBJ _ABaseParser_54(OBJ,OBJ,OBJ);OBJ __ABaseParser_54; /* isIn'54 */
OBJ __ABaseParser_55; /* empty,1'55 */
extern OBJ _ABaseParser_56(OBJ,OBJ);OBJ __ABaseParser_56; /* empty,1'56 */
OBJ __ABaseParser_57; /* empty,1'57 */
extern OBJ _ABaseParser_58(OBJ,OBJ);OBJ __ABaseParser_58; /* empty,1'58 */
extern OBJ _ABaseParser_59(OBJ,OBJ);OBJ __ABaseParser_59; /* empty,1'59 */
extern OBJ _ABaseParser_60(OBJ,OBJ,OBJ);OBJ __ABaseParser_60; /* empty,1'60 */
extern OBJ _ABaseParser_61(OBJ,OBJ);OBJ __ABaseParser_61; /* empty,1'61 */
extern OBJ _ABaseParser_62(OBJ);OBJ __ABaseParser_62; /* empty,1'62 */
extern OBJ _ABaseParser_63(OBJ,OBJ,OBJ);OBJ __ABaseParser_63; /* fail'63 */
extern OBJ _ABaseParser_64(OBJ,OBJ);OBJ __ABaseParser_64; /* fail'64 */
OBJ __ABaseParser_65; /* fail,1'65 */
extern OBJ _ABaseParser_66(OBJ,OBJ);OBJ __ABaseParser_66; /* fail,1'66 */
extern OBJ _ABaseParser_67(OBJ,OBJ,OBJ);OBJ __ABaseParser_67; /* fail,1'67 */
extern OBJ _ABaseParser_68(OBJ,OBJ);OBJ __ABaseParser_68; /* fail,1'68 */
extern OBJ _ABaseParser_69(OBJ);OBJ __ABaseParser_69; /* isA?'69 */
extern OBJ _ABaseParser_70(OBJ,OBJ,OBJ);OBJ __ABaseParser_70; /* isA?'70 */
extern OBJ _ABaseParser_71(OBJ,OBJ);OBJ __ABaseParser_71; /* isA?'71 */
extern OBJ _ABaseParser_72(OBJ);OBJ __ABaseParser_72; /* isIn?'72 */
extern OBJ _ABaseParser_73(OBJ,OBJ,OBJ);OBJ __ABaseParser_73; /* isIn?'73 */
extern OBJ _ABaseParser_74(OBJ,OBJ);OBJ __ABaseParser_74; /* isIn?'74 */
extern OBJ _ABaseParser_75(OBJ,OBJ);OBJ __ABaseParser_75; /* nil'75 */
extern OBJ _ABaseParser_76(OBJ,OBJ);OBJ __ABaseParser_76; /* empty'76 */
OBJ __ABaseParser_77; /* traceMt?'77 */

extern OBJ _ABaseParser_2(OBJ x1) /* parser */
{OBJ r;
 r=x1;
 return r;}

extern OBJ _ABaseParser_3(OBJ x1) /* parser? */
{OBJ r;
 FRCLS(x1,1);
 r=__ABUILTIN_5;
 return r;}

extern OBJ _ABaseParser_4(OBJ x1) /* pars */
{OBJ r;
 r=x1;
 return r;}

extern OBJ _ABaseParser_5(OBJ x1,OBJ x2) /* <&.> */
{OBJ r;
 CPCLS(__ABaseParser_36,1);
 CPPRD(__AModBase_13,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_36,3))(__ABaseParser_36,x1,x2,__AModBase_13);
 return r;}

extern OBJ _ABaseParser_6(OBJ x1,OBJ x2) /* <.&> */
{OBJ r;
 CPCLS(__ABaseParser_36,1);
 CPPRD(__AModBase_12,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_36,3))(__ABaseParser_36,x1,x2,__AModBase_12);
 return r;}

extern OBJ _ABaseParser_7(OBJ x1,OBJ x2,OBJ x3) /* <&> */
{OBJ r;
 CPCLS(__ABaseParser_36,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_36,3))(__ABaseParser_36,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_8(OBJ x1,OBJ x2) /* <|> */
{OBJ r;
 CPCLS(__ABaseParser_38,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_38,2))(__ABaseParser_38,x1,x2);
 return r;}

extern OBJ _ABaseParser_9(OBJ x1,OBJ x2) /* <&?.> */
{OBJ r;
 CPCLS(__ABaseParser_40,1);
 CPPRD(__AModBase_13,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_40,3))(__ABaseParser_40,x1,x2,__AModBase_13);
 return r;}

extern OBJ _ABaseParser_10(OBJ x1,OBJ x2) /* <.&?> */
{OBJ r;
 CPCLS(__ABaseParser_40,1);
 CPPRD(__AModBase_12,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_40,3))(__ABaseParser_40,x1,x2,__AModBase_12);
 return r;}

extern OBJ _ABaseParser_11(OBJ x1,OBJ x2,OBJ x3) /* <&?> */
{OBJ r;
 CPCLS(__ABaseParser_40,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_40,3))(__ABaseParser_40,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_12(OBJ x1,OBJ x2,OBJ x3) /* || */
{OBJ r;
 CPCLS(__ABaseParser_42,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_42,3))(__ABaseParser_42,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_13(OBJ x1,OBJ x2) /* + */
{OBJ r;
 CPCLS(__ABaseParser_46,1);
 COPY(__ABaseParser_47,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_46,3))(__ABaseParser_46,x1,__ABaseParser_47,x2);
 return r;}

extern OBJ _ABaseParser_14(OBJ x1,OBJ x2) /* * */
{OBJ r;
 CPCLS(__ABaseParser_44,1);
 COPY(__ABaseParser_48,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_44,3))(__ABaseParser_44,x1,__ABaseParser_48,x2);
 return r;}

extern OBJ _ABaseParser_15(OBJ x1,OBJ x2,OBJ x3) /* +,1 */
{OBJ r;
 CPCLS(__ABaseParser_46,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_46,3))(__ABaseParser_46,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_16(OBJ x1,OBJ x2,OBJ x3) /* *,1 */
{OBJ r;
 CPCLS(__ABaseParser_44,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_44,3))(__ABaseParser_44,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_17(OBJ x1) /* isA */
{OBJ r;
 CPCLS(__ABaseParser_50,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_50,1))(__ABaseParser_50,x1);
 return r;}

extern OBJ _ABaseParser_18(OBJ x1,OBJ x2) /* isIn */
{OBJ r;
 CPCLS(__ABaseParser_54,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_54,2))(__ABaseParser_54,x1,x2);
 return r;}

extern OBJ _ABaseParser_19(OBJ x1) /* nil */
{OBJ r;
 CPCLS(__ABaseParser_75,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_75,1))(__ABaseParser_75,x1);
 return r;}

extern OBJ _ABaseParser_20(OBJ x1) /* empty */
{OBJ r;
 CPCLS(__ABaseParser_76,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_76,1))(__ABaseParser_76,x1);
 return r;}

extern OBJ _ABaseParser_21(OBJ x1) /* empty,1 */
{OBJ r;
 r=_ABaseParser_62(x1);
 return r;}

extern OBJ _ABaseParser_22(OBJ x1) /* fail */
{OBJ r;
 CPCLS(__ABaseParser_64,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_64,1))(__ABaseParser_64,x1);
 return r;}

extern OBJ _ABaseParser_23(OBJ x1) /* fail,1 */
{OBJ r;
 CPCLS(__ABaseParser_68,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_68,1))(__ABaseParser_68,x1);
 return r;}

extern OBJ _ABaseParser_24(OBJ x1) /* isA? */
{OBJ r;
 CPCLS(__ABaseParser_71,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_71,1))(__ABaseParser_71,x1);
 return r;}

extern OBJ _ABaseParser_25(OBJ x1) /* isIn? */
{OBJ r;
 CPCLS(__ABaseParser_74,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_74,1))(__ABaseParser_74,x1);
 return r;}

extern OBJ _ABaseParser_26(OBJ x1,OBJ x2) /* @ */
{OBJ r;
 if(ISPRM(x2)){
  r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(x1,2))(x1,__ASeq_6,__ABUILTIN_20);
 }else{
  {OBJ x21;OBJ x22;FLAG x_x2=EXPRD(x2,1);
   if(x_x2){
   }else{
    x21=FLD1(x2,1);x22=FLD1(x2,2);CPPRD(x21,1);COPY(x22,1);}
   {OBJ x24;
    if(x_x2){
     RSOME(x2,x24);
    }else{
     FRPRD(x2,1);PRD1(2,x24);FLD1(x24,1)=x21;FLD1(x24,2)=x22;}
    r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(x1,2))(x1,x24,__ABUILTIN_20);}}}
 return r;}

extern OBJ _ABaseParser_27(OBJ x1,OBJ x2,OBJ x3) /* @,1 */
{OBJ r;
 if(ISPRM(x2)){
  HLT("BaseParser at <unknown> : missing else in @\'BaseParser:parser->seq->()->pRes");
 }else{
  {OBJ x19;OBJ x20;FLAG x_x2=EXPRD(x2,1);
   if(x_x2){
   }else{
    x19=FLD1(x2,1);x20=FLD1(x2,2);CPPRD(x19,1);COPY(x20,1);}
   {OBJ x22;
    if(x_x2){
     RSOME(x2,x22);
    }else{
     FRPRD(x2,1);PRD1(2,x22);FLD1(x22,1)=x19;FLD1(x22,2)=x20;}
    r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(x1,2))(x1,x22,__ABUILTIN_20);}}}
 return r;}

extern OBJ _ABaseParser_32(OBJ x1,OBJ x2,OBJ x3) /* isIn,1 */
{OBJ r;
 if(ISPRM(x3)){
  FREE(x1,1);
  FRPRD(x2,1);
  CPCLS(__ABaseParser_52,1);
  {OBJ x29;
   x29=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_52,1))(__ABaseParser_52,__ABUILTIN_20);
   PRD(3,1,r);FLD(r,1)=x29;FLD(r,2)=__AAbsy_2;FLD(r,3)=__ASeq_6;}
 }else{
  {OBJ x30=FLD1(x3,1);OBJ x31;FLAG x_x3=EXPRD(x3,1);
   if(x_x3){
    CPPRD(x30,1);
   }else{
    x31=FLD1(x3,2);CPPRD(x30,2);COPY(x31,1);}
   {OBJ x33;
    if(x_x3){
     RSOME(x3,x33);
    }else{
     FRPRD(x3,1);PRD1(2,x33);FLD1(x33,1)=x30;FLD1(x33,2)=x31;}
    {OBJ x34=FLD1(x30,1);
     if(EXPRD(x30,1)){
      DSPRD(x30);
     }else{
      FRPRD(x30,1);}
     CPCLS(__ATerminal_141,1);
     {OBJ x37;
      x37=_ASet_44(__ATerminal_141,x34,x1);
      if(ISTGPRM(x37,1)){
       CPPRD(__AOcError_15,1);
       {OBJ x38;
	PRD(3,0,x38);FLD(x38,1)=__AOcError_15;FLD(x38,2)=__AAbsy_2;FLD(x38,3)=x33;
	r=_AModBase_8(x38,x2);}
      }else{
       FRPRD(x2,1);
       CPPRD(__AOcError_15,1);
       PRD(3,1,r);FLD(r,1)=__AOcError_15;FLD(r,2)=__AAbsy_2;FLD(r,3)=x33;}}}}}}
 return r;}

extern OBJ _ABaseParser_33(OBJ x1,OBJ x2) /* accept */
{OBJ r;
 if(ISPRM(x2)){
  COPY(__APErr_16,1);
  {OBJ x61;
   PRD1F(2,x61);FLD1(x61,1)=x1;FLD1(x61,2)=__ASeq_6;
   PRD(3,1,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=__ASeq_6;
   FLD(r,1)=_APErr_3(x61,__ASeq_6,__APErr_16);}
 }else{
  {OBJ x63=FLD1(x2,1);OBJ x64=FLD1(x2,2);FLAG x_x2=EXPRD(x2,1);
   if(x_x2){
   }else{
    CPPRD(x63,1);COPY(x64,1);}
   {OBJ x66=FLD1(x63,1);OBJ x68=FLD1(x63,3);
    COPY(x68,1);
    {OBJ x69;
     ANat_76(x66,x1,x69);
     if(ISTGPRM(x69,1)){
      {OBJ x70;OBJ x71;
       ANat_76(x1,__ATerminal_72,x70);
       if(ISTGPRM(x70,1)){
	x71=__ABUILTIN_5;
       }else{
	ANat_76(x1,__ATerminal_34,x71);}
       if(ISTGPRM(x71,1)){
	FREE(x68,1);
	CPPRD(__AOcError_15,1);
	CPPRD(__AModName_1,1);
	{OBJ x72;OBJ x73;
	 if(x_x2){
	  RSOME(x2,x72);
	 }else{
	  FRPRD(x2,1);PRD1(2,x72);FLD1(x72,1)=x63;FLD1(x72,2)=x64;}
	 PRD(3,0,x73);FLD(x73,1)=__AOcError_15;FLD(x73,2)=__AAbsy_2;FLD(x73,3)=x72;
	 r=_AModBase_8(x73,__AModName_1);}
       }else{
	{OBJ x74;
	 ANat_76(x1,__ATerminal_70,x74);
	 if(ISTGPRM(x74,1)){
	  FREE(x68,1);
	  CPPRD(__AOcError_15,1);
	  CPPRD(__AModExpr_1,1);
	  {OBJ x75;OBJ x76;
	   if(x_x2){
	    RSOME(x2,x75);
	   }else{
	    FRPRD(x2,1);PRD1(2,x75);FLD1(x75,1)=x63;FLD1(x75,2)=x64;}
	   PRD(3,0,x76);FLD(x76,1)=__AOcError_15;FLD(x76,2)=__AAbsy_2;FLD(x76,3)=x75;
	   r=_AModBase_8(x76,__AModExpr_1);}
	 }else{
	  if(x_x2){
	   DSPRDF(x2);
	  }else{
	   FRPRD(x2,1);}
	  if(EXPRD(x63,1)){
	   DSPRD(x63);
	  }else{
	   DCPRD(x63,1);}
	  COPY(__ABaseParser_34,1);
	  CPCLS(__ATerminal_141,1);
	  {OBJ x77;OBJ x78;
	   x77=_ASet_44(__ATerminal_141,x66,__ABaseParser_34);
	   if(ISTGPRM(x77,1)){
	    CPPRD(__AOcError_15,1);
	    PRD(1,16,x78);FLD(x78,1)=x68;
	   }else{
	    FREE(x68,1);
	    CPPRD(__AOcError_15,1);
	    x78=__AAbsy_2;}
	   PRD(3,0,r);FLD(r,1)=__AOcError_15;FLD(r,2)=x78;FLD(r,3)=x64;}}}}}
     }else{
      FREE(x68,1);
      CPPRD(x63,2);
      {OBJ x79;OBJ x80;OBJ x81;
       if(x_x2){
	RSOME(x2,x79);FLD1(x79,1)=x1;FLD1(x79,2)=__ASeq_6;
       }else{
	FRPRD(x2,1);PRD1F(2,x79);FLD1(x79,1)=x1;FLD1(x79,2)=__ASeq_6;}
       PRD1(2,x80);FLD1(x80,1)=x63;FLD1(x80,2)=x64;
       x81=_APErr_17(x63);
       PRD(3,1,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=x80;
       FLD(r,1)=_APErr_4(x79,x63,x81);}}}}}}
 return r;}

extern OBJ _ABaseParser_35(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* <&>'35 */
{OBJ r;
 {OBJ x6;
  x6=_ABaseParser_26(x1,x4);
  if(ISTGPRD(x6,1)){
   {OBJ x25=FLD(x6,3);
    COPY(x25,1);
    FRCLS(x2,1);
    CPCLS(__ABaseParser_19,1);
    {OBJ x26;
     x26=_ABaseParser_26(__ABaseParser_19,x25);
     r=_AModBase_9(x6,x26,x3);}}
  }else{
   {OBJ x29=FLD(x6,3);
    COPY(x29,1);
    {OBJ x30;
     x30=_ABaseParser_26(x2,x29);
     r=_AModBase_9(x6,x30,x3);}}}}
 return r;}

extern OBJ _ABaseParser_36(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* <&>'36 */
{OBJ r;
 CPCLS(__ABaseParser_35,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_35,4))(__ABaseParser_35,x1,x2,x3,x4);
 return r;}

extern OBJ _ABaseParser_37(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* <|>'37 */
{OBJ r;
 COPY(x3,1);
 {OBJ x5;
  x5=_ABaseParser_26(x1,x3);
  if(ISTGPRD(x5,0)){
   r=x5;
   FRCLS(x2,1);
   FREE(x3,1);
  }else{
   if(EXPRD(x5,1)){
    DSPRD(x5);
   }else{
    DCPRD(x5,1);}
   r=_ABaseParser_26(x2,x3);}}
 return r;}

extern OBJ _ABaseParser_38(OBJ x1,OBJ x2,OBJ x3) /* <|>'38 */
{OBJ r;
 CPCLS(__ABaseParser_37,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_37,3))(__ABaseParser_37,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_39(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* <&?>'39 */
{OBJ r;
 {OBJ x6;OBJ x13;OBJ x14;
  x6=_ABaseParser_26(x1,x4);
  {OBJ x9=FLD(x6,3);
   COPY(x9,1);
   x13=x9;}
  COPY(x13,1);
  x14=_ABaseParser_26(x2,x13);
  if(ISTGPRD(x14,1)){
   if(EXPRD(x14,1)){
    DSPRD(x14);
   }else{
    DCPRD(x14,1);}
   CPCLS(__ABaseParser_19,1);
   {OBJ x42;
    x42=_ABaseParser_26(__ABaseParser_19,x13);
    r=_AModBase_9(x6,x42,x3);}
  }else{
   COPY(x13,1);
   CPCLS(__ABaseParser_20,1);
   {OBJ x46;
    x46=_ABaseParser_26(__ABaseParser_20,x13);
    if(ISTGPRD(x46,0)){
     if(EXPRD(x46,1)){
      DSPRD(x46);
     }else{
      DCPRD(x46,1);}
     if(EXPRD(x14,1)){
      DSPRD(x14);
     }else{
      DCPRD(x14,1);}
     CPCLS(__ABaseParser_19,1);
     {OBJ x50;
      x50=_ABaseParser_26(__ABaseParser_19,x13);
      r=_AModBase_9(x6,x50,x3);}
    }else{
     if(EXPRD(x46,1)){
      DSPRD(x46);
     }else{
      DCPRD(x46,1);}
     FREE(x13,1);
     r=_AModBase_9(x6,x14,x3);}}}}
 return r;}

extern OBJ _ABaseParser_40(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* <&?>'40 */
{OBJ r;
 CPCLS(__ABaseParser_39,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_39,4))(__ABaseParser_39,x1,x2,x3,x4);
 return r;}

extern OBJ _ABaseParser_41(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* ||'41 */
{OBJ r;
 CPCLS(x1,1);
 {OBJ x6;OBJ x13;
  x6=_ABaseParser_26(x1,x4);
  {OBJ x9=FLD(x6,3);
   COPY(x9,1);
   x13=x9;}
  if(ISPRM(x13)){
   FRCLS(x1,1);
   CPCLS(__ABaseParser_19,1);
   {OBJ x28;
    x28=_ABaseParser_26(__ABaseParser_19,x13);
    r=_AModBase_9(x6,x28,x3);}
  }else{
   {OBJ x29=FLD1(x13,1);OBJ x30=FLD1(x13,2);
    CPPRD(x29,1);COPY(x30,1);
    {OBJ x31;
     x31=_AToken_9(x2,x29);
     if(ISTGPRM(x31,1)){
      if(EXPRD(x13,1)){
       DSPRD(x13);
      }else{
       DCPRD(x13,1);}
      CPPRD(x3,1);
      {OBJ x32;OBJ x33;
       x32=_ABaseParser_12(x1,x2,x3);
       x33=_ABaseParser_26(x32,x30);
       r=_AModBase_9(x6,x33,x3);}
     }else{
      FRCLS(x1,1);
      FREE(x30,1);
      CPCLS(__ABaseParser_19,1);
      {OBJ x34;
       x34=_ABaseParser_26(__ABaseParser_19,x13);
       r=_AModBase_9(x6,x34,x3);}}}}}}
 return r;}

extern OBJ _ABaseParser_42(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* ||'42 */
{OBJ r;
 CPCLS(__ABaseParser_41,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_41,4))(__ABaseParser_41,x1,x2,x3,x4);
 return r;}

extern OBJ _ABaseParser_43(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* *,1'43 */
{OBJ r;
 if(ISPRM(x4)){
  FRCLS(x1,1);
  FREE(x2,1);
  FRPRD(x3,1);
  CPCLS(__ABaseParser_19,1);
  r=_ABaseParser_26(__ABaseParser_19,x4);
 }else{
  {OBJ x87=FLD1(x4,1);
   CPPRD(x87,1);
   COPY(x2,1);
   CPCLS(__ATerminal_141,1);
   {OBJ x89;
    x89=_ASet_39(__ATerminal_141,__ATerminal_4,x2);
    {OBJ x90=FLD1(x87,1);
     if(EXPRD(x87,1)){
      DSPRD(x87);
     }else{
      DCPRD(x87,1);}
     CPCLS(__ATerminal_141,1);
     {OBJ x93;
      x93=_ASet_44(__ATerminal_141,x90,x89);
      if(ISTGPRM(x93,1)){
       FRCLS(x1,1);
       FREE(x2,1);
       FRPRD(x3,1);
       CPCLS(__ABaseParser_19,1);
       r=_ABaseParser_26(__ABaseParser_19,x4);
      }else{
       CPCLS(x1,1);
       CPPRD(x4,1);
       {OBJ x94;
	x94=_ABaseParser_26(x1,x4);
	if(ISTGPRD(x94,1)){
	 if(EXPRD(x94,1)){
	  DSPRD(x94);
	 }else{
	  DCPRD(x94,1);}
	 FRCLS(x1,1);
	 FREE(x2,1);
	 FRPRD(x3,1);
	 CPCLS(__ABaseParser_19,1);
	 r=_ABaseParser_26(__ABaseParser_19,x4);
	}else{
	 {OBJ x100=FLD(x94,3);
	  COPY(x100,2);
	  if(EXPRD(x4,1)){
	   DSPRD(x4);
	  }else{
	   DCPRD(x4,1);}
	  CPPRD(x3,1);
	  {OBJ x101;OBJ x102;
	   x101=_ABaseParser_16(x1,x2,x3);
	   x102=_ABaseParser_26(x101,x100);
	   if(ISTGPRD(x102,1)){
	    if(EXPRD(x102,1)){
	     DSPRD(x102);
	    }else{
	     DCPRD(x102,1);}
	    CPCLS(__ABaseParser_19,1);
	    {OBJ x106;
	     x106=_ABaseParser_26(__ABaseParser_19,x100);
	     r=_AModBase_9(x94,x106,x3);}
	   }else{
	    FREE(x100,1);
	    r=_AModBase_9(x94,x102,x3);}}}}}}}}}}}
 return r;}

extern OBJ _ABaseParser_44(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* *,1'44 */
{OBJ r;
 CPCLS(__ABaseParser_43,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_43,4))(__ABaseParser_43,x1,x2,x3,x4);
 return r;}

extern OBJ _ABaseParser_45(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* +,1'45 */
{OBJ r;
 CPCLS(__ATerminal_141,1);
 CPCLS(x1,1);
 COPY(x2,1);
 COPY(x4,1);
 {OBJ x9;OBJ x10;
  x9=_ASet_39(__ATerminal_141,__ATerminal_4,x2);
  x10=_ABaseParser_26(x1,x4);
  if(ISPRD(x4)){
   {OBJ x112=FLD1(x4,1);
    if(EXPRD(x4,1)){
     FREE(FLD1(x4,2),1);DSPRDF(x4);
    }else{
     CPPRD(x112,1);
     FRPRD(x4,1);}
    {OBJ x114=FLD1(x112,1);
     if(EXPRD(x112,1)){
      DSPRD(x112);
     }else{
      FRPRD(x112,1);}
     {OBJ x123;OBJ x124;OBJ x127;
      {OBJ x119=FLD(x10,3);
       COPY(x119,1);
       x123=x119;
       COPY(x9,1);
       CPCLS(__ATerminal_141,1);}
      x124=_ASet_44(__ATerminal_141,x114,x9);
      if(ISTGPRM(x124,1)){
       x127=__ABUILTIN_5;
      }else{
       if(ISPRM(x123)){
	x127=__ABUILTIN_5;
       }else{
	x127=__ABUILTIN_3;}}
      if(ISTGPRM(x127,1)){
       FRCLS(x1,1);
       FREE(x2,1);
       FREE(x9,1);
       CPCLS(__ABaseParser_19,1);
       {OBJ x128;
	x128=_ABaseParser_26(__ABaseParser_19,x123);
	r=_AModBase_9(x10,x128,x3);}
      }else{
       if(ISPRM(x123)){
	HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");
       }else{
	{OBJ x129=FLD1(x123,1);
	 CPPRD(x129,1);
	 {OBJ x132=FLD1(x129,1);
	  if(EXPRD(x129,1)){
	   DSPRD(x129);
	  }else{
	   DCPRD(x129,1);}
	  CPCLS(__ATerminal_141,1);
	  {OBJ x135;
	   x135=_ASet_44(__ATerminal_141,x132,x9);
	   if(ISTGPRM(x135,1)){
	    FRCLS(x1,1);
	    FREE(x2,1);
	    CPCLS(__ABaseParser_19,1);
	    {OBJ x136;
	     x136=_ABaseParser_26(__ABaseParser_19,x123);
	     r=_AModBase_9(x10,x136,x3);}
	   }else{
	    CPPRD(x3,1);
	    CPPRD(x123,1);
	    CPCLS(__ABaseParser_44,1);
	    {OBJ x137;OBJ x138;
	     x137=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_44,3))(__ABaseParser_44,x1,x2,x3);
	     x138=_ABaseParser_26(x137,x123);
	     if(ISTGPRD(x138,1)){
	      if(EXPRD(x138,1)){
	       DSPRD(x138);
	      }else{
	       DCPRD(x138,1);}
	      CPCLS(__ABaseParser_19,1);
	      {OBJ x142;
	       x142=_ABaseParser_26(__ABaseParser_19,x123);
	       r=_AModBase_9(x10,x142,x3);}
	     }else{
	      if(EXPRD(x123,1)){
	       DSPRD(x123);
	      }else{
	       DCPRD(x123,1);}
	      r=_AModBase_9(x10,x138,x3);}}}}}}}}}}}
  }else{
   HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");}}
 return r;}

extern OBJ _ABaseParser_46(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* +,1'46 */
{OBJ r;
 CPCLS(__ABaseParser_45,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_45,4))(__ABaseParser_45,x1,x2,x3,x4);
 return r;}

extern OBJ _ABaseParser_49(OBJ x1,OBJ x2,OBJ x3) /* isA'49 */
{OBJ r;
 r=_ABaseParser_33(x1,x2);
 return r;}

extern OBJ _ABaseParser_50(OBJ x1,OBJ x2) /* isA'50 */
{OBJ r;
 CPCLS(__ABaseParser_49,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_49,2))(__ABaseParser_49,x1,x2);
 return r;}

extern OBJ _ABaseParser_52(OBJ x1) /* isIn,1'52 */
{OBJ r;
 CPPRD(__ABaseParser_51,1);
 COPY(__APErr_16,1);
 r=_APErr_7(__ABaseParser_51,__APErr_16,__ASeq_6);
 return r;}

extern OBJ _ABaseParser_53(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* isIn'53 */
{OBJ r;
 r=_ABaseParser_32(x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_54(OBJ x1,OBJ x2,OBJ x3) /* isIn'54 */
{OBJ r;
 CPCLS(__ABaseParser_53,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))METHOD(__ABaseParser_53,3))(__ABaseParser_53,x1,x2,x3);
 return r;}

extern OBJ _ABaseParser_56(OBJ x1,OBJ x2) /* empty,1'56 */
{OBJ r;
 CPPRD(__ABaseParser_55,1);
 {OBJ x3;
  x3=_AToken_16(x1);
  ADenotation_4(__ABaseParser_55,x3,r);}
 return r;}

extern OBJ _ABaseParser_58(OBJ x1,OBJ x2) /* empty,1'58 */
{OBJ r;
 CPPRD(__ABaseParser_57,1);
 CPCLS(__ATerminal_141,1);
 CPCLS(__ATerminal_145,1);
 CPPRD(__ADenotation_3,1);
 CPCLS(__ADenotation_4,1);
 CPCLS(__ADenotation_17,1);
 {OBJ x3;OBJ x4;
  x3=_ASetMap_5(__ATerminal_141,__ADenotation_17,__ATerminal_145,x1);
  x4=_ASeqReduce_3(__ADenotation_4,__ADenotation_3,x3);
  ADenotation_4(__ABaseParser_57,x4,r);}
 return r;}

extern OBJ _ABaseParser_59(OBJ x1,OBJ x2) /* empty,1'59 */
{OBJ r;
 CPCLS(__ATerminal_141,1);
 {OBJ x7;
  x7=_ASet_40(__ATerminal_141,__ATerminal_4,x1);
  {OBJ x3=FLD1(x2,1);
   if(EXPRD(x2,1)){
    DSPRD(x2);
   }else{
    FRPRD(x2,1);}
   CPCLS(__ATerminal_141,1);
   {OBJ x6;OBJ x8;
    x6=x3;
    x8=_ASet_44(__ATerminal_141,x6,x7);
    if(ISTGPRM(x8,1)){
     r=__ABUILTIN_3;
    }else{
     r=__ABUILTIN_5;}}}}
 return r;}

extern OBJ _ABaseParser_60(OBJ x1,OBJ x2,OBJ x3) /* empty,1'60 */
{OBJ r;
 if(ISPRM(x2)){
  FREE(x1,1);
  CPPRD(__AOcError_15,1);
  PRD(3,0,r);FLD(r,1)=__AOcError_15;FLD(r,2)=__AAbsy_2;FLD(r,3)=x2;
 }else{
  {OBJ x37=FLD1(x2,1);
   CPPRD(x37,1);
   {OBJ x39=FLD1(x37,1);
    if(EXPRD(x37,1)){
     DSPRD(x37);
    }else{
     DCPRD(x37,1);}
    COPY(x1,1);
    CPCLS(__ATerminal_141,1);
    {OBJ x42;OBJ x43;
     x42=_ASet_44(__ATerminal_141,x39,x1);
     if(ISTGPRM(x42,1)){
      x43=__ABUILTIN_5;
     }else{
      ANat_76(x39,__ATerminal_4,x43);}
     if(ISTGPRM(x43,1)){
      CPPRD(x2,1);
      CPCLS(__ABaseParser_56,1);
      CPCLS(__ABaseParser_58,1);
      CPPRD(__AOcError_15,1);
      {OBJ x44;OBJ x45;OBJ x46;
       x44=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_56,1))(__ABaseParser_56,x2);
       x45=_ADEBUG_2(__ABaseParser_31,x44,__AOcError_15);
       x46=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_58,1))(__ABaseParser_58,x1);
       PRD(3,0,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=x2;
       FLD(r,1)=_ADEBUG_2(__ABaseParser_31,x46,x45);}
     }else{
      COPY(x1,1);
      CPPRD(x2,1);
      CPCLS(__ABaseParser_59,1);
      {OBJ x48;OBJ x49;
       x48=_APErr_11(x1,x2);
       x49=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_59,1))(__ABaseParser_59,x1);
       PRD(3,1,r);FLD(r,1)=x48;FLD(r,2)=__AAbsy_2;
       FLD(r,3)=_ASeqFilter_7(x49,x2);}}}}}}
 return r;}

extern OBJ _ABaseParser_61(OBJ x1,OBJ x2) /* empty,1'61 */
{OBJ r;
 CPCLS(__ABaseParser_60,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_60,2))(__ABaseParser_60,x1,x2);
 return r;}

extern OBJ _ABaseParser_62(OBJ x1) /* empty,1'62 */
{OBJ r;
 CPCLS(__ABaseParser_61,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_61,1))(__ABaseParser_61,x1);
 return r;}

extern OBJ _ABaseParser_63(OBJ x1,OBJ x2,OBJ x3) /* fail'63 */
{OBJ r;
 if(ISPRM(x2)){
  COPY(__APErr_16,1);
  {
   PRD(3,1,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=x2;
   FLD(r,1)=_APErr_7(x1,__APErr_16,__ASeq_6);}
 }else{
  {OBJ x23=FLD1(x2,1);
   CPPRD(x23,1);
   {OBJ x27=FLD1(x23,3);
    COPY(x27,1);
    if(EXPRD(x23,1)){
     DSPRD(x23);
    }else{
     DCPRD(x23,1);}
    CPPRD(x2,1);
    {
     PRD(3,1,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=x2;
     FLD(r,1)=_APErr_7(x1,x27,x2);}}}}
 return r;}

extern OBJ _ABaseParser_64(OBJ x1,OBJ x2) /* fail'64 */
{OBJ r;
 CPCLS(__ABaseParser_63,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_63,2))(__ABaseParser_63,x1,x2);
 return r;}

extern OBJ _ABaseParser_66(OBJ x1,OBJ x2) /* fail,1'66 */
{OBJ r;
 CPPRD(__ABaseParser_65,1);
 {OBJ x3;
  x3=_APTypes_14(x1);
  ADenotation_4(__ABaseParser_65,x3,r);}
 return r;}

extern OBJ _ABaseParser_67(OBJ x1,OBJ x2,OBJ x3) /* fail,1'67 */
{OBJ r;
 CPCLS(__ABaseParser_66,1);
 COPY(x2,1);
 {OBJ x4;OBJ x5;OBJ x6;
  x4=(*(OBJ(*)(OBJ,OBJ))METHOD(x1,1))(x1,x2);
  PRD(3,1,x5);FLD(x5,1)=x4;FLD(x5,2)=__AAbsy_2;FLD(x5,3)=x2;
  CPPRD(x5,1);
  x6=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_66,1))(__ABaseParser_66,x5);
  r=_ADEBUG_2(__AZOpts_14,x6,x5);}
 return r;}

extern OBJ _ABaseParser_68(OBJ x1,OBJ x2) /* fail,1'68 */
{OBJ r;
 CPCLS(__ABaseParser_67,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_67,2))(__ABaseParser_67,x1,x2);
 return r;}

extern OBJ _ABaseParser_69(OBJ x1) /* isA?'69 */
{OBJ r;
 CPCLS(__ABaseParser_68,1);
 CPCLS(__APErr_15,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_68,1))(__ABaseParser_68,__APErr_15);
 return r;}

extern OBJ _ABaseParser_70(OBJ x1,OBJ x2,OBJ x3) /* isA?'70 */
{OBJ r;
 if(ISPRM(x2)){
  CPCLS(__ABaseParser_69,1);
  {OBJ x13;
   x13=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_69,1))(__ABaseParser_69,__ABUILTIN_20);
   r=_ABaseParser_26(x13,x2);}
 }else{
  {OBJ x14=FLD1(x2,1);
   CPPRD(x14,1);
   {OBJ x16;
    x16=_AToken_8(x14,x1);
    if(ISTGPRM(x16,1)){
     CPCLS(__ABaseParser_19,1);
     r=_ABaseParser_26(__ABaseParser_19,x2);
    }else{
     CPCLS(__ABaseParser_69,1);
     {OBJ x17;
      x17=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_69,1))(__ABaseParser_69,__ABUILTIN_20);
      r=_ABaseParser_26(x17,x2);}}}}}
 return r;}

extern OBJ _ABaseParser_71(OBJ x1,OBJ x2) /* isA?'71 */
{OBJ r;
 CPCLS(__ABaseParser_70,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_70,2))(__ABaseParser_70,x1,x2);
 return r;}

extern OBJ _ABaseParser_72(OBJ x1) /* isIn?'72 */
{OBJ r;
 CPCLS(__ABaseParser_68,1);
 CPCLS(__APErr_15,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_68,1))(__ABaseParser_68,__APErr_15);
 return r;}

extern OBJ _ABaseParser_73(OBJ x1,OBJ x2,OBJ x3) /* isIn?'73 */
{OBJ r;
 if(ISPRM(x2)){
  FREE(x1,1);
  CPCLS(__ABaseParser_72,1);
  {OBJ x24;
   x24=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_72,1))(__ABaseParser_72,__ABUILTIN_20);
   r=_ABaseParser_26(x24,x2);}
 }else{
  {OBJ x25=FLD1(x2,1);
   CPPRD(x25,1);
   {OBJ x27=FLD1(x25,1);
    if(EXPRD(x25,1)){
     DSPRD(x25);
    }else{
     DCPRD(x25,1);}
    CPCLS(__ATerminal_141,1);
    {OBJ x30;
     x30=_ASet_44(__ATerminal_141,x27,x1);
     if(ISTGPRM(x30,1)){
      CPCLS(__ABaseParser_19,1);
      r=_ABaseParser_26(__ABaseParser_19,x2);
     }else{
      CPCLS(__ABaseParser_72,1);
      {OBJ x31;
       x31=(*(OBJ(*)(OBJ,OBJ))METHOD(__ABaseParser_72,1))(__ABaseParser_72,__ABUILTIN_20);
       r=_ABaseParser_26(x31,x2);}}}}}}
 return r;}

extern OBJ _ABaseParser_74(OBJ x1,OBJ x2) /* isIn?'74 */
{OBJ r;
 CPCLS(__ABaseParser_73,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ABaseParser_73,2))(__ABaseParser_73,x1,x2);
 return r;}

extern OBJ _ABaseParser_75(OBJ x1,OBJ x2) /* nil'75 */
{OBJ r;
 CPPRD(__AOcError_15,1);
 PRD(3,0,r);FLD(r,1)=__AOcError_15;FLD(r,2)=__AAbsy_2;FLD(r,3)=x1;
 return r;}

extern OBJ _ABaseParser_76(OBJ x1,OBJ x2) /* empty'76 */
{OBJ r;
 if(ISPRM(x1)){
  CPPRD(__AOcError_15,1);
  PRD(3,0,r);FLD(r,1)=__AOcError_15;FLD(r,2)=__AAbsy_2;FLD(r,3)=x1;
 }else{
  {OBJ x15=FLD1(x1,1);
   CPPRD(x15,1);
   {OBJ x17=FLD1(x15,1);
    if(EXPRD(x15,1)){
     DSPRD(x15);
    }else{
     DCPRD(x15,1);}
    {OBJ x20;
     ANat_76(x17,__ATerminal_4,x20);
     if(ISTGPRM(x20,1)){
      CPPRD(__AOcError_15,1);
      PRD(3,0,r);FLD(r,1)=__AOcError_15;FLD(r,2)=__AAbsy_2;FLD(r,3)=x1;
     }else{
      {
       PRD(3,1,r);FLD(r,2)=__AAbsy_2;FLD(r,3)=__ASeq_6;
       FLD(r,1)=_APErr_11(__ASeq_6,x1);}}}}}}
 return r;}


static void ___ABaseParser_34()
{
 CPCLS(__ATerminal_141,15);
 {OBJ x1;OBJ x2;OBJ x3;OBJ x4;OBJ x5;OBJ x6;OBJ x7;OBJ x8;OBJ x9;OBJ x10;OBJ x11;OBJ x12;OBJ x13;OBJ x14;OBJ x15;
  PRD1F(2,x1);FLD1(x1,1)=__ATerminal_108;FLD1(x1,2)=__ASeq_6;
  x2=_ASet_39(__ATerminal_141,__ATerminal_94,x1);
  x3=_ASet_39(__ATerminal_141,__ATerminal_38,x2);
  x4=_ASet_39(__ATerminal_141,__ATerminal_36,x3);
  x5=_ASet_39(__ATerminal_141,__ATerminal_100,x4);
  x6=_ASet_39(__ATerminal_141,__ATerminal_82,x5);
  x7=_ASet_39(__ATerminal_141,__ATerminal_84,x6);
  x8=_ASet_39(__ATerminal_141,__ATerminal_42,x7);
  x9=_ASet_39(__ATerminal_141,__ATerminal_44,x8);
  x10=_ASet_39(__ATerminal_141,__ATerminal_50,x9);
  x11=_ASet_39(__ATerminal_141,__ATerminal_64,x10);
  x12=_ASet_39(__ATerminal_141,__ATerminal_54,x11);
  x13=_ASet_39(__ATerminal_141,__ATerminal_138,x12);
  x14=_ASet_39(__ATerminal_141,__ATerminal_62,x13);
  x15=_ASet_39(__ATerminal_141,__ATerminal_40,x14);
  __ABaseParser_34=_ASet_39(__ATerminal_141,__ATerminal_46,x15);}}



static OBJ _mt_2_0_3(OBJ t,OBJ t1,OBJ t2,OBJ t3) 
{OBJ r;
 {OBJ t4;
  DCCLS(t,1);
  t4=(*(OBJ(*)(OBJ,OBJ))ENTRY(t))(t1,t2);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t4,1))(t4,t3);}
 return r;}

static OBJ _mt_2_1_2(OBJ t,OBJ t1,OBJ t2) 
{OBJ r;
 {OBJ t3;
  if(EXCLS(t)){
   DSCLSF(t);
  }else{
   COPY(FLDCLS(t,1),1);
   DCCLS(t,1);}
  t3=(*(OBJ(*)(OBJ,OBJ))ENTRY(t))(FLDCLS(t,1),t1);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t3,1))(t3,t2);}
 return r;}

static OBJ _mt_3_0_4(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4) 
{OBJ r;
 {OBJ t5;
  DCCLS(t,1);
  t5=(*(OBJ(*)(OBJ,OBJ,OBJ))ENTRY(t))(t1,t2,t3);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t5,1))(t5,t4);}
 return r;}

static OBJ _mt_3_2_2(OBJ t,OBJ t1,OBJ t2) 
{OBJ r;
 {OBJ t3;
  if(EXCLS(t)){
   DSCLSF(t);
  }else{
   COPY(FLDCLS(t,1),1);
   COPY(FLDCLS(t,2),1);
   DCCLS(t,1);}
  t3=(*(OBJ(*)(OBJ,OBJ,OBJ))ENTRY(t))(FLDCLS(t,1),FLDCLS(t,2),t1);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t3,1))(t3,t2);}
 return r;}

static OBJ _mt_4_0_5(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5) 
{OBJ r;
 {OBJ t6;
  DCCLS(t,1);
  t6=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))ENTRY(t))(t1,t2,t3,t4);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t6,1))(t6,t5);}
 return r;}

static OBJ _mt_4_3_2(OBJ t,OBJ t1,OBJ t2) 
{OBJ r;
 {OBJ t3;
  if(EXCLS(t)){
   DSCLSF(t);
  }else{
   COPY(FLDCLS(t,1),1);
   COPY(FLDCLS(t,2),1);
   COPY(FLDCLS(t,3),1);
   DCCLS(t,1);}
  t3=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ))ENTRY(t))(FLDCLS(t,1),FLDCLS(t,2),FLDCLS(t,3),t1);
  r=(*(OBJ(*)(OBJ,OBJ))METHOD(t3,1))(t3,t2);}
 return r;}

init_ABaseParser()
{
 static int visited=0; if(visited) return; visited=1;
 init_ARepTab();
 init_APErr();
 init_AZOpts();
 init_AModName();
 init_AToken();
 init_AModExpr();
 init_ATerminal();
 init_ADenotation();
 init_APTypes();
 init_ASeqFilter();
 init_AModBase();
 init_ASetMap();
 init_AOcError();
 init_ASetReduce();
 init_AOcPos();
 init_ADEBUG();
 init_ASeq();
 init_AArray();
 init_ASet();
 init_ASetByBST();
 init_ANat();
 init_ABSTree();
 init_AOption();
 init_ATree();
 init_AChar();
 init_ASeqReduce();
 init_AString();
 init_ASeqConv();
 init_AOcOptions();
 init_ALexem();
 init_ACom();
 init_AVoid();
 init_AStream();
 init_AFile();
 init_AInt();
 init_AAbsy();
 init_APragma();
 init_AFct();
 init_AStruct();
 init_AImpl();
 init_APartName();
 init_ARep();
 init_APair();
 init_ABitset();
 init_AGlobPragma();
 init_AMap();
 LCLS(3,_ABaseParser_63,__ABaseParser_63);
 CLS(1,_ABaseParser_62,__ABaseParser_62);
 CLS(2,_ABaseParser_61,__ABaseParser_61);
 LCLS(3,_ABaseParser_60,__ABaseParser_60);
 CLS(2,_ABaseParser_59,__ABaseParser_59);
 LCLS(3,_ABaseParser_27,__ABaseParser_27);
 LCLS(2,_ABaseParser_58,__ABaseParser_58);
 CLS(2,_ABaseParser_26,__ABaseParser_26);
 DEN("Set is \n",__ABaseParser_57);
 CLS(1,_ABaseParser_25,__ABaseParser_25);
 LCLS(2,_ABaseParser_56,__ABaseParser_56);
 CLS(1,_ABaseParser_24,__ABaseParser_24);
 DEN("Arg is \n",__ABaseParser_55);
 CLS(1,_ABaseParser_23,__ABaseParser_23);
 CLS(3,_ABaseParser_54,__ABaseParser_54);
 CLS(1,_ABaseParser_22,__ABaseParser_22);
 LCLS(4,_ABaseParser_53,__ABaseParser_53);
 CLS(1,_ABaseParser_21,__ABaseParser_21);
 LCLS(1,_ABaseParser_52,__ABaseParser_52);
 CLS(1,_ABaseParser_20,__ABaseParser_20);
 DEN(" lexem ",__ABaseParser_51);
 CLS(1,_ABaseParser_19,__ABaseParser_19);
 CLS(2,_ABaseParser_50,__ABaseParser_50);
 CLS(2,_ABaseParser_18,__ABaseParser_18);
 LCLS(3,_ABaseParser_49,__ABaseParser_49);
 CLS(1,_ABaseParser_17,__ABaseParser_17);
 CLS(3,_ABaseParser_16,__ABaseParser_16);
 CLS(3,_ABaseParser_15,__ABaseParser_15);
 CLS(4,_ABaseParser_46,__ABaseParser_46);
 CLS(2,_ABaseParser_14,__ABaseParser_14);
 DEN("-ztraceMt",__ABaseParser_77);
 CLS(2,_ABaseParser_13,__ABaseParser_13);
 LCLS(5,_ABaseParser_45,__ABaseParser_45);
 LCLS(2,_ABaseParser_76,__ABaseParser_76);
 CLS(3,_ABaseParser_12,__ABaseParser_12);
 CLS(4,_ABaseParser_44,__ABaseParser_44);
 LCLS(2,_ABaseParser_75,__ABaseParser_75);
 CLS(3,_ABaseParser_11,__ABaseParser_11);
 LCLS(5,_ABaseParser_43,__ABaseParser_43);
 CLS(2,_ABaseParser_74,__ABaseParser_74);
 CLS(2,_ABaseParser_10,__ABaseParser_10);
 CLS(4,_ABaseParser_42,__ABaseParser_42);
 LCLS(3,_ABaseParser_73,__ABaseParser_73);
 CLS(2,_ABaseParser_9,__ABaseParser_9);
 LCLS(5,_ABaseParser_41,__ABaseParser_41);
 LCLS(1,_ABaseParser_72,__ABaseParser_72);
 CLS(2,_ABaseParser_8,__ABaseParser_8);
 CLS(4,_ABaseParser_40,__ABaseParser_40);
 CLS(2,_ABaseParser_71,__ABaseParser_71);
 CLS(3,_ABaseParser_7,__ABaseParser_7);
 LCLS(5,_ABaseParser_39,__ABaseParser_39);
 LCLS(3,_ABaseParser_70,__ABaseParser_70);
 CLS(2,_ABaseParser_6,__ABaseParser_6);
 CLS(3,_ABaseParser_38,__ABaseParser_38);
 LCLS(1,_ABaseParser_69,__ABaseParser_69);
 CLS(2,_ABaseParser_5,__ABaseParser_5);
 LCLS(4,_ABaseParser_37,__ABaseParser_37);
 CLS(2,_ABaseParser_68,__ABaseParser_68);
 CLS(1,_ABaseParser_4,__ABaseParser_4);
 CLS(4,_ABaseParser_36,__ABaseParser_36);
 LCLS(3,_ABaseParser_67,__ABaseParser_67);
 CLS(1,_ABaseParser_3,__ABaseParser_3);
 LCLS(5,_ABaseParser_35,__ABaseParser_35);
 LCLS(2,_ABaseParser_66,__ABaseParser_66);
 CLS(1,_ABaseParser_2,__ABaseParser_2);
 DEN(" fail : ",__ABaseParser_65);
 CLS(2,_ABaseParser_33,__ABaseParser_33);
 CLS(2,_ABaseParser_64,__ABaseParser_64);
 CLS(3,_ABaseParser_32,__ABaseParser_32);
 MTH(2,0,3,_mt_2_0_3);LZYMTH(2,0,3,_mt_2_0_3);
 MTH(2,1,2,_mt_2_1_2);LZYMTH(2,1,2,_mt_2_1_2);
 MTH(3,0,4,_mt_3_0_4);LZYMTH(3,0,4,_mt_3_0_4);
 MTH(3,2,2,_mt_3_2_2);LZYMTH(3,2,2,_mt_3_2_2);
 MTH(4,0,5,_mt_4_0_5);LZYMTH(4,0,5,_mt_4_0_5);
 MTH(4,3,2,_mt_4_3_2);LZYMTH(4,3,2,_mt_4_3_2);
 CPPRD(__ABaseParser_77,1);
 __ABaseParser_31=_ADEBUG_10(__ABaseParser_77);
 ___ABaseParser_34();
 PRD1F(2,__ABaseParser_47);FLD1(__ABaseParser_47,1)=__ATerminal_4;FLD1(__ABaseParser_47,2)=__ASeq_6;
 PRD1F(2,__ABaseParser_48);FLD1(__ABaseParser_48,1)=__ATerminal_4;FLD1(__ABaseParser_48,2)=__ASeq_6;}

