

#include "BUILTIN.h"

#include "NatConv.h"
extern OBJ _ASeqIndex_2(OBJ,OBJ);extern OBJ __ASeqIndex_2;
extern OBJ _ASeqFilter_2(OBJ,OBJ);extern OBJ __ASeqFilter_2;
extern OBJ _AName_11(OBJ);extern OBJ __AName_11;
extern OBJ _AName_12(OBJ);extern OBJ __AName_12;
extern OBJ __AName_29;
extern OBJ _AName_32(OBJ,OBJ);extern OBJ __AName_32;
extern OBJ _AName_34(OBJ);extern OBJ __AName_34;
extern OBJ _ASeqOfSeq_2(OBJ);extern OBJ __ASeqOfSeq_2;
extern OBJ _AGlobSig_55(OBJ);extern OBJ __AGlobSig_55;
extern OBJ _AGlobSig_56(OBJ);extern OBJ __AGlobSig_56;
extern OBJ _AGlobSig_58(OBJ);extern OBJ __AGlobSig_58;
extern OBJ _ASeqConv_2(OBJ,OBJ);extern OBJ __ASeqConv_2;
extern OBJ _ASeqConv_3(OBJ,OBJ,OBJ,OBJ,OBJ);extern OBJ __ASeqConv_3;
extern OBJ __ASeqConv_8;
extern OBJ __AObjects_29;
extern OBJ __AObjects_30;
extern OBJ _AObjects_31(OBJ,OBJ);extern OBJ __AObjects_31;
extern OBJ _ASeqCompare_3(OBJ,OBJ,OBJ);extern OBJ __ASeqCompare_3;
extern OBJ _ASeqMap_3(OBJ,OBJ);extern OBJ __ASeqMap_3;

#include "Nat.h"

#include "Char.h"
extern TUP2 _ASeqMapEnv_4(OBJ,OBJ,OBJ);extern OBJ __ASeqMapEnv_4;
extern OBJ __ASeq_6;
extern OBJ __ASetConv_11;
extern OBJ __ASetConv_12;

#include "Denotation.h"
extern OBJ _ADEBUG_2(OBJ,OBJ,OBJ);extern OBJ __ADEBUG_2;
extern OBJ _ADEBUG_4(OBJ,OBJ,OBJ);extern OBJ __ADEBUG_4;
extern OBJ _ADEBUG_10(OBJ);extern OBJ __ADEBUG_10;
extern OBJ _ADeclEntry_14(OBJ);extern OBJ __ADeclEntry_14;
extern OBJ _AName4SigAna_1(OBJ,OBJ);extern OBJ __AName4SigAna_1;
extern OBJ _AName4SigAna_3(OBJ,OBJ);extern OBJ __AName4SigAna_3;
extern OBJ _AName4SigAna_14(OBJ,OBJ);extern OBJ __AName4SigAna_14;
extern OBJ _AName4SigAna_15(OBJ,OBJ);extern OBJ __AName4SigAna_15;
extern OBJ _AName4SigAna_17(OBJ,OBJ);extern OBJ __AName4SigAna_17;
extern OBJ _AName4SigAna_38(OBJ,OBJ);extern OBJ __AName4SigAna_38;
extern OBJ _AName4SigAna_49(OBJ,OBJ);extern OBJ __AName4SigAna_49;
extern OBJ _AName4SigAna_59(OBJ,OBJ);extern OBJ __AName4SigAna_59;
extern OBJ _APartNameEntry_12(OBJ);extern OBJ __APartNameEntry_12;
extern OBJ _APartNameEntry_27(OBJ);extern OBJ __APartNameEntry_27;
extern OBJ _AImpDecl4SigAna_28(OBJ,OBJ,OBJ,OBJ);extern OBJ __AImpDecl4SigAna_28;
extern OBJ _AImpDecl4SigAna_30(OBJ,OBJ,OBJ);extern OBJ __AImpDecl4SigAna_30;
extern TUP2 _AImpDecl4SigAna_32(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_32;
extern OBJ _AImpDecl4SigAna_42(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_42;
extern OBJ _AImpDecl4SigAna_43(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_43;
extern OBJ _AImpDecl4SigAna_45(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_45;
extern OBJ _AImpDecl4SigAna_50(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_50;
extern OBJ _AImpDecl4SigAna_52(OBJ,OBJ);extern OBJ __AImpDecl4SigAna_52;
extern OBJ _AImpExpEntry_6(OBJ);extern OBJ __AImpExpEntry_6;
extern OBJ _AImpExpEntry_10(OBJ);extern OBJ __AImpExpEntry_10;
extern OBJ _AImpExpEntry_11(OBJ);extern OBJ __AImpExpEntry_11;
extern OBJ _AImpExpEntry_16(OBJ);extern OBJ __AImpExpEntry_16;
extern OBJ _AImpExpEntry_49(OBJ);extern OBJ __AImpExpEntry_49;
extern OBJ __AImpExpEntry_84;
extern OBJ _AImpExpEntry_91(OBJ);extern OBJ __AImpExpEntry_91;
extern OBJ _AImpExpEntry_92(OBJ);extern OBJ __AImpExpEntry_92;
extern OBJ _AImpExpEntry_128(OBJ);extern OBJ __AImpExpEntry_128;
extern OBJ _AImpExpEntry_135(OBJ);extern OBJ __AImpExpEntry_135;
extern TUP2 _AAbsyFun3_4(OBJ,OBJ,OBJ);extern OBJ __AAbsyFun3_4;
extern OBJ _ARep_25(OBJ,OBJ);extern OBJ __ARep_25;
extern OBJ __ARep_187;
extern TUP2 _AMySeqFun3_7(OBJ,OBJ,OBJ,OBJ);extern OBJ __AMySeqFun3_7;
extern OBJ _AMySeqFun2_12(OBJ,OBJ,OBJ);extern OBJ __AMySeqFun2_12;
extern OBJ _ASet_41(OBJ,OBJ,OBJ);extern OBJ __ASet_41;

#include "Int.h"
extern OBJ _AFct_21(OBJ,OBJ,OBJ);extern OBJ __AFct_21;
extern OBJ _AFct_45(OBJ,OBJ,OBJ);extern OBJ __AFct_45;

#include "Real.h"

#include "Bitset.h"
extern OBJ _ADArray_20(OBJ,OBJ);extern OBJ __ADArray_20;
extern OBJ _ADArray_21(OBJ,OBJ);extern OBJ __ADArray_21;

#include "Array.h"
extern OBJ _ANameTerm_2(OBJ,OBJ);OBJ __ANameTerm_2; /* = */
extern TUP2 _ANameTerm_3(OBJ,OBJ);OBJ __ANameTerm_3; /* toNameTerm */
extern TUP2 _ANameTerm_4(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_4; /* toNameTerm,1 */
extern OBJ _ANameTerm_5(OBJ);OBJ __ANameTerm_5; /* error? */
extern OBJ _ANameTerm_6(OBJ);OBJ __ANameTerm_6; /* hidden? */
extern OBJ _ANameTerm_7(OBJ);OBJ __ANameTerm_7; /* ambiguous? */
extern OBJ _ANameTerm_8(OBJ);OBJ __ANameTerm_8; /* uninst? */
extern OBJ _ANameTerm_9(OBJ);OBJ __ANameTerm_9; /* cyclic? */
extern OBJ _ANameTerm_10(OBJ);OBJ __ANameTerm_10; /* ` */
extern TUP5 _ANameTerm_11(OBJ,OBJ);OBJ __ANameTerm_11; /* `,1 */
extern OBJ _ANameTerm_12(OBJ,OBJ);OBJ __ANameTerm_12; /* hidden?,1 */
extern OBJ _ANameTerm_14(OBJ,OBJ);OBJ __ANameTerm_14; /* cycTest */
extern OBJ _ANameTerm_15(OBJ);OBJ __ANameTerm_15; /* cycTest? */
extern OBJ _ANameTerm_16(OBJ);OBJ __ANameTerm_16; /* inst */
extern OBJ _ANameTerm_17(OBJ);OBJ __ANameTerm_17; /* struct */
extern OBJ _ANameTerm_19(OBJ,OBJ);OBJ __ANameTerm_19; /* env */
extern OBJ _ANameTerm_20(OBJ);OBJ __ANameTerm_20; /* env? */
extern OBJ _ANameTerm_21(OBJ);OBJ __ANameTerm_21; /* term */
extern OBJ _ANameTerm_22(OBJ);OBJ __ANameTerm_22; /* gS */
extern OBJ _ANameTerm_24(OBJ,OBJ);OBJ __ANameTerm_24; /* nameEnv */
extern OBJ _ANameTerm_25(OBJ);OBJ __ANameTerm_25; /* nameEnv? */
extern OBJ _ANameTerm_26(OBJ);OBJ __ANameTerm_26; /* instE */
extern OBJ _ANameTerm_27(OBJ);OBJ __ANameTerm_27; /* name */
extern OBJ _ANameTerm_28(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_28; /* funTerm */
extern OBJ _ANameTerm_29(OBJ);OBJ __ANameTerm_29; /* funTerm? */
extern OBJ _ANameTerm_30(OBJ);OBJ __ANameTerm_30; /* fct */
extern OBJ _ANameTerm_31(OBJ);OBJ __ANameTerm_31; /* inst,1 */
extern OBJ _ANameTerm_32(OBJ);OBJ __ANameTerm_32; /* orig */
extern OBJ _ANameTerm_33(OBJ);OBJ __ANameTerm_33; /* ide */
extern OBJ _ANameTerm_34(OBJ,OBJ,OBJ);OBJ __ANameTerm_34; /* sortTerm */
extern OBJ _ANameTerm_35(OBJ);OBJ __ANameTerm_35; /* sortTerm? */
OBJ __ANameTerm_39; /* variable */
extern OBJ _ANameTerm_40(OBJ);OBJ __ANameTerm_40; /* variable? */
extern OBJ _ANameTerm_41(OBJ,OBJ);OBJ __ANameTerm_41; /* errorTerm */
extern OBJ _ANameTerm_42(OBJ);OBJ __ANameTerm_42; /* errorTerm? */
extern OBJ _ANameTerm_45(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_45; /* error */
extern OBJ _ANameTerm_47(OBJ);OBJ __ANameTerm_47; /* errorTerm,1 */
extern OBJ _ANameTerm_48(OBJ);OBJ __ANameTerm_48; /* cycleS */
extern OBJ _ANameTerm_49(OBJ);OBJ __ANameTerm_49; /* uninst */
extern OBJ _ANameTerm_50(OBJ);OBJ __ANameTerm_50; /* ambiguousS */
extern OBJ _ANameTerm_51(OBJ);OBJ __ANameTerm_51; /* hiddenS */
extern OBJ _ANameTerm_52(OBJ,OBJ);OBJ __ANameTerm_52; /* < */
extern OBJ _ANameTerm_53(OBJ,OBJ,OBJ);OBJ __ANameTerm_53; /* =,1 */
OBJ __ANameTerm_54; /* - */
extern OBJ _ANameTerm_60(OBJ,OBJ);OBJ __ANameTerm_60; /* <,1 */
OBJ __ANameTerm_61; /* noError */
extern TUP2 _ANameTerm_62(OBJ,OBJ,OBJ);OBJ __ANameTerm_62; /* cycle */
extern TUP2 _ANameTerm_63(OBJ,OBJ,OBJ);OBJ __ANameTerm_63; /* uninst,1 */
extern TUP2 _ANameTerm_64(OBJ,OBJ,OBJ);OBJ __ANameTerm_64; /* ambiguous */
extern TUP2 _ANameTerm_65(OBJ,OBJ,OBJ);OBJ __ANameTerm_65; /* hidden */
extern OBJ _ANameTerm_66(OBJ);OBJ __ANameTerm_66; /* noError? */
extern OBJ _ANameTerm_67(OBJ,OBJ);OBJ __ANameTerm_67; /* + */
extern TUP2 _ANameTerm_70(OBJ,OBJ);OBJ __ANameTerm_70; /* print */
OBJ __ANameTerm_71; /* toNameTermName */
extern TUP2 _ANameTerm_72(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_72; /* tNTName */
extern TUP2 _ANameTerm_73(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_73; /* tNTNameH */
extern TUP2 _ANameTerm_74(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_74; /* tNTDeclE */
extern TUP2 _ANameTerm_75(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_75; /* tNTImpDeclE */
extern TUP2 _ANameTerm_76(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_76; /* selectFormParam */
extern TUP2 _ANameTerm_77(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_77; /* tNTInstE */
OBJ __ANameTerm_78; /* toNameTermInst */
extern TUP2 _ANameTerm_79(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_79; /* equivInst */
extern OBJ _ANameTerm_80(OBJ,OBJ);OBJ __ANameTerm_80; /* `,2 */
extern OBJ _ANameTerm_81(OBJ,OBJ,OBJ);OBJ __ANameTerm_81; /* `,3 */
extern OBJ _ANameTerm_83(OBJ,OBJ);OBJ __ANameTerm_83; /* `,4 */
extern OBJ _ANameTerm_84(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_84; /* `,5 */
extern OBJ _ANameTerm_85(OBJ,OBJ);OBJ __ANameTerm_85; /* `,6 */
extern TUP5 _ANameTerm_86(OBJ,OBJ,OBJ);OBJ __ANameTerm_86; /* `,7 */
extern OBJ _ANameTerm_87(OBJ,OBJ);OBJ __ANameTerm_87; /* toNameTerm,2 */
extern OBJ _ANameTerm_88(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_88; /* checkIAS */
extern OBJ _ANameTerm_89(OBJ,OBJ);OBJ __ANameTerm_89; /* F1 */
OBJ __ANameTerm_90; /* `,4'90 */
OBJ __ANameTerm_91; /* `,4'91 */
OBJ __ANameTerm_92; /* `,4'92 */
OBJ __ANameTerm_93; /* `,4'93 */
OBJ __ANameTerm_94; /* `,4'94 */
OBJ __ANameTerm_95; /* `,6'95 */
OBJ __ANameTerm_96; /* `,6'96 */
OBJ __ANameTerm_97; /* `,5'97 */
OBJ __ANameTerm_98; /* print'98 */
extern OBJ _ANameTerm_99(OBJ);OBJ __ANameTerm_99; /* print'99 */
extern OBJ _ANameTerm_100(OBJ);OBJ __ANameTerm_100; /* `,2'100 */
OBJ __ANameTerm_101; /* tNTName'101 */
extern OBJ _ANameTerm_102(OBJ,OBJ,OBJ);OBJ __ANameTerm_102; /* tNTName'102 */
extern TUP2 _ANameTerm_103(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_103; /* tNTInstE'103 */
extern OBJ _ANameTerm_104(OBJ);OBJ __ANameTerm_104; /* tNTInstE'104 */
extern OBJ _ANameTerm_105(OBJ);OBJ __ANameTerm_105; /* tNTInstE'105 */
extern TUP2 _ANameTerm_106(OBJ,OBJ,OBJ,OBJ);OBJ __ANameTerm_106; /* tNTInstE'106 */
OBJ __ANameTerm_107; /* equivInst'107 */
OBJ __ANameTerm_108; /* equivInst'108 */
OBJ __ANameTerm_109; /* `,7'109 */
OBJ __ANameTerm_110; /* toNameTermName'110 */
OBJ __ANameTerm_111; /* toNameTermInst'111 */

extern OBJ _ANameTerm_2(OBJ x1,OBJ x2) /* = */
{OBJ r;
 if(ISPRM(x1)){
  FREE(x2,1);
  r=__ABUILTIN_5;
 }else{
  if(ISPRM(x2)){
   FREE(x1,1);
   r=__ABUILTIN_5;
  }else{
   if(ISPRD(x1)&&(ISTGPRD(x1,0))){
    if(EXPRD(x1,1)){
     DSPRD(x1);
    }else{
     DCPRD(x1,1);}
    FREE(x2,1);
    r=__ABUILTIN_3;
   }else{
    if(ISPRD(x2)&&(ISTGPRD(x2,0))){
     if(EXPRD(x2,1)){
      DSPRD(x2);
     }else{
      DCPRD(x2,1);}
     FREE(x1,1);
     r=__ABUILTIN_3;
    }else{
     switch(TGPRD(x1)){
      case 3:
       {OBJ x663=FLD(x1,1);OBJ x664=FLD(x1,2);OBJ x665=FLD(x1,3);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x663,1);CPPRD(x664,1);COPY(x665,1);
	 FRPRD(x1,1);}
	switch(TGPRD(x2)){
	 case 3:
	  {OBJ x672=FLD(x2,1);OBJ x673=FLD(x2,2);OBJ x674=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x672,1);CPPRD(x673,1);COPY(x674,1);
	    FRPRD(x2,1);}
	   {OBJ x676;
	    x676=_ARep_25(x663,x672);
	    if(ISTGPRM(x676,1)){
	     FRPRD(x664,1);
	     FREE(x665,1);
	     FRPRD(x673,1);
	     FREE(x674,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x677;
	      x677=_ARep_25(x664,x673);
	      if(ISTGPRM(x677,1)){
	       FREE(x665,1);
	       FREE(x674,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_2,1);
	       {OBJ x678;
		x678=_ASeqCompare_3(__ANameTerm_2,x665,x674);
		if(ISTGPRM(x678,1)){
		 r=__ABUILTIN_5;
		}else{
		 r=__ABUILTIN_3;}}}}}}}break;
	 case 4:
	  {OBJ x679=FLD(x2,1);OBJ x680=FLD(x2,2);OBJ x681=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    FREE(FLD(x2,4),1);DSPRDF(x2);
	   }else{
	    CPPRD(x679,1);CPPRD(x680,1);COPY(x681,1);
	    FRPRD(x2,1);}
	   {OBJ x684;
	    x684=_ARep_25(x663,x679);
	    if(ISTGPRM(x684,1)){
	     FRPRD(x664,1);
	     FREE(x665,1);
	     FRPRD(x680,1);
	     FREE(x681,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x685;
	      x685=_ARep_25(x664,x680);
	      if(ISTGPRM(x685,1)){
	       FREE(x665,1);
	       FREE(x681,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_2,1);
	       {OBJ x686;
		x686=_ASeqCompare_3(__ANameTerm_2,x665,x681);
		r=__ABUILTIN_3;}}}}}}break;
	 default: 
	  {OBJ x667=FLD(x2,1);OBJ x668=FLD(x2,2);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x667,1);CPPRD(x668,1);
	    FRPRD(x2,1);}
	   FREE(x665,1);
	   {OBJ x670;
	    x670=_ARep_25(x663,x667);
	    if(ISTGPRM(x670,1)){
	     FRPRD(x664,1);
	     FRPRD(x668,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x671;
	      x671=_ARep_25(x664,x668);
	      r=__ABUILTIN_3;}}}}}}break;
      case 4:
       {OBJ x687=FLD(x1,1);OBJ x688=FLD(x1,2);OBJ x689=FLD(x1,3);OBJ x690=FLD(x1,4);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x687,1);CPPRD(x688,1);COPY(x689,1);COPY(x690,1);
	 FRPRD(x1,1);}
	switch(TGPRD(x2)){
	 case 3:
	  {OBJ x697=FLD(x2,1);OBJ x698=FLD(x2,2);OBJ x699=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x697,1);CPPRD(x698,1);COPY(x699,1);
	    FRPRD(x2,1);}
	   FREE(x690,1);
	   {OBJ x701;
	    x701=_ARep_25(x687,x697);
	    if(ISTGPRM(x701,1)){
	     FRPRD(x688,1);
	     FREE(x689,1);
	     FRPRD(x698,1);
	     FREE(x699,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x702;
	      x702=_ARep_25(x688,x698);
	      if(ISTGPRM(x702,1)){
	       FREE(x689,1);
	       FREE(x699,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_2,1);
	       {OBJ x703;
		x703=_ASeqCompare_3(__ANameTerm_2,x689,x699);
		r=__ABUILTIN_3;}}}}}}break;
	 case 4:
	  {OBJ x704=FLD(x2,1);OBJ x705=FLD(x2,2);OBJ x706=FLD(x2,3);OBJ x707=FLD(x2,4);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x704,1);CPPRD(x705,1);COPY(x706,1);COPY(x707,1);
	    FRPRD(x2,1);}
	   {OBJ x709;
	    x709=_ARep_25(x687,x704);
	    if(ISTGPRM(x709,1)){
	     FRPRD(x688,1);
	     FREE(x689,1);
	     FREE(x690,1);
	     FRPRD(x705,1);
	     FREE(x706,1);
	     FREE(x707,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x710;
	      x710=_ARep_25(x688,x705);
	      if(ISTGPRM(x710,1)){
	       FREE(x689,1);
	       FREE(x690,1);
	       FREE(x706,1);
	       FREE(x707,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_2,1);
	       {OBJ x711;
		x711=_ASeqCompare_3(__ANameTerm_2,x689,x706);
		if(ISTGPRM(x711,1)){
		 CPCLS(__ANameTerm_2,1);
		 r=_AFct_21(__ANameTerm_2,x690,x707);
		}else{
		 FREE(x690,1);
		 FREE(x707,1);
		 r=__ABUILTIN_3;}}}}}}}break;
	 default: 
	  {OBJ x692=FLD(x2,1);OBJ x693=FLD(x2,2);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x692,1);CPPRD(x693,1);
	    FRPRD(x2,1);}
	   FREE(x689,1);
	   FREE(x690,1);
	   {OBJ x695;
	    x695=_ARep_25(x687,x692);
	    if(ISTGPRM(x695,1)){
	     FRPRD(x688,1);
	     FRPRD(x693,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x696;
	      x696=_ARep_25(x688,x693);
	      r=__ABUILTIN_3;}}}}}}break;
      default: 
       {OBJ x642=FLD(x1,1);OBJ x643=FLD(x1,2);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x642,1);CPPRD(x643,1);
	 FRPRD(x1,1);}
	if(ISTGPRD(x2,1)){
	 {OBJ x645=FLD(x2,1);OBJ x646=FLD(x2,2);
	  if(EXPRD(x2,1)){
	   DSPRDF(x2);
	  }else{
	   CPPRD(x645,1);CPPRD(x646,1);
	   FRPRD(x2,1);}
	  {OBJ x648;
	   x648=_ARep_25(x642,x645);
	   if(ISTGPRM(x648,1)){
	    FRPRD(x643,1);
	    FRPRD(x646,1);
	    r=__ABUILTIN_3;
	   }else{
	    {OBJ x649;
	     x649=_ARep_25(x643,x646);
	     if(ISTGPRM(x649,1)){
	      r=__ABUILTIN_3;
	     }else{
	      r=__ABUILTIN_5;}}}}}
	}else{
	 {OBJ x650=FLD(x2,1);OBJ x651=FLD(x2,2);
	  if(EXPRD(x2,1)){
	   FLD(x2,1)=NIL;FLD(x2,2)=NIL;DSPRD(x2);
	  }else{
	   CPPRD(x650,1);CPPRD(x651,1);
	   FRPRD(x2,1);}
	  {OBJ x654;
	   x654=_ARep_25(x642,x650);
	   if(ISTGPRM(x654,1)){
	    FRPRD(x643,1);
	    FRPRD(x651,1);
	    r=__ABUILTIN_3;
	   }else{
	    {OBJ x655;
	     x655=_ARep_25(x643,x651);
	     r=__ABUILTIN_3;}}}}}}}}}}}
 return r;}

extern TUP2 _ANameTerm_3(OBJ x1,OBJ x2) /* toNameTerm */
{TUP2 r;
 if(ISPRD(x2)&&(ISTGPRD(x2,1))){
  CPPRD(__ANameTerm_54,1);
  COPY(__ANameTerm_61,1);
  {OBJ x37;TUP2 x39;
   PRD1(2,x37);FLD1(x37,1)=x1;FLD1(x37,2)=__ANameTerm_61;
   x39=_ANameTerm_72(__ANameTerm_54,__AImpExpEntry_84,x37,x2);
   r=_ANameTerm_70(x39.c1,x39.c2);}
 }else{
  if(ISPRD(x2)&&(ISTGPRD(x2,2))){
   {OBJ x43=FLD(x2,3);
    COPY(x1,1);
    COPY(__ANameTerm_61,1);
    {OBJ x44;OBJ x45;OBJ x48;OBJ x50;OBJ x51;
     PRD1(2,x44);FLD1(x44,1)=x1;FLD1(x44,2)=__ANameTerm_61;
     ANat_76(x43,__AObjects_30,x45);
     if(ISTGPRM(x45,1)){
      FREE(x1,1);
      CPPRD(__ANameTerm_54,1);
      x48=__AImpExpEntry_84;
     }else{
      CPPRD(x2,1);
      CPPRD(__ANameTerm_54,1);
      {OBJ x46;OBJ x47;
       x46=_AName_12(x2);
       x47=_AImpDecl4SigAna_42(x1,x46);
       x48=_ADArray_20(x47,x43);}}
     {TUP2 t=_ANameTerm_72(__ANameTerm_54,x48,x44,x2);
      x50=t.c1;
      x51=t.c2;}
     r=_ANameTerm_70(x50,x51);}}
  }else{
   HLT("NameTerm at <unknown> : missing else in toNameTerm\'NameTerm:globSig->name->globSig**nameTerm");}}
 return r;}
extern OBJ _ANameTerm_3_c(OBJ x1,OBJ x2) /* toNameTerm */
{OBJ r;
 {TUP2 t=_ANameTerm_3(x1,x2);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_4(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* toNameTerm,1 */
{TUP2 r;
 COPY(__ANameTerm_61,1);
 COPY(x1,1);
 {OBJ x5;OBJ x6;OBJ x8;OBJ x10;OBJ x11;
  ANat_76(x3,__AObjects_30,x5);
  PRD1(2,x6);FLD1(x6,1)=x1;FLD1(x6,2)=__ANameTerm_61;
  if(ISTGPRM(x5,1)){
   FREE(x1,1);
   CPPRD(__ANameTerm_54,1);
   x8=__AImpExpEntry_84;
  }else{
   CPPRD(__ANameTerm_54,1);
   {OBJ x7;
    x7=_AImpDecl4SigAna_42(x1,x2);
    x8=_ADArray_20(x7,x3);}}
  {TUP2 t=_ANameTerm_72(__ANameTerm_54,x8,x6,x4);
   x10=t.c1;
   x11=t.c2;}
  r=_ANameTerm_70(x10,x11);}
 return r;}
extern OBJ _ANameTerm_4_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* toNameTerm,1 */
{OBJ r;
 {TUP2 t=_ANameTerm_4(x1,x2,x3,x4);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern OBJ _ANameTerm_5(OBJ x1) /* error? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  if(EXPRD(x1,1)){
   DSPRD(x1);
  }else{
   DCPRD(x1,1);}
  r=__ABUILTIN_5;
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_6(OBJ x1) /* hidden? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x50=FLD(x1,1);
   if(EXPRD(x1,1)){
    FLD(x1,1)=NIL;DSPRD(x1);
   }else{
    COPY(x50,1);
    FRPRD(x1,1);}
   if(ISPRM(x50)){
    r=__ABUILTIN_3;
   }else{
    if(EXPRD(x50,1)){
     DSPRD(x50);
    }else{
     DCPRD(x50,1);}
    r=__ABUILTIN_5;}}
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_7(OBJ x1) /* ambiguous? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x51=FLD(x1,2);
   if(EXPRD(x1,1)){
    FLD(x1,2)=NIL;DSPRD(x1);
   }else{
    COPY(x51,1);
    FRPRD(x1,1);}
   if(ISPRM(x51)){
    r=__ABUILTIN_3;
   }else{
    if(EXPRD(x51,1)){
     DSPRD(x51);
    }else{
     DCPRD(x51,1);}
    r=__ABUILTIN_5;}}
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_8(OBJ x1) /* uninst? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x52=FLD(x1,3);
   if(EXPRD(x1,1)){
    FLD(x1,3)=NIL;DSPRD(x1);
   }else{
    COPY(x52,1);
    FRPRD(x1,1);}
   if(ISPRM(x52)){
    r=__ABUILTIN_3;
   }else{
    if(EXPRD(x52,1)){
     DSPRD(x52);
    }else{
     DCPRD(x52,1);}
    r=__ABUILTIN_5;}}
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_9(OBJ x1) /* cyclic? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x53=FLD(x1,4);
   if(EXPRD(x1,1)){
    FLD(x1,4)=NIL;DSPRD(x1);
   }else{
    COPY(x53,1);
    FRPRD(x1,1);}
   if(ISPRM(x53)){
    r=__ABUILTIN_3;
   }else{
    if(EXPRD(x53,1)){
     DSPRD(x53);
    }else{
     DCPRD(x53,1);}
    r=__ABUILTIN_5;}}
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_10(OBJ x1) /* ` */
{OBJ r;
 r=_ANameTerm_83(__ANat_8,x1);
 return r;}

extern TUP5 _ANameTerm_11(OBJ x1,OBJ x2) /* `,1 */
{TUP5 r;
 r=_ANameTerm_86(x1,__ANat_8,x2);
 return r;}
extern OBJ _ANameTerm_11_c(OBJ x1,OBJ x2) /* `,1 */
{OBJ r;
 {TUP5 t=_ANameTerm_11(x1,x2);
  PRD1(5,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;
  FLD1(r,3)=t.c3;
  FLD1(r,4)=t.c4;
  FLD1(r,5)=t.c5;}
 return r;}

extern OBJ _ANameTerm_12(OBJ x1,OBJ x2) /* hidden?,1 */
{OBJ r;
 if(ISPRD(x2)&&(ISTGPRD(x2,2))){
  {OBJ x81=FLD(x2,3);
   COPY(x1,1);
   CPPRD(x2,2);
   {OBJ x82;OBJ x83;OBJ x84;OBJ x85;OBJ x86;OBJ x87;
    x82=_AGlobSig_55(x1);
    x83=_AName_12(x2);
    x84=_AName_11(x2);
    x85=_ADArray_20(x82,x83);
    CPPRD(x85,1);
    x86=_AImpExpEntry_92(x85);
    x87=_ADArray_21(x86,x84);
    if(ISPRM(x87)){
     FREE(x1,1);
     if(EXPRD(x2,1)){
      DSPRDF(x2);
     }else{
      DCPRD(x2,1);}
     FRPRD(x85,1);
     r=__ABUILTIN_5;
    }else{
     {OBJ x88=FLD1(x87,1);
      if(EXPRD(x87,1)){
       DSPRDF(x87);
      }else{
       CPPRD(x88,1);
       FRPRD(x87,1);}
      COPY(x1,1);
      {OBJ x89;OBJ x90;OBJ x91;OBJ x92;OBJ x93;
       x89=_AImpDecl4SigAna_50(x1,x83);
       if(ISTGPRM(x89,1)){
	CPPRD(x88,1);
	CPCLS(__AImpExpEntry_6,1);
	CPCLS(__AImpExpEntry_128,1);
	x90=__ABUILTIN_3;
       }else{
	CPPRD(x88,1);
	CPCLS(__AImpExpEntry_6,1);
	CPCLS(__AImpExpEntry_128,1);
	x90=__ABUILTIN_5;}
       x91=_AImpExpEntry_10(x88);
       COPY(x91,1);
       x92=_ASeqFilter_2(__AImpExpEntry_128,x91);
       x93=_ASeqMap_3(__AImpExpEntry_6,x92);
       if(ISTGPRM(x90,1)){
	{OBJ x94;
	 ANat_76(x81,__AObjects_30,x94);
	 if(ISTGPRM(x94,1)){
	  FREE(x1,1);
	  if(EXPRD(x2,1)){
	   DSPRDF(x2);
	  }else{
	   DCPRD(x2,1);}
	  FRPRD(x85,1);
	  FRPRD(x88,1);
	  FREE(x93,1);
	  if(ISPRM(x91)){
	   r=__ABUILTIN_5;
	  }else{
	   if(EXPRD(x91,1)){
	    DSPRD(x91);
	   }else{
	    DCPRD(x91,1);}
	   r=__ABUILTIN_3;}
	 }else{
	  FREE(x91,1);
	  COPY(x1,2);
	  CPCLS(__AName4SigAna_17,1);
	  {OBJ x97;OBJ x98;OBJ x99;OBJ x100;
	   x97=_AName4SigAna_15(x1,x2);
	   COPY(x97,1);
	   x98=_AName4SigAna_14(x1,x97);
	   x99=_AImpExpEntry_91(x85);
	   CPPRD(x99,1);
	   x100=(*(OBJ(*)(OBJ,OBJ))METHOD(__AName4SigAna_17,1))(__AName4SigAna_17,x99);
	   if(ISTGPRM(x98,1)){
	    FREE(x1,1);
	    FRPRD(x88,1);
	    if(ISPRD(x97)&&(ISTGPRD(x97,2))){
	     {OBJ x103=FLD(x97,3);
	      if(EXPRD(x97,1)){
	       DSPRDF(x97);
	      }else{
	       FRPRD(x97,1);}
	      CPCLS(__AObjects_31,1);
	      {OBJ x104;OBJ x105;OBJ x106;OBJ x107;
	       x104=_ADArray_20(x99,x103);
	       x105=_AImpExpEntry_49(x104);
	       x106=_ASeqMap_3(x100,x105);
	       x107=_AMySeqFun2_12(__AObjects_31,x93,x106);
	       if(ISTGPRM(x107,1)){
		r=__ABUILTIN_3;
	       }else{
		r=__ABUILTIN_5;}}}
	    }else{
	     HLT("Name at <unknown> : undefined selection inst\'Name:name->inst");}
	   }else{
	    FRPRD(x99,1);
	    {OBJ x108;
	     x108=_ASeqMap_3(x100,x93);
	     r=_ANameTerm_88(x1,x97,x88,x108);}}}}}
       }else{
	FRPRD(x85,1);
	FREE(x91,1);
	r=_ANameTerm_88(x1,x2,x88,x93);}}}}}}
 }else{
  if(ISPRD(x2)&&(ISTGPRD(x2,4)||ISTGPRD(x2,1))){
   if(EXPRD(x2,1)){
    DSPRD(x2);
   }else{
    DCPRD(x2,1);}
   FREE(x1,1);
   r=__ABUILTIN_3;
  }else{
   HLT("NameTerm at <543,11-564,36> : missing else in hidden\?\'NameTerm:globSig**name->bool");}}
 return r;}

extern OBJ _ANameTerm_14(OBJ x1,OBJ x2) /* cycTest */
{OBJ r;
 PRD1F(2,r);FLD1(r,1)=x1;FLD1(r,2)=x2;
 return r;}

extern OBJ _ANameTerm_15(OBJ x1) /* cycTest? */
{OBJ r;
 FRPRD(x1,1);
 r=__ABUILTIN_5;
 return r;}

extern OBJ _ANameTerm_16(OBJ x1) /* inst */
{OBJ r;
 {OBJ x3=FLD1(x1,2);
  if(EXPRD(x1,1)){
   r=x3;
   DSPRDF(x1);
  }else{
   r=x3;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_17(OBJ x1) /* struct */
{OBJ r;
 {OBJ x2=FLD1(x1,1);
  if(EXPRD(x1,1)){
   r=x2;
   DSPRDF(x1);
  }else{
   r=x2;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_19(OBJ x1,OBJ x2) /* env */
{OBJ r;
 PRD1(2,r);FLD1(r,1)=x1;FLD1(r,2)=x2;
 return r;}

extern OBJ _ANameTerm_20(OBJ x1) /* env? */
{OBJ r;
 FRPRD(x1,1);
 r=__ABUILTIN_5;
 return r;}

extern OBJ _ANameTerm_21(OBJ x1) /* term */
{OBJ r;
 {OBJ x3=FLD1(x1,2);
  if(EXPRD(x1,1)){
   r=x3;
   FREE(FLD1(x1,1),1);DSPRDF(x1);
  }else{
   COPY(x3,1);
   r=x3;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_22(OBJ x1) /* gS */
{OBJ r;
 {OBJ x2=FLD1(x1,1);
  if(EXPRD(x1,1)){
   r=x2;
   FREE(FLD1(x1,2),1);DSPRDF(x1);
  }else{
   COPY(x2,1);
   r=x2;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_24(OBJ x1,OBJ x2) /* nameEnv */
{OBJ r;
 PRD1(2,r);FLD1(r,1)=x1;FLD1(r,2)=x2;
 return r;}

extern OBJ _ANameTerm_25(OBJ x1) /* nameEnv? */
{OBJ r;
 FRPRD(x1,1);
 r=__ABUILTIN_5;
 return r;}

extern OBJ _ANameTerm_26(OBJ x1) /* instE */
{OBJ r;
 {OBJ x3=FLD1(x1,2);
  if(EXPRD(x1,1)){
   r=x3;
   FREE(FLD1(x1,1),1);DSPRDF(x1);
  }else{
   COPY(x3,1);
   r=x3;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_27(OBJ x1) /* name */
{OBJ r;
 {OBJ x2=FLD1(x1,1);
  if(EXPRD(x1,1)){
   r=x2;
   FREE(FLD1(x1,2),1);DSPRDF(x1);
  }else{
   COPY(x2,1);
   r=x2;
   FRPRD(x1,1);}}
 return r;}

extern OBJ _ANameTerm_28(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* funTerm */
{OBJ r;
 PRD(4,4,r);FLD(r,1)=x1;FLD(r,2)=x2;FLD(r,3)=x3;FLD(r,4)=x4;
 return r;}

extern OBJ _ANameTerm_29(OBJ x1) /* funTerm? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,4))){
  if(EXPRD(x1,1)){
   DSPRD(x1);
  }else{
   DCPRD(x1,1);}
  r=__ABUILTIN_5;
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_30(OBJ x1) /* fct */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,4))){
  {OBJ x5=FLD(x1,4);
   if(EXPRD(x1,1)){
    r=x5;
    FLD(x1,4)=NIL;DSPRD(x1);
   }else{
    COPY(x5,1);
    r=x5;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <71,18-20> : undefined selection fct\'NameTerm:nameTerm->fct");}
 return r;}

extern OBJ _ANameTerm_31(OBJ x1) /* inst,1 */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,4)||ISTGPRD(x1,3))){
  {OBJ x4=FLD(x1,3);
   if(EXPRD(x1,1)){
    r=x4;
    FLD(x1,3)=NIL;DSPRD(x1);
   }else{
    COPY(x4,1);
    r=x4;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <70,18-21> : undefined selection inst\'NameTerm:nameTerm->seq");}
 return r;}

extern OBJ _ANameTerm_32(OBJ x1) /* orig */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,3)||ISTGPRD(x1,4)||ISTGPRD(x1,1))){
  {OBJ x3=FLD(x1,2);
   if(EXPRD(x1,1)){
    r=x3;
    FLD(x1,2)=NIL;DSPRD(x1);
   }else{
    CPPRD(x3,1);
    r=x3;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <69,18-21> : undefined selection orig\'NameTerm:nameTerm->rep");}
 return r;}

extern OBJ _ANameTerm_33(OBJ x1) /* ide */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,3)||ISTGPRD(x1,4)||ISTGPRD(x1,1))){
  {OBJ x2=FLD(x1,1);
   if(EXPRD(x1,1)){
    r=x2;
    FLD(x1,1)=NIL;DSPRD(x1);
   }else{
    CPPRD(x2,1);
    r=x2;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <68,18-20> : undefined selection ide\'NameTerm:nameTerm->rep");}
 return r;}

extern OBJ _ANameTerm_34(OBJ x1,OBJ x2,OBJ x3) /* sortTerm */
{OBJ r;
 PRD(3,3,r);FLD(r,1)=x1;FLD(r,2)=x2;FLD(r,3)=x3;
 return r;}

extern OBJ _ANameTerm_35(OBJ x1) /* sortTerm? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,3))){
  if(EXPRD(x1,1)){
   DSPRD(x1);
  }else{
   DCPRD(x1,1);}
  r=__ABUILTIN_5;
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_40(OBJ x1) /* variable? */
{OBJ r;
 if(ISPRM(x1)){
  r=__ABUILTIN_5;
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_41(OBJ x1,OBJ x2) /* errorTerm */
{OBJ r;
 PRD(2,1,r);FLD(r,1)=x1;FLD(r,2)=x2;
 return r;}

extern OBJ _ANameTerm_42(OBJ x1) /* errorTerm? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,1))){
  if(EXPRD(x1,1)){
   DSPRD(x1);
  }else{
   DCPRD(x1,1);}
  r=__ABUILTIN_5;
 }else{
  FREE(x1,1);
  r=__ABUILTIN_3;}
 return r;}

extern OBJ _ANameTerm_45(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* error */
{OBJ r;
 PRD(5,0,r);FLD(r,1)=x1;FLD(r,2)=x2;FLD(r,3)=x3;FLD(r,4)=x4;FLD(r,5)=x5;
 return r;}

extern OBJ _ANameTerm_47(OBJ x1) /* errorTerm,1 */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x6=FLD(x1,5);
   if(EXPRD(x1,1)){
    r=x6;
    FLD(x1,5)=NIL;DSPRD(x1);
   }else{
    COPY(x6,1);
    r=x6;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <61,15-23> : undefined selection errorTerm\'NameTerm:nameTerm->nameTerm");}
 return r;}

extern OBJ _ANameTerm_48(OBJ x1) /* cycleS */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x5=FLD(x1,4);
   if(EXPRD(x1,1)){
    r=x5;
    FLD(x1,4)=NIL;DSPRD(x1);
   }else{
    COPY(x5,1);
    r=x5;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <60,15-20> : undefined selection cycleS\'NameTerm:nameTerm->set");}
 return r;}

extern OBJ _ANameTerm_49(OBJ x1) /* uninst */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x4=FLD(x1,3);
   if(EXPRD(x1,1)){
    r=x4;
    FLD(x1,3)=NIL;DSPRD(x1);
   }else{
    COPY(x4,1);
    r=x4;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <59,15-20> : undefined selection uninst\'NameTerm:nameTerm->set");}
 return r;}

extern OBJ _ANameTerm_50(OBJ x1) /* ambiguousS */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x3=FLD(x1,2);
   if(EXPRD(x1,1)){
    r=x3;
    FLD(x1,2)=NIL;DSPRD(x1);
   }else{
    COPY(x3,1);
    r=x3;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <58,15-24> : undefined selection ambiguousS\'NameTerm:nameTerm->set");}
 return r;}

extern OBJ _ANameTerm_51(OBJ x1) /* hiddenS */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x2=FLD(x1,1);
   if(EXPRD(x1,1)){
    r=x2;
    FLD(x1,1)=NIL;DSPRD(x1);
   }else{
    COPY(x2,1);
    r=x2;
    FRPRD(x1,1);}}
 }else{
  HLT("NameTerm at <57,15-21> : undefined selection hiddenS\'NameTerm:nameTerm->set");}
 return r;}

extern OBJ _ANameTerm_52(OBJ x1,OBJ x2) /* < */
{OBJ r;
 {OBJ x9=FLD1(x1,1);
  if(EXPRD(x1,1)){
   FREE(FLD1(x1,2),1);DSPRDF(x1);
  }else{
   COPY(x9,1);
   FRPRD(x1,1);}
  {OBJ x11=FLD1(x2,1);
   if(EXPRD(x2,1)){
    FREE(FLD1(x2,2),1);DSPRDF(x2);
   }else{
    COPY(x11,1);
    FRPRD(x2,1);}
   {OBJ x13;
    x13=x11;
    r=_AName_32(x9,x13);}}}
 return r;}

extern OBJ _ANameTerm_53(OBJ x1,OBJ x2,OBJ x3) /* =,1 */
{OBJ r;
 {OBJ x11=FLD1(x1,1);OBJ x12=FLD1(x1,2);
  if(EXPRD(x1,1)){
   DSPRDF(x1);
  }else{
   FRPRD(x1,1);}
  {OBJ x13;
   ANat_76(x11,x2,x13);
   if(ISTGPRM(x13,1)){
    ANat_76(x12,x3,r);
   }else{
    r=__ABUILTIN_3;}}}
 return r;}

extern OBJ _ANameTerm_60(OBJ x1,OBJ x2) /* <,1 */
{OBJ r;
 if(ISPRM(x1)){
  if(ISPRM(x2)){
   r=__ABUILTIN_5;
  }else{
   FREE(x2,1);
   r=__ABUILTIN_3;}
 }else{
  if(ISPRM(x2)){
   FREE(x1,1);
   r=__ABUILTIN_5;
  }else{
   if(ISPRD(x1)&&(ISTGPRD(x1,0))){
    if(EXPRD(x1,1)){
     DSPRD(x1);
    }else{
     DCPRD(x1,1);}
    FREE(x2,1);
    r=__ABUILTIN_3;
   }else{
    if(ISPRD(x2)&&(ISTGPRD(x2,0))){
     if(EXPRD(x2,1)){
      DSPRD(x2);
     }else{
      DCPRD(x2,1);}
     FREE(x1,1);
     r=__ABUILTIN_3;
    }else{
     switch(TGPRD(x1)){
      case 3:
       {OBJ x665=FLD(x1,1);OBJ x666=FLD(x1,2);OBJ x667=FLD(x1,3);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x665,1);CPPRD(x666,1);COPY(x667,1);
	 FRPRD(x1,1);}
	switch(TGPRD(x2)){
	 case 3:
	  {OBJ x674=FLD(x2,1);OBJ x675=FLD(x2,2);OBJ x676=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x674,1);CPPRD(x675,1);COPY(x676,1);
	    FRPRD(x2,1);}
	   {OBJ x678;
	    x678=_ARep_25(x665,x674);
	    if(ISTGPRM(x678,1)){
	     FRPRD(x666,1);
	     FREE(x667,1);
	     FRPRD(x675,1);
	     FREE(x676,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x679;
	      x679=_ARep_25(x666,x675);
	      if(ISTGPRM(x679,1)){
	       FREE(x667,1);
	       FREE(x676,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_60,1);
	       {OBJ x680;
		x680=_ASeqCompare_3(__ANameTerm_60,x667,x676);
		if(ISTGPRM(x680,1)){
		 r=__ABUILTIN_5;
		}else{
		 r=__ABUILTIN_3;}}}}}}}break;
	 case 4:
	  {OBJ x681=FLD(x2,1);OBJ x682=FLD(x2,2);OBJ x683=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    FREE(FLD(x2,4),1);DSPRDF(x2);
	   }else{
	    CPPRD(x681,1);CPPRD(x682,1);COPY(x683,1);
	    FRPRD(x2,1);}
	   {OBJ x686;
	    x686=_ARep_25(x665,x681);
	    if(ISTGPRM(x686,1)){
	     FRPRD(x666,1);
	     FREE(x667,1);
	     FRPRD(x682,1);
	     FREE(x683,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x687;
	      x687=_ARep_25(x666,x682);
	      if(ISTGPRM(x687,1)){
	       FREE(x667,1);
	       FREE(x683,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_60,1);
	       {OBJ x688;
		x688=_ASeqCompare_3(__ANameTerm_60,x667,x683);
		r=__ABUILTIN_3;}}}}}}break;
	 default: 
	  {OBJ x669=FLD(x2,1);OBJ x670=FLD(x2,2);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x669,1);CPPRD(x670,1);
	    FRPRD(x2,1);}
	   FREE(x667,1);
	   {OBJ x672;
	    x672=_ARep_25(x665,x669);
	    if(ISTGPRM(x672,1)){
	     FRPRD(x666,1);
	     FRPRD(x670,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x673;
	      x673=_ARep_25(x666,x670);
	      r=__ABUILTIN_3;}}}}}}break;
      case 4:
       {OBJ x689=FLD(x1,1);OBJ x690=FLD(x1,2);OBJ x691=FLD(x1,3);OBJ x692=FLD(x1,4);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x689,1);CPPRD(x690,1);COPY(x691,1);COPY(x692,1);
	 FRPRD(x1,1);}
	switch(TGPRD(x2)){
	 case 3:
	  {OBJ x699=FLD(x2,1);OBJ x700=FLD(x2,2);OBJ x701=FLD(x2,3);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x699,1);CPPRD(x700,1);COPY(x701,1);
	    FRPRD(x2,1);}
	   FREE(x692,1);
	   {OBJ x703;
	    x703=_ARep_25(x689,x699);
	    if(ISTGPRM(x703,1)){
	     FRPRD(x690,1);
	     FREE(x691,1);
	     FRPRD(x700,1);
	     FREE(x701,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x704;
	      x704=_ARep_25(x690,x700);
	      if(ISTGPRM(x704,1)){
	       FREE(x691,1);
	       FREE(x701,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_60,1);
	       {OBJ x705;
		x705=_ASeqCompare_3(__ANameTerm_60,x691,x701);
		r=__ABUILTIN_3;}}}}}}break;
	 case 4:
	  {OBJ x706=FLD(x2,1);OBJ x707=FLD(x2,2);OBJ x708=FLD(x2,3);OBJ x709=FLD(x2,4);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x706,1);CPPRD(x707,1);COPY(x708,1);COPY(x709,1);
	    FRPRD(x2,1);}
	   {OBJ x711;
	    x711=_ARep_25(x689,x706);
	    if(ISTGPRM(x711,1)){
	     FRPRD(x690,1);
	     FREE(x691,1);
	     FREE(x692,1);
	     FRPRD(x707,1);
	     FREE(x708,1);
	     FREE(x709,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x712;
	      x712=_ARep_25(x690,x707);
	      if(ISTGPRM(x712,1)){
	       FREE(x691,1);
	       FREE(x692,1);
	       FREE(x708,1);
	       FREE(x709,1);
	       r=__ABUILTIN_3;
	      }else{
	       CPCLS(__ANameTerm_60,1);
	       {OBJ x713;
		x713=_ASeqCompare_3(__ANameTerm_60,x691,x708);
		if(ISTGPRM(x713,1)){
		 CPCLS(__ANameTerm_60,1);
		 r=_AFct_21(__ANameTerm_60,x692,x709);
		}else{
		 FREE(x692,1);
		 FREE(x709,1);
		 r=__ABUILTIN_3;}}}}}}}break;
	 default: 
	  {OBJ x694=FLD(x2,1);OBJ x695=FLD(x2,2);
	   if(EXPRD(x2,1)){
	    DSPRDF(x2);
	   }else{
	    CPPRD(x694,1);CPPRD(x695,1);
	    FRPRD(x2,1);}
	   FREE(x691,1);
	   FREE(x692,1);
	   {OBJ x697;
	    x697=_ARep_25(x689,x694);
	    if(ISTGPRM(x697,1)){
	     FRPRD(x690,1);
	     FRPRD(x695,1);
	     r=__ABUILTIN_3;
	    }else{
	     {OBJ x698;
	      x698=_ARep_25(x690,x695);
	      r=__ABUILTIN_3;}}}}}}break;
      default: 
       {OBJ x644=FLD(x1,1);OBJ x645=FLD(x1,2);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 CPPRD(x644,1);CPPRD(x645,1);
	 FRPRD(x1,1);}
	if(ISTGPRD(x2,1)){
	 {OBJ x647=FLD(x2,1);OBJ x648=FLD(x2,2);
	  if(EXPRD(x2,1)){
	   DSPRDF(x2);
	  }else{
	   CPPRD(x647,1);CPPRD(x648,1);
	   FRPRD(x2,1);}
	  {OBJ x650;
	   x650=_ARep_25(x644,x647);
	   if(ISTGPRM(x650,1)){
	    FRPRD(x645,1);
	    FRPRD(x648,1);
	    r=__ABUILTIN_3;
	   }else{
	    {OBJ x651;
	     x651=_ARep_25(x645,x648);
	     if(ISTGPRM(x651,1)){
	      r=__ABUILTIN_3;
	     }else{
	      r=__ABUILTIN_5;}}}}}
	}else{
	 {OBJ x652=FLD(x2,1);OBJ x653=FLD(x2,2);
	  if(EXPRD(x2,1)){
	   FLD(x2,1)=NIL;FLD(x2,2)=NIL;DSPRD(x2);
	  }else{
	   CPPRD(x652,1);CPPRD(x653,1);
	   FRPRD(x2,1);}
	  {OBJ x656;
	   x656=_ARep_25(x644,x652);
	   if(ISTGPRM(x656,1)){
	    FRPRD(x645,1);
	    FRPRD(x653,1);
	    r=__ABUILTIN_3;
	   }else{
	    {OBJ x657;
	     x657=_ARep_25(x645,x653);
	     r=__ABUILTIN_3;}}}}}}}}}}}
 return r;}

extern TUP2 _ANameTerm_62(OBJ x1,OBJ x2,OBJ x3) /* cycle */
{TUP2 r;
 {OBJ x10;
  PRD1(2,x10);FLD1(x10,1)=x2;FLD1(x10,2)=x3;
  {OBJ x15=FLD1(x1,1);OBJ x16=FLD1(x1,2);FLAG x_x1=EXPRD(x1,1);
   if(x_x1){
   }else{
    COPY(x15,1);COPY(x16,1);}
   COPY(__ANameTerm_61,1);
   {OBJ x17;OBJ x18;OBJ x19;
    if(x_x1){
     RSOME(x1,x17);FLD1(x17,1)=x10;FLD1(x17,2)=__ASeq_6;
    }else{
     FRPRD(x1,1);PRD1(2,x17);FLD1(x17,1)=x10;FLD1(x17,2)=__ASeq_6;}
    PRD(5,0,x18);FLD(x18,1)=__ASeq_6;FLD(x18,2)=__ASeq_6;FLD(x18,3)=__ASeq_6;FLD(x18,4)=x17;FLD(x18,5)=__ANameTerm_61;
    x19=_ANameTerm_67(x18,x16);
    PRD1(2,r.c1);FLD1(r.c1,1)=x15;FLD1(r.c1,2)=x19;
    r.c2=__ANameTerm_39;}}}
 return r;}
extern OBJ _ANameTerm_62_c(OBJ x1,OBJ x2,OBJ x3) /* cycle */
{OBJ r;
 {TUP2 t=_ANameTerm_62(x1,x2,x3);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_63(OBJ x1,OBJ x2,OBJ x3) /* uninst,1 */
{TUP2 r;
 {OBJ x10;
  PRD1(2,x10);FLD1(x10,1)=x2;FLD1(x10,2)=x3;
  {OBJ x15=FLD1(x1,1);OBJ x16=FLD1(x1,2);FLAG x_x1=EXPRD(x1,1);
   if(x_x1){
   }else{
    COPY(x15,1);COPY(x16,1);}
   COPY(__ANameTerm_61,1);
   {OBJ x17;OBJ x18;OBJ x19;
    if(x_x1){
     RSOME(x1,x17);FLD1(x17,1)=x10;FLD1(x17,2)=__ASeq_6;
    }else{
     FRPRD(x1,1);PRD1(2,x17);FLD1(x17,1)=x10;FLD1(x17,2)=__ASeq_6;}
    PRD(5,0,x18);FLD(x18,1)=__ASeq_6;FLD(x18,2)=__ASeq_6;FLD(x18,3)=x17;FLD(x18,4)=__ASeq_6;FLD(x18,5)=__ANameTerm_61;
    x19=_ANameTerm_67(x18,x16);
    PRD1(2,r.c1);FLD1(r.c1,1)=x15;FLD1(r.c1,2)=x19;
    r.c2=__ANameTerm_39;}}}
 return r;}
extern OBJ _ANameTerm_63_c(OBJ x1,OBJ x2,OBJ x3) /* uninst,1 */
{OBJ r;
 {TUP2 t=_ANameTerm_63(x1,x2,x3);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_64(OBJ x1,OBJ x2,OBJ x3) /* ambiguous */
{TUP2 r;
 COPY(x2,1);
 {OBJ x10;
  PRD1(2,x10);FLD1(x10,1)=x2;FLD1(x10,2)=x3;
  {OBJ x18=FLD1(x1,1);OBJ x19=FLD1(x1,2);FLAG x_x1=EXPRD(x1,1);
   if(x_x1){
    COPY(x18,2);
   }else{
    COPY(x18,3);COPY(x19,1);}
   COPY(x2,1);
   COPY(__ANameTerm_61,1);
   {OBJ x20;OBJ x21;OBJ x22;OBJ x24;
    x20=_AName4SigAna_3(x18,x2);
    x21=_AName4SigAna_1(x18,x2);
    if(x_x1){
     RSOME(x1,x22);FLD1(x22,1)=x10;FLD1(x22,2)=__ASeq_6;
    }else{
     FRPRD(x1,1);PRD1(2,x22);FLD1(x22,1)=x10;FLD1(x22,2)=__ASeq_6;}
    PRD(2,1,r.c2);FLD(r.c2,1)=x21;FLD(r.c2,2)=x20;
    PRD(5,0,x24);FLD(x24,1)=__ASeq_6;FLD(x24,2)=x22;FLD(x24,3)=__ASeq_6;FLD(x24,4)=__ASeq_6;FLD(x24,5)=__ANameTerm_61;
    PRD1(2,r.c1);FLD1(r.c1,1)=x18;
    FLD1(r.c1,2)=_ANameTerm_67(x24,x19);}}}
 return r;}
extern OBJ _ANameTerm_64_c(OBJ x1,OBJ x2,OBJ x3) /* ambiguous */
{OBJ r;
 {TUP2 t=_ANameTerm_64(x1,x2,x3);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_65(OBJ x1,OBJ x2,OBJ x3) /* hidden */
{TUP2 r;
 COPY(x2,1);
 {OBJ x10;
  PRD1(2,x10);FLD1(x10,1)=x2;FLD1(x10,2)=x3;
  {OBJ x22=FLD1(x1,1);OBJ x23=FLD1(x1,2);FLAG x_x1=EXPRD(x1,1);
   if(x_x1){
    COPY(x22,2);
   }else{
    COPY(x22,3);COPY(x23,1);}
   COPY(x2,1);
   COPY(__ANameTerm_61,1);
   {OBJ x24;OBJ x25;OBJ x26;OBJ x28;OBJ x29;OBJ x30;TUP2 x32;
    x24=_AName4SigAna_3(x22,x2);
    x25=_AName4SigAna_1(x22,x2);
    if(x_x1){
     RSOME(x1,x26);FLD1(x26,1)=x10;FLD1(x26,2)=__ASeq_6;
    }else{
     FRPRD(x1,1);PRD1(2,x26);FLD1(x26,1)=x10;FLD1(x26,2)=__ASeq_6;}
    PRD(2,1,r.c2);FLD(r.c2,1)=x25;FLD(r.c2,2)=x24;
    COPY(r.c2,1);
    PRD(5,0,x28);FLD(x28,1)=x26;FLD(x28,2)=__ASeq_6;FLD(x28,3)=__ASeq_6;FLD(x28,4)=__ASeq_6;FLD(x28,5)=__ANameTerm_61;
    x29=_ANameTerm_67(x28,x23);
    COPY(x29,1);
    PRD1(2,x30);FLD1(x30,1)=x22;FLD1(x30,2)=x29;
    x32=_ANameTerm_70(x30,r.c2);
    FREE(x32.c2,1);
    PRD1(2,r.c1);FLD1(r.c1,1)=x32.c1;FLD1(r.c1,2)=x29;}}}
 return r;}
extern OBJ _ANameTerm_65_c(OBJ x1,OBJ x2,OBJ x3) /* hidden */
{OBJ r;
 {TUP2 t=_ANameTerm_65(x1,x2,x3);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern OBJ _ANameTerm_66(OBJ x1) /* noError? */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x68=FLD(x1,1);OBJ x69=FLD(x1,2);OBJ x70=FLD(x1,3);OBJ x71=FLD(x1,4);
   if(EXPRD(x1,1)){
    FREE(FLD(x1,5),1);DSPRDF(x1);
   }else{
    COPY(x68,1);COPY(x69,1);COPY(x70,1);COPY(x71,1);
    FRPRD(x1,1);}
   {OBJ x75;OBJ x78;
    if(ISPRM(x68)){
     x75=__ABUILTIN_5;
    }else{
     if(EXPRD(x68,1)){
      DSPRD(x68);
     }else{
      DCPRD(x68,1);}
     x75=__ABUILTIN_3;}
    if(ISTGPRM(x75,1)){
     if(ISPRM(x69)){
      x78=__ABUILTIN_5;
     }else{
      if(EXPRD(x69,1)){
       DSPRD(x69);
      }else{
       DCPRD(x69,1);}
      x78=__ABUILTIN_3;}
    }else{
     FREE(x69,1);
     x78=__ABUILTIN_3;}
    if(ISTGPRM(x78,1)){
     if(ISPRM(x70)){
      if(ISPRM(x71)){
       r=__ABUILTIN_5;
      }else{
       if(EXPRD(x71,1)){
	DSPRD(x71);
       }else{
	DCPRD(x71,1);}
       r=__ABUILTIN_3;}
     }else{
      if(EXPRD(x70,1)){
       DSPRD(x70);
      }else{
       DCPRD(x70,1);}
      FREE(x71,1);
      r=__ABUILTIN_3;}
    }else{
     FREE(x70,1);
     FREE(x71,1);
     r=__ABUILTIN_3;}}}
 }else{
  FREE(x1,1);
  r=__ABUILTIN_5;}
 return r;}

extern OBJ _ANameTerm_67(OBJ x1,OBJ x2) /* + */
{OBJ r;
 if(ISPRD(x1)&&(ISTGPRD(x1,0))){
  {OBJ x137=FLD(x1,1);OBJ x138=FLD(x1,2);OBJ x139=FLD(x1,3);OBJ x140=FLD(x1,4);OBJ x141=FLD(x1,5);FLAG x_x1=EXPRD(x1,1);
   if(x_x1){
   }else{
    COPY(x137,1);COPY(x138,1);COPY(x139,1);COPY(x140,1);COPY(x141,1);}
   if(ISPRD(x2)&&(ISTGPRD(x2,0))){
    {OBJ x157=FLD(x2,1);OBJ x158=FLD(x2,2);OBJ x159=FLD(x2,3);OBJ x160=FLD(x2,4);
     if(EXPRD(x2,1)){
      FREE(FLD(x2,5),1);DSPRDF(x2);
     }else{
      COPY(x157,1);COPY(x158,1);COPY(x159,1);COPY(x160,1);
      FRPRD(x2,1);}
     CPCLS(__ANameTerm_52,4);
     {OBJ x162;OBJ x163;OBJ x164;
      x162=_ASet_41(__ANameTerm_52,x137,x157);
      x163=_ASet_41(__ANameTerm_52,x138,x158);
      x164=_ASet_41(__ANameTerm_52,x139,x159);
      if(x_x1){
       RPRD(x1,r);FLD(r,1)=x162;FLD(r,2)=x163;FLD(r,3)=x164;
      }else{
       FRPRD(x1,1);PRD(5,0,r);FLD(r,1)=x162;FLD(r,2)=x163;FLD(r,3)=x164;FLD(r,5)=x141;}
      FLD(r,4)=_ASet_41(__ANameTerm_52,x140,x160);}}
   }else{
    FREE(x2,1);
    if(x_x1){
     RPRD(x1,r);
    }else{
     FRPRD(x1,1);PRD(5,0,r);FLD(r,1)=x137;FLD(r,2)=x138;FLD(r,3)=x139;FLD(r,4)=x140;FLD(r,5)=x141;}}}
 }else{
  FREE(x1,1);
  if(ISPRD(x2)&&(ISTGPRD(x2,0))){
   {OBJ x177;OBJ x178;OBJ x179;OBJ x180;OBJ x181;
    if(EXPRD(x2,1)){
     RPRD(x2,r);
    }else{
     x177=FLD(x2,1);x178=FLD(x2,2);x179=FLD(x2,3);x180=FLD(x2,4);x181=FLD(x2,5);COPY(x177,1);COPY(x178,1);COPY(x179,1);COPY(x180,1);COPY(x181,1);
     FRPRD(x2,1);PRD(5,0,r);FLD(r,1)=x177;FLD(r,2)=x178;FLD(r,3)=x179;FLD(r,4)=x180;FLD(r,5)=x181;}}
  }else{
   HLT("NameTerm at <182,5> : missing else in +\'NameTerm:nameTerm**nameTerm->nameTerm");}}
 return r;}

extern TUP2 _ANameTerm_70(OBJ x1,OBJ x2) /* print */
{TUP2 r;
 CPCLS(__ANameTerm_99,1);
 {OBJ x9;
  x9=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_99,1))(__ANameTerm_99,__ABUILTIN_20);
  {OBJ x43=FLD1(x1,1);OBJ x44=FLD1(x1,2);
   if(EXPRD(x1,1)){
    COPY(x44,1);
    DSPRDF(x1);
   }else{
    COPY(x43,1);COPY(x44,2);
    FRPRD(x1,1);}
   {OBJ x45;OBJ x51;OBJ x52;OBJ x53;
    x45=_ANameTerm_66(x44);
    if(ISTGPRM(x45,1)){
     r.c1=x43;
     FREE(x44,1);
     CPCLS(__ANameTerm_81,1);
     x51=x2;
    }else{
     if(ISPRD(x44)&&(ISTGPRD(x44,0))){
      {OBJ x46;OBJ x47;OBJ x48;OBJ x49;
       if(EXPRD(x44,1)){
	r.c1=x43;
	CPCLS(__ANameTerm_81,1);
	RPRD(x44,x51);FREE(FLD(x51,5),1);FLD(x51,5)=x2;
       }else{
	x46=FLD(x44,1);x47=FLD(x44,2);x48=FLD(x44,3);x49=FLD(x44,4);COPY(x46,1);COPY(x47,1);COPY(x48,1);COPY(x49,1);
	r.c1=x43;
	CPCLS(__ANameTerm_81,1);
	FRPRD(x44,1);PRD(5,0,x51);FLD(x51,1)=x46;FLD(x51,2)=x47;FLD(x51,3)=x48;FLD(x51,4)=x49;FLD(x51,5)=x2;}}
     }else{
      HLT("NameTerm at <57,15-21> : undefined selection hiddenS\'NameTerm:nameTerm->set");}}
    COPY(x51,1);
    x52=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_81,2))(__ANameTerm_81,__ANat_59,x51);
    r.c2=_ADEBUG_2(x9,x52,x51);}}}
 return r;}
extern OBJ _ANameTerm_70_c(OBJ x1,OBJ x2) /* print */
{OBJ r;
 {TUP2 t=_ANameTerm_70(x1,x2);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_72(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTName */
{TUP2 r;
 {OBJ x5=FLD1(x3,1);
  COPY(x5,1);
  COPY(x2,1);
  COPY(x4,1);
  CPCLS(__ANameTerm_102,1);
  {OBJ x7;OBJ x8;OBJ x9;OBJ x10;
   x7=x5;
   x8=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_102,2))(__ANameTerm_102,x2,x4);
   x9=_ADEBUG_2(__ANameTerm_71,x8,x4);
   x10=_AName4SigAna_15(x7,x9);
   r=_ANameTerm_73(x1,x2,x3,x10);}}
 return r;}
extern OBJ _ANameTerm_72_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTName */
{OBJ r;
 {TUP2 t=_ANameTerm_72(x1,x2,x3,x4);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_73(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTNameH */
{TUP2 r;
 if(ISPRD(x4)&&(ISTGPRD(x4,2))){
  {OBJ x243=FLD(x4,3);
   CPPRD(x4,2);
   {OBJ x244;OBJ x245;
    x244=_AName_11(x4);
    x245=_AName_12(x4);
    {OBJ x246=FLD1(x3,1);
     COPY(x246,4);
     CPPRD(x4,1);
     {OBJ x248;OBJ x249;OBJ x251;TUP2 x252;
      x248=_AImpDecl4SigAna_52(x246,x4);
      x249=_AImpDecl4SigAna_43(x246,x245);
      x251=_ADArray_20(x249,x244);
      x252=_AImpDecl4SigAna_32(x246,x245);
      FREE(x252.c2,1);
      if(ISTGPRM(x248,1)){
       {OBJ x254;
	ANat_76(x243,__AObjects_30,x254);
	if(ISTGPRM(x254,1)){
	 FREE(x246,1);
	 COPY(x2,1);
	 r=_ANameTerm_75(x1,x2,x4,x3,x245,x252.c1,x2,x251);
	}else{
	 CPPRD(x4,1);
	 COPY(x246,1);
	 {OBJ x255;OBJ x256;OBJ x257;
	  x255=_ANameTerm_12(x246,x4);
	  x256=_AImpDecl4SigAna_42(x246,x245);
	  x257=_ADArray_20(x256,x243);
	  if(ISTGPRM(x255,1)){
	   CPPRD(x1,1);
	   {OBJ x258;
	    x258=_ANameTerm_53(x1,x245,x243);
	    if(ISTGPRM(x258,1)){
	     FRPRD(x1,1);
	     FRPRD(x251,1);
	     FRPRD(x252.c1,1);
	     FREE(x257,1);
	     r=_ANameTerm_62(x3,x4,x2);
	    }else{
	     CPPRD(x1,1);
	     COPY(x2,1);
	     CPPRD(x4,1);
	     CPPRD(x251,1);
	     COPY(x257,1);
	     CPCLS(__ANameTerm_80,1);
	     CPCLS(__AImpExpEntry_6,1);
	     CPCLS(__AImpExpEntry_128,1);
	     {OBJ x259;OBJ x260;OBJ x262;OBJ x263;TUP2 x264;OBJ x266;
	      PRD1F(2,x259);FLD1(x259,1)=x245;FLD1(x259,2)=x243;
	      x260=_AImpExpEntry_10(x251);
	      x262=_ASeqFilter_2(__AImpExpEntry_128,x260);
	      x263=_ASeqMap_3(__AImpExpEntry_6,x262);
	      x264=_ANameTerm_77(x1,x2,x4,x3,x245,x257);
	      COPY(x264.c2,1);
	      x266=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_80,1))(__ANameTerm_80,x264.c2);
	      {OBJ x267=FLD1(x264.c1,1);OBJ x268=FLD1(x264.c1,2);
	       COPY(x267,1);COPY(x268,2);
	       COPY(x2,1);
	       CPPRD(x4,1);
	       CPCLS(__ANameTerm_79,1);
	       {OBJ x269;OBJ x270;TUP2 x272;
		x269=_ADEBUG_2(__ANameTerm_78,x266,x264.c2);
		x270=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__ANameTerm_79,6))(__ANameTerm_79,x4,x259,x2,x245,x268,x269);
		x272=_AMySeqFun3_7(x270,x267,__ABUILTIN_3,x263);
		if(ISTGPRM(x272.c2,1)){
		 if(EXPRD(x264.c1,1)){
		  DSPRD(x264.c1);
		 }else{
		  DCPRD(x264.c1,1);}
		 {OBJ x274;
		  PRD1(2,x274);FLD1(x274,1)=x272.c1;FLD1(x274,2)=x268;
		  r=_ANameTerm_75(x1,x2,x4,x274,x245,x252.c1,x257,x251);}
		}else{
		 FRPRD(x1,1);
		 FRPRD(x251,1);
		 FRPRD(x252.c1,1);
		 FREE(x257,1);
		 FREE(x268,1);
		 FREE(x272.c1,1);
		 r=_ANameTerm_65(x264.c1,x4,x2);}}}}}}
	  }else{
	   r=_ANameTerm_75(x1,x2,x4,x3,x245,x252.c1,x257,x251);}}}}
      }else{
       CPPRD(x4,1);
       {OBJ x275;
	x275=_ANameTerm_12(x246,x4);
	if(ISTGPRM(x275,1)){
	 FRPRD(x1,1);
	 FRPRD(x251,1);
	 FRPRD(x252.c1,1);
	 r=_ANameTerm_65(x3,x4,x2);
	}else{
	 r=_ANameTerm_75(x1,x2,x4,x3,x245,x252.c1,__AImpExpEntry_84,x251);}}}}}}}
 }else{
  if(ISPRD(x4)&&(ISTGPRD(x4,3))){
   {OBJ x276=FLD(x4,1);
    CPPRD(x276,1);
    {OBJ x277=FLD1(x3,1);
     COPY(x277,1);
     CPCLS(__APartNameEntry_27,1);
     {OBJ x279;OBJ x280;OBJ x281;
      x279=_AName4SigAna_38(x277,x276);
      x280=_ASeqMap_3(__APartNameEntry_27,x279);
      x281=_ASeqOfSeq_2(x280);
      if(ISPRM(x281)){
       FRPRD(x1,1);
       r=_ANameTerm_65(x3,x4,x2);
      }else{
       {OBJ x282=FLD1(x281,1);OBJ x283=FLD1(x281,2);
	if(EXPRD(x281,1)){
	 DSPRDF(x281);
	}else{
	 COPY(x282,1);COPY(x283,1);
	 FRPRD(x281,1);}
	if(ISPRM(x283)){
	 if(EXPRD(x4,1)){
	  FRPRD(FLD(x4,1),1);DSPRDF(x4);
	 }else{
	  DCPRD(x4,1);}
	 r=_ANameTerm_72(x1,x2,x3,x282);
	}else{
	 if(EXPRD(x283,1)){
	  DSPRD(x283);
	 }else{
	  DCPRD(x283,1);}
	 FRPRD(x1,1);
	 FREE(x282,1);
	 r=_ANameTerm_64(x3,x4,x2);}}}}}}
  }else{
   if(ISPRD(x4)&&(ISTGPRD(x4,4))){
    {OBJ x288=FLD(x4,3);
     r=_ANameTerm_76(x3,x1,x2,x4,x288);}
   }else{
    if(ISPRD(x4)&&(ISTGPRD(x4,1))){
     {OBJ x289=FLD(x4,1);
      if(EXPRD(x4,1)){
       DSPRDF(x4);
      }else{
       FRPRD(x4,1);}
      {OBJ x290=FLD1(x3,1);
       COPY(x290,3);
       {OBJ x292;OBJ x293;OBJ x294;OBJ x295;
	x292=_AGlobSig_56(x290);
	x293=_AName4SigAna_59(x290,x289);
	x294=_AGlobSig_58(x290);
	x295=_ADArray_20(x292,x293);
	r=_ANameTerm_74(x1,x2,x3,x294,x295);}}}
    }else{
     HLT("NameTerm at <245,5-12> : missing else in tNTNameH\'NameTerm:cycTest**instE->env**name->env**nameTerm");}}}}
 return r;}
extern OBJ _ANameTerm_73_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTNameH */
{OBJ r;
 {TUP2 t=_ANameTerm_73(x1,x2,x3,x4);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_74(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* tNTDeclE */
{TUP2 r;
 CPPRD(x5,1);
 {OBJ x12;
  x12=_ADeclEntry_14(x5);
  if(ISTGPRD(x5,0)){
   if(EXPRD(x5,1)){
    DSPRD(x5);
   }else{
    DCPRD(x5,1);}
   FRPRD(x1,1);
   FREE(x2,1);
   {OBJ x49;FLAG x_x3=EXPRD(x3,1);
    if(x_x3){
    }else{
     x49=FLD1(x3,1);COPY(x49,1);}
    COPY(__ANameTerm_61,1);
    if(x_x3){
     RSOME(x3,r.c1);FREE(FLD1(r.c1,2),1);FLD1(r.c1,2)=__ANameTerm_61;
    }else{
     FRPRD(x3,1);PRD1(2,r.c1);FLD1(r.c1,1)=x49;FLD1(r.c1,2)=__ANameTerm_61;}
    PRD(3,3,r.c2);FLD(r.c2,1)=x12;FLD(r.c2,2)=x4;FLD(r.c2,3)=__ASeq_6;}
  }else{
   {OBJ x69;OBJ x53;OBJ x71;OBJ x73;
    switch(TGPRD(x5)){
     case 3:
      HLT("DeclEntry at <unknown> : undefined selection fct\'DeclEntry:declE->fct");break;
     default: 
      {OBJ x58=FLD(x5,5);
       if(EXPRD(x5,1)){
	x69=x58;
	FLD(x5,5)=NIL;DSPRD(x5);
       }else{
	COPY(x58,1);
	x69=x58;
	FRPRD(x5,1);}
       CPCLS(__ANameTerm_72,1);}}
    x53=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x2);
    PRD(4,4,r.c2);FLD(r.c2,1)=x12;FLD(r.c2,2)=x4;FLD(r.c2,3)=__ASeq_6;
    {TUP2 t=_AAbsyFun3_4(x53,x3,x69);
     r.c1=t.c1;
     FLD(r.c2,4)=t.c2;}}}}
 return r;}
extern OBJ _ANameTerm_74_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* tNTDeclE */
{OBJ r;
 {TUP2 t=_ANameTerm_74(x1,x2,x3,x4,x5);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_75(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8) /* tNTImpDeclE */
{TUP2 r;
 CPPRD(x8,1);
 {OBJ x13;
  x13=_AImpExpEntry_11(x8);
  if(ISTGPRD(x8,0)){
   {
    if(EXPRD(x8,1)){
     RPRD(x8,r.c2);CHGTG(r.c2,3);FRPRD(FLD(r.c2,1),1);FLD(r.c2,1)=x13;FREE(FLD(r.c2,2),1);FLD(r.c2,2)=x6;FREE(FLD(r.c2,3),1);
    }else{
     DCPRD(x8,1);PRD(3,3,r.c2);FLD(r.c2,1)=x13;FLD(r.c2,2)=x6;}
    {TUP2 t=_ANameTerm_77(x1,x2,x3,x4,x5,x7);
     r.c1=t.c1;
     FLD(r.c2,3)=t.c2;}}
  }else{
   CPPRD(x1,1);
   COPY(x2,1);
   CPCLS(__ANameTerm_72,1);
   {OBJ x32;OBJ x33;TUP2 x34;
    x32=_AImpExpEntry_16(x8);
    x33=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x2);
    x34=_ANameTerm_77(x1,x2,x3,x4,x5,x7);
    PRD(4,4,r.c2);FLD(r.c2,1)=x13;FLD(r.c2,2)=x6;FLD(r.c2,3)=x34.c2;
    {TUP2 t=_AAbsyFun3_4(x33,x34.c1,x32);
     r.c1=t.c1;
     FLD(r.c2,4)=t.c2;}}}}
 return r;}
extern OBJ _ANameTerm_75_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8) /* tNTImpDeclE */
{OBJ r;
 {TUP2 t=_ANameTerm_75(x1,x2,x3,x4,x5,x6,x7,x8);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_76(register OBJ x1,register OBJ x2,register OBJ x3,register OBJ x4,register OBJ x5) /* selectFormParam */
{TUP2 r;
 for(;;){
  if(ISPRM(x3)){
   FRPRD(x2,1);
   r=_ANameTerm_63(x1,x4,x3);
  }else{
   if(ISPRD(x3)&&(ISTGPRD(x3,8)||ISTGPRD(x3,4))){
    {OBJ x214=FLD(x3,1);
     COPY(x214,1);
     FREE(x4,1);
     {OBJ x215;OBJ x216;
      ANat_4(x5,x215);
      x216=_ASeqIndex_2(x214,x215);
      r=_ANameTerm_72(x2,x3,x1,x216);}}
   }else{
    if(ISPRD(x3)&&(ISTGPRD(x3,9)||ISTGPRD(x3,3))){
     FRPRD(x2,1);
     r=_ANameTerm_63(x1,x4,x3);
    }else{
     if(ISPRD(x3)&&(ISTGPRD(x3,7))){
      {OBJ x221=FLD(x3,1);
       if(EXPRD(x3,1)){
	DSPRDF(x3);
       }else{
	COPY(x221,1);
	FRPRD(x3,1);}
       x3=x221;continue;}
     }else{
      if(ISPRD(x3)&&(ISTGPRD(x3,1))){
       {OBJ x224=FLD(x3,2);
	CPPRD(x224,1);
	{OBJ x226=FLD1(x1,1);
	 COPY(x226,1);
	 {OBJ x229;OBJ x230;
	  x229=_AName4SigAna_49(x226,x224);
	  x230=_ASeqIndex_2(x229,x5);
	  if(ISPRM(x230)){
	   FRPRD(x2,1);
	   r=_ANameTerm_65(x1,x4,x3);
	  }else{
	   {OBJ x231=FLD1(x230,1);OBJ x232=FLD1(x230,2);
	    if(EXPRD(x230,1)){
	     DSPRDF(x230);
	    }else{
	     CPPRD(x231,1);COPY(x232,1);
	     FRPRD(x230,1);}
	    if(ISPRM(x232)){
	     FREE(x4,1);
	     {OBJ x233=FLD1(x231,1);
	      if(EXPRD(x231,1)){
	       FLD1(x231,1)=NIL;DSPRD(x231);
	      }else{
	       COPY(x233,1);
	       FRPRD(x231,1);}
	      r=_ANameTerm_72(x2,x3,x1,x233);}
	    }else{
	     if(EXPRD(x232,1)){
	      DSPRD(x232);
	     }else{
	      DCPRD(x232,1);}
	     FRPRD(x2,1);
	     FRPRD(x231,1);
	     r=_ANameTerm_64(x1,x4,x3);}}}}}}
      }else{
       HLT("NameTerm at <345,5-19> : missing else in selectFormParam\'NameTerm:env**cycTest**instE**name**nat->env**nameTerm");}}}}}
  break;}
 return r;}
extern OBJ _ANameTerm_76_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* selectFormParam */
{OBJ r;
 {TUP2 t=_ANameTerm_76(x1,x2,x3,x4,x5);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_77(register OBJ x1,register OBJ x2,register OBJ x3,register OBJ x4,register OBJ x5,register OBJ x6) /* tNTInstE */
{TUP2 r;
 for(;;){
  if(ISPRM(x6)){
   FRPRD(x1,1);
   FREE(x2,1);
   FREE(x3,1);
   r.c1=x4;r.c2=__ASeq_6;
  }else{
   if(ISPRD(x6)&&(ISTGPRD(x6,8)||ISTGPRD(x6,4))){
    {OBJ x445=FLD(x6,1);
     if(EXPRD(x6,1)){
      FLD(x6,1)=NIL;DSPRD(x6);
     }else{
      COPY(x445,1);
      FRPRD(x6,1);}
     FREE(x3,1);
     CPCLS(__ANameTerm_72,1);
     {OBJ x446;
      x446=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x2);
      r=_ASeqMapEnv_4(x446,x4,x445);}}
   }else{
    if(ISPRD(x6)&&(ISTGPRD(x6,6))){
     {OBJ x447=FLD(x6,1);OBJ x448=FLD(x6,2);OBJ x449=FLD(x6,3);
      if(EXPRD(x6,1)){
       DSPRDF(x6);
      }else{
       COPY(x449,1);
       FRPRD(x6,1);}
      FREE(x2,1);
      FREE(x3,1);
      {OBJ x450=FLD1(x4,1);
       COPY(x450,1);
       CPCLS(__ANameTerm_72,1);
       {OBJ x452;OBJ x453;OBJ x454;
	x452=_AImpDecl4SigAna_42(x450,x447);
	x453=_ADArray_20(x452,x448);
	x454=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x453);
	r=_ASeqMapEnv_4(x454,x4,x449);}}}
    }else{
     if(ISPRD(x6)&&(ISTGPRD(x6,9))){
      if(EXPRD(x6,1)){
       FREE(FLD(x6,1),1);DSPRDF(x6);
      }else{
       DCPRD(x6,1);}
      FRPRD(x1,1);
      {OBJ x458=FLD1(x4,1);
       COPY(x458,1);
       CPCLS(__ANameTerm_103,1);
       {OBJ x460;OBJ x461;
	x460=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_103,2))(__ANameTerm_103,x2,x3);
	x461=_AImpDecl4SigAna_45(x458,x5);
	r=_ASeqMapEnv_4(x460,x4,x461);}}
     }else{
      if(ISPRD(x6)&&(ISTGPRD(x6,7))){
       {OBJ x462=FLD(x6,1);
	if(EXPRD(x6,1)){
	 DSPRDF(x6);
	}else{
	 COPY(x462,1);
	 FRPRD(x6,1);}
	x6=x462;continue;}
      }else{
       if(ISPRD(x6)&&(ISTGPRD(x6,5))){
	{OBJ x466=FLD(x6,3);
	 if(EXPRD(x6,1)){
	  FREE(FLD(x6,1),1);DSPRDF(x6);
	 }else{
	  COPY(x466,1);
	  FRPRD(x6,1);}
	 FREE(x3,1);
	 CPCLS(__ANameTerm_72,1);
	 {OBJ x467;
	  x467=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x2);
	  r=_ASeqMapEnv_4(x467,x4,x466);}}
       }else{
	if(ISPRD(x6)&&(ISTGPRD(x6,1))){
	 {OBJ x469=FLD(x6,2);
	  if(EXPRD(x6,1)){
	   FREE(FLD(x6,1),1);DSPRDF(x6);
	  }else{
	   CPPRD(x469,1);
	   FRPRD(x6,1);}
	  {OBJ x471=FLD1(x4,1);
	   COPY(x471,2);
	   {OBJ x474;
	    x474=_AName4SigAna_49(x471,x469);
	    if(ISPRM(x474)){
	     FRPRD(x1,1);
	     CPCLS(__ANameTerm_104,1);
	     {OBJ x476;TUP2 x479;
	      x476=_AImpDecl4SigAna_45(x471,x5);
	      r.c2=_ASeqMap_3(__ANameTerm_104,x476);
	      x479=_ANameTerm_65(x4,x3,x2);r.c1=x479.c1;
	      FREE(x479.c2,1);}
	    }else{
	     {OBJ x480=FLD1(x474,1);OBJ x481=FLD1(x474,2);
	      if(EXPRD(x474,1)){
	       DSPRDF(x474);
	      }else{
	       COPY(x480,1);COPY(x481,1);
	       FRPRD(x474,1);}
	      if(ISPRM(x481)){
	       FREE(x3,1);
	       FREE(x471,1);
	       CPCLS(__ANameTerm_72,1);
	       CPCLS(__APartNameEntry_12,1);
	       {OBJ x482;OBJ x483;
		x482=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_72,2))(__ANameTerm_72,x1,x2);
		x483=_ASeqMap_3(__APartNameEntry_12,x480);
		r=_ASeqMapEnv_4(x482,x4,x483);}
	      }else{
	       if(EXPRD(x481,1)){
		DSPRD(x481);
	       }else{
		DCPRD(x481,1);}
	       FRPRD(x1,1);
	       FREE(x480,1);
	       CPCLS(__ANameTerm_105,1);
	       {OBJ x487;TUP2 x490;
		x487=_AImpDecl4SigAna_45(x471,x5);
		r.c2=_ASeqMap_3(__ANameTerm_105,x487);
		x490=_ANameTerm_64(x4,x3,x2);r.c1=x490.c1;
		FREE(x490.c2,1);}}}}}}}
	}else{
	 if(ISPRD(x6)&&(ISTGPRD(x6,3))){
	  if(EXPRD(x6,1)){
	   FREE(FLD(x6,1),1);DSPRDF(x6);
	  }else{
	   DCPRD(x6,1);}
	  FRPRD(x1,1);
	  {OBJ x493=FLD1(x4,1);
	   COPY(x493,1);
	   CPCLS(__ANameTerm_106,1);
	   {OBJ x495;OBJ x496;
	    x495=_AImpDecl4SigAna_45(x493,x5);
	    x496=(*(OBJ(*)(OBJ,OBJ,OBJ))METHOD(__ANameTerm_106,2))(__ANameTerm_106,x2,x3);
	    r=_ASeqMapEnv_4(x496,x4,x495);}}
	 }else{
	  HLT("NameTerm at <380,5-12> : missing else in tNTInstE\'NameTerm:cycTest**instE**name->env**struct**instE->env**seq");}}}}}}}}
  break;}
 return r;}
extern OBJ _ANameTerm_77_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6) /* tNTInstE */
{OBJ r;
 {TUP2 t=_ANameTerm_77(x1,x2,x3,x4,x5,x6);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern TUP2 _ANameTerm_79(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9) /* equivInst */
{TUP2 r;
 if(ISTGPRM(x9,1)){
  FREE(x1,1);
  FRPRD(x2,1);
  FREE(x3,1);
  FREE(x5,1);
  FREE(x6,1);
  r.c1=x7;r.c2=x9;
 }else{
  COPY(x1,1);
  COPY(x7,1);
  COPY(__ANameTerm_61,1);
  CPPRD(__ANameTerm_107,1);
  {OBJ x10;OBJ x11;OBJ x12;OBJ x13;OBJ x23;OBJ x14;OBJ x15;OBJ x25;OBJ x26;OBJ x27;OBJ x28;
   x10=_ADEBUG_4(__ANameTerm_78,__ANameTerm_107,x4);
   x11=_AImpDecl4SigAna_42(x7,x4);
   PRD1(2,x12);FLD1(x12,1)=x7;FLD1(x12,2)=__ANameTerm_61;
   x13=_AName_11(x1);
   if(ISPRD(x5)&&(ISTGPRD(x5,0))){
    {OBJ x16=FLD(x5,1);
     if(EXPRD(x5,1)){
      FLD(x5,1)=NIL;DSPRD(x5);
     }else{
      COPY(x16,1);
      FRPRD(x5,1);}
     if(ISPRM(x16)){
      x23=__ABUILTIN_3;
     }else{
      if(EXPRD(x16,1)){
       DSPRD(x16);
      }else{
       DCPRD(x16,1);}
      x23=__ABUILTIN_5;}}
   }else{
    FREE(x5,1);
    x23=__ABUILTIN_3;}
   x14=_ADArray_20(x11,x8);
   PRDF(3,2,x15);FLD(x15,1)=x4;FLD(x15,2)=x13;FLD(x15,3)=x8;
   if(ISTGPRM(x23,1)){
    CPCLS(__ANameTerm_80,1);
    x25=__ABUILTIN_3;
   }else{
    CPCLS(__ANameTerm_80,1);
    x25=__ABUILTIN_5;}
   {TUP2 t=_ANameTerm_77(x2,x3,__AName_29,x12,x10,x14);
    x26=t.c1;
    x27=t.c2;}
   COPY(x27,1);
   x28=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_80,1))(__ANameTerm_80,x27);
   {OBJ x29=FLD1(x26,1);
    if(EXPRD(x26,1)){
     FREE(FLD1(x26,2),1);DSPRDF(x26);
    }else{
     COPY(x29,1);
     FRPRD(x26,1);}
    CPPRD(__ANameTerm_108,1);
    {OBJ x31;OBJ x32;OBJ x33;OBJ x34;
     x31=x29;
     x32=_ADEBUG_2(__ANameTerm_78,x28,x27);
     x33=_ADEBUG_4(__ANameTerm_78,__ANameTerm_108,x32);
     if(ISTGPRM(x25,1)){
      COPY(x6,1);
      COPY(x33,1);
      CPCLS(__ANameTerm_2,1);
      x34=_ASeqCompare_3(__ANameTerm_2,x6,x33);
     }else{
      x34=__ABUILTIN_3;}
     if(ISTGPRM(x34,1)){
      FREE(x6,1);
      FREE(x33,1);
      if(ISPRD(x1)&&(ISTGPRD(x1,2))){
       {OBJ x37=FLD(x1,3);
	if(EXPRD(x1,1)){
	 DSPRDF(x1);
	}else{
	 FRPRD(x1,1);}
	{OBJ x38;
	 x38=x37;
	 r.c1=_AImpDecl4SigAna_30(x31,x15,x38);
	 r.c2=__ABUILTIN_5;}}
      }else{
       HLT("Name at <unknown> : undefined selection inst\'Name:name->inst");}
     }else{
      CPCLS(__ANameTerm_60,1);
      {OBJ x40;
       x40=_ASeqCompare_3(__ANameTerm_60,x6,x33);
       if(ISTGPRM(x40,1)){
	if(ISPRD(x1)&&(ISTGPRD(x1,2))){
	 {OBJ x43=FLD(x1,3);
	  if(EXPRD(x1,1)){
	   DSPRDF(x1);
	  }else{
	   FRPRD(x1,1);}
	  {OBJ x44;OBJ x45;
	   x44=x43;
	   x45=_AImpDecl4SigAna_28(x31,x4,x44,x8);
	   r.c1=_AImpDecl4SigAna_30(x45,x15,x44);
	   r.c2=__ABUILTIN_5;}}
	}else{
	 HLT("Name at <unknown> : undefined selection inst\'Name:name->inst");}
       }else{
	r.c1=x31;
	FREE(x1,1);
	FREE(x15,1);
	r.c2=__ABUILTIN_3;}}}}}}}
 return r;}
extern OBJ _ANameTerm_79_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9) /* equivInst */
{OBJ r;
 {TUP2 t=_ANameTerm_79(x1,x2,x3,x4,x5,x6,x7,x8,x9);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern OBJ _ANameTerm_80(OBJ x1,OBJ x2) /* `,2 */
{OBJ r;
 CPCLS(__ANameTerm_100,1);
 {OBJ x3;
  x3=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_100,1))(__ANameTerm_100,__ABUILTIN_20);
  r=_ASeqConv_2(x3,x1);}
 return r;}

extern OBJ _ANameTerm_81(OBJ x1,OBJ x2,OBJ x3) /* `,3 */
{OBJ r;
 r=_ANameTerm_83(x1,x2);
 return r;}

extern OBJ _ANameTerm_83(OBJ x1,OBJ x2) /* `,4 */
{OBJ r;
 {OBJ x3;
  ANat_6(x1,x3);
  if(ISTGPRM(x3,1)){
   if(ISPRM(x2)){
    CPPRD(__ANameTerm_90,1);
    r=__ANameTerm_90;
   }else{
    switch(TGPRD(x2)){
     case 3:case 4:
      {OBJ x362=FLD(x2,1);OBJ x364=FLD(x2,3);
       if(EXPRD(x2,1)){
	FLD(x2,1)=NIL;FLD(x2,3)=NIL;DSPRD(x2);
       }else{
	CPPRD(x362,1);COPY(x364,1);
	FRPRD(x2,1);}
       {OBJ x366;
	x366=_ANameTerm_85(__ANat_5,x364);
	{OBJ x368=FLD1(x362,2);
	 if(EXPRD(x362,1)){
	  DSPRDF(x362);
	 }else{
	  CPPRD(x368,1);
	  FRPRD(x362,1);}
	 ADenotation_4(x368,x366,r);}}}break;
     case 0:
      {OBJ x379=FLD(x2,1);OBJ x380=FLD(x2,2);OBJ x381=FLD(x2,3);OBJ x382=FLD(x2,4);OBJ x383=FLD(x2,5);
       if(EXPRD(x2,1)){
	DSPRDF(x2);
       }else{
	COPY(x379,1);COPY(x380,1);COPY(x381,1);COPY(x382,1);COPY(x383,1);
	FRPRD(x2,1);}
       CPCLS(__ANameTerm_27,4);
       CPPRD(__ANameTerm_91,4);
       CPPRD(__ANameTerm_92,1);
       CPCLS(__AName_34,4);
       CPPRD(__ASeqConv_8,4);
       CPPRD(__ASetConv_11,4);
       CPPRD(__ASetConv_12,4);
       {OBJ x385;OBJ x386;OBJ x387;OBJ x388;OBJ x384;OBJ x389;OBJ x390;OBJ x391;OBJ x392;OBJ x393;OBJ x394;OBJ x395;OBJ x396;OBJ x397;OBJ x398;OBJ x399;OBJ x400;
	x385=_ASeqMap_3(__ANameTerm_27,x382);
	x386=_ASeqMap_3(__ANameTerm_27,x381);
	x387=_ASeqMap_3(__ANameTerm_27,x380);
	x388=_ASeqMap_3(__ANameTerm_27,x379);
	x384=_ANameTerm_83(x1,x383);
	x389=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x385);
	x390=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x386);
	x391=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x387);
	x392=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x388);
	ADenotation_4(__ANameTerm_91,x384,x393);
	ADenotation_4(x389,x393,x394);
	ADenotation_4(__ANameTerm_91,x394,x395);
	ADenotation_4(x390,x395,x396);
	ADenotation_4(__ANameTerm_91,x396,x397);
	ADenotation_4(x391,x397,x398);
	ADenotation_4(__ANameTerm_91,x398,x399);
	ADenotation_4(x392,x399,x400);
	ADenotation_4(__ANameTerm_92,x400,r);}}break;
     default: 
      {OBJ x356=FLD(x2,1);
       if(EXPRD(x2,1)){
	FRPRD(FLD(x2,2),1);DSPRDF(x2);
       }else{
	CPPRD(x356,1);
	FRPRD(x2,1);}
       {OBJ x360=FLD1(x356,2);
	if(EXPRD(x356,1)){
	 r=x360;
	 DSPRDF(x356);
	}else{
	 CPPRD(x360,1);
	 r=x360;
	 FRPRD(x356,1);}}}}}
  }else{
   {OBJ x401;
    ANat_3(x1,x401);
    if(ISTGPRM(x401,1)){
     if(ISPRM(x2)){
      CPPRD(__ANameTerm_90,1);
      r=__ANameTerm_90;
     }else{
      switch(TGPRD(x2)){
       case 3:
	{OBJ x769=FLD(x2,1);OBJ x770=FLD(x2,2);OBJ x771=FLD(x2,3);
	 if(EXPRD(x2,1)){
	  DSPRDF(x2);
	 }else{
	  CPPRD(x769,1);CPPRD(x770,1);COPY(x771,1);
	  FRPRD(x2,1);}
	 CPPRD(__ANameTerm_94,1);
	 {OBJ x773;OBJ x774;OBJ x775;
	  ANat_4(x1,x773);
	  ANat_2(x773,x774);
	  x775=_ANameTerm_84(x774,x769,x770,x771);
	  ADenotation_4(x775,__ANameTerm_94,r);}}break;
       case 4:
	{OBJ x776=FLD(x2,1);OBJ x777=FLD(x2,2);OBJ x778=FLD(x2,3);OBJ x779=FLD(x2,4);
	 if(EXPRD(x2,1)){
	  DSPRDF(x2);
	 }else{
	  CPPRD(x776,1);CPPRD(x777,1);COPY(x778,1);COPY(x779,1);
	  FRPRD(x2,1);}
	 CPCLS(__ANameTerm_83,1);
	 {OBJ x780;OBJ x781;OBJ x782;OBJ x783;OBJ x784;
	  ANat_4(x1,x780);
	  ANat_2(x780,x781);
	  x782=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_83,1))(__ANameTerm_83,x780);
	  x783=_ANameTerm_84(x781,x776,x777,x778);
	  x784=_AFct_45(x782,__ABUILTIN_3,x779);
	  ADenotation_4(x783,x784,r);}}break;
       case 0:
	{OBJ x785=FLD(x2,1);OBJ x786=FLD(x2,2);OBJ x787=FLD(x2,3);OBJ x788=FLD(x2,4);OBJ x789=FLD(x2,5);
	 if(EXPRD(x2,1)){
	  DSPRDF(x2);
	 }else{
	  COPY(x785,1);COPY(x786,1);COPY(x787,1);COPY(x788,1);COPY(x789,1);
	  FRPRD(x2,1);}
	 CPCLS(__ANameTerm_27,4);
	 CPPRD(__ANameTerm_91,4);
	 CPPRD(__ANameTerm_92,1);
	 CPCLS(__AName_34,4);
	 CPPRD(__ASeqConv_8,4);
	 CPPRD(__ASetConv_11,4);
	 CPPRD(__ASetConv_12,4);
	 {OBJ x791;OBJ x792;OBJ x793;OBJ x794;OBJ x790;OBJ x795;OBJ x796;OBJ x797;OBJ x798;OBJ x799;OBJ x800;OBJ x801;OBJ x802;OBJ x803;OBJ x804;OBJ x805;OBJ x806;
	  x791=_ASeqMap_3(__ANameTerm_27,x788);
	  x792=_ASeqMap_3(__ANameTerm_27,x787);
	  x793=_ASeqMap_3(__ANameTerm_27,x786);
	  x794=_ASeqMap_3(__ANameTerm_27,x785);
	  x790=_ANameTerm_83(x1,x789);
	  x795=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x791);
	  x796=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x792);
	  x797=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x793);
	  x798=_ASeqConv_3(__ASetConv_11,__ASeqConv_8,__ASetConv_12,__AName_34,x794);
	  ADenotation_4(__ANameTerm_91,x790,x799);
	  ADenotation_4(x795,x799,x800);
	  ADenotation_4(__ANameTerm_91,x800,x801);
	  ADenotation_4(x796,x801,x802);
	  ADenotation_4(__ANameTerm_91,x802,x803);
	  ADenotation_4(x797,x803,x804);
	  ADenotation_4(__ANameTerm_91,x804,x805);
	  ADenotation_4(x798,x805,x806);
	  ADenotation_4(__ANameTerm_92,x806,r);}}break;
       default: 
	{OBJ x759=FLD(x2,1);OBJ x760=FLD(x2,2);
	 if(EXPRD(x2,1)){
	  DSPRDF(x2);
	 }else{
	  CPPRD(x759,1);CPPRD(x760,1);
	  FRPRD(x2,1);}
	 {OBJ x763=FLD1(x759,2);
	  if(EXPRD(x759,1)){
	   DSPRDF(x759);
	  }else{
	   CPPRD(x763,1);
	   FRPRD(x759,1);}
	  {OBJ x766=FLD1(x760,2);
	   if(EXPRD(x760,1)){
	    DSPRDF(x760);
	   }else{
	    CPPRD(x766,1);
	    FRPRD(x760,1);}
	   CPPRD(__ANameTerm_93,1);
	   {OBJ x768;
	    ADenotation_4(__ANameTerm_93,x766,x768);
	    ADenotation_4(x763,x768,r);}}}}}}
    }else{
     HLT("NameTerm at <494,5> : missing else in `\'NameTerm:nat->nameTerm->denotation");}}}}
 return r;}

extern OBJ _ANameTerm_84(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* `,5 */
{OBJ r;
 {OBJ x13;
  ANat_4(x1,x13);
  {OBJ x19=FLD1(x2,2);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    CPPRD(x19,1);
    FRPRD(x2,1);}
   {OBJ x22=FLD1(x3,2);
    if(EXPRD(x3,1)){
     DSPRDF(x3);
    }else{
     CPPRD(x22,1);
     FRPRD(x3,1);}
    CPPRD(__ANameTerm_93,1);
    CPPRD(__ANameTerm_97,1);
    {OBJ x24;OBJ x25;OBJ x26;OBJ x27;OBJ x28;
     x24=x22;
     x25=_ANameTerm_85(x13,x4);
     ADenotation_4(x25,__ANameTerm_97,x26);
     ADenotation_4(x24,x26,x27);
     ADenotation_4(__ANameTerm_93,x27,x28);
     ADenotation_4(x19,x28,r);}}}}
 return r;}

extern OBJ _ANameTerm_85(OBJ x1,OBJ x2) /* `,6 */
{OBJ r;
 if(ISPRM(x2)){
  CPPRD(__ARep_187,1);
  r=__ARep_187;
 }else{
  CPCLS(__ANameTerm_83,1);
  CPPRD(__ANameTerm_95,1);
  CPPRD(__ANameTerm_96,1);
  CPPRD(__ASeqConv_8,1);
  {OBJ x9;
   x9=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_83,1))(__ANameTerm_83,x1);
   r=_ASeqConv_3(__ANameTerm_95,__ASeqConv_8,__ANameTerm_96,x9,x2);}}
 return r;}

extern TUP5 _ANameTerm_86(OBJ x1,OBJ x2,OBJ x3) /* `,7 */
{TUP5 r;
 if(ISPRD(x3)&&(ISTGPRD(x3,0))){
  {OBJ x73=FLD(x3,1);OBJ x74=FLD(x3,2);OBJ x75=FLD(x3,3);OBJ x76=FLD(x3,4);OBJ x77=FLD(x3,5);
   if(EXPRD(x3,1)){
    DSPRDF(x3);
   }else{
    COPY(x73,1);COPY(x74,1);COPY(x75,1);COPY(x76,1);COPY(x77,1);
    FRPRD(x3,1);}
   CPCLS(__ANameTerm_47,4);
   CPCLS(__ANameTerm_83,1);
   CPCLS(__ANameTerm_87,1);
   CPPRD(__ANameTerm_109,4);
   CPPRD(__ARep_187,8);
   {OBJ x78;OBJ x79;OBJ x80;OBJ x81;OBJ x82;OBJ x83;OBJ x85;OBJ x86;OBJ x87;OBJ x88;
    x78=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_87,1))(__ANameTerm_87,x1);
    CPCLS(x78,3);
    x79=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_83,1))(__ANameTerm_83,x2);
    CPCLS(x79,3);
    x80=_ASeqMap_3(x78,x73);
    x81=_ASeqMap_3(x78,x74);
    x82=_ASeqMap_3(x78,x75);
    x83=_ASeqMap_3(x78,x76);
    r.c5=_ANameTerm_83(x2,x77);
    x85=_ASeqMap_3(__ANameTerm_47,x80);
    x86=_ASeqMap_3(__ANameTerm_47,x81);
    x87=_ASeqMap_3(__ANameTerm_47,x82);
    x88=_ASeqMap_3(__ANameTerm_47,x83);
    r.c1=_ASeqConv_3(__ARep_187,__ANameTerm_109,__ARep_187,x79,x85);
    r.c2=_ASeqConv_3(__ARep_187,__ANameTerm_109,__ARep_187,x79,x86);
    r.c3=_ASeqConv_3(__ARep_187,__ANameTerm_109,__ARep_187,x79,x87);
    r.c4=_ASeqConv_3(__ARep_187,__ANameTerm_109,__ARep_187,x79,x88);}}
 }else{
  HLT("NameTerm at <527,5> : missing else in `\'NameTerm:globSig**nat**nameTerm->denotation**denotation**denotation**denotation**denotation");}
 return r;}
extern OBJ _ANameTerm_86_c(OBJ x1,OBJ x2,OBJ x3) /* `,7 */
{OBJ r;
 {TUP5 t=_ANameTerm_86(x1,x2,x3);
  PRD1(5,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;
  FLD1(r,3)=t.c3;
  FLD1(r,4)=t.c4;
  FLD1(r,5)=t.c5;}
 return r;}

extern OBJ _ANameTerm_87(OBJ x1,OBJ x2) /* toNameTerm,2 */
{OBJ r;
 COPY(__ANameTerm_61,1);
 {OBJ x9;
  PRD1(2,x9);FLD1(x9,1)=x1;FLD1(x9,2)=__ANameTerm_61;
  {OBJ x52=FLD1(x2,1);OBJ x53=FLD1(x2,2);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    COPY(x52,1);COPY(x53,1);
    FRPRD(x2,1);}
   CPPRD(__ANameTerm_54,1);
   {TUP2 x55;
    x55=_ANameTerm_72(__ANameTerm_54,x53,x9,x52);
    {OBJ x58=FLD1(x55.c1,2);
     if(EXPRD(x55.c1,1)){
      FREE(FLD1(x55.c1,1),1);DSPRDF(x55.c1);
     }else{
      COPY(x58,1);
      FRPRD(x55.c1,1);}
     if(ISPRD(x58)&&(ISTGPRD(x58,0))){
      {OBJ x59;OBJ x60;OBJ x61;OBJ x62;
       if(EXPRD(x58,1)){
	RPRD(x58,r);FREE(FLD(r,5),1);FLD(r,5)=x55.c2;
       }else{
	x59=FLD(x58,1);x60=FLD(x58,2);x61=FLD(x58,3);x62=FLD(x58,4);COPY(x59,1);COPY(x60,1);COPY(x61,1);COPY(x62,1);
	FRPRD(x58,1);PRD(5,0,r);FLD(r,1)=x59;FLD(r,2)=x60;FLD(r,3)=x61;FLD(r,4)=x62;FLD(r,5)=x55.c2;}}
     }else{
      HLT("NameTerm at <57,15-21> : undefined selection hiddenS\'NameTerm:nameTerm->set");}}}}}
 return r;}

extern OBJ _ANameTerm_88(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* checkIAS */
{OBJ r;
 FRPRD(x3,1);
 {OBJ x5;
  x5=_AName4SigAna_15(x1,x2);
  if(ISPRD(x5)&&(ISTGPRD(x5,2))){
   {OBJ x8=FLD(x5,3);
    if(EXPRD(x5,1)){
     DSPRDF(x5);
    }else{
     FRPRD(x5,1);}
    CPCLS(__ANameTerm_89,1);
    {OBJ x9;OBJ x10;OBJ x11;
     x9=x8;
     x10=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_89,1))(__ANameTerm_89,x9);
     x11=_ASeqFilter_2(x10,x4);
     if(ISPRM(x11)){
      r=__ABUILTIN_5;
     }else{
      if(EXPRD(x11,1)){
       FREE(FLD1(x11,2),1);DSPRDF(x11);
      }else{
       DCPRD(x11,1);}
      r=__ABUILTIN_3;}}}
  }else{
   HLT("Name at <unknown> : undefined selection inst\'Name:name->inst");}}
 return r;}

extern OBJ _ANameTerm_89(OBJ x1,OBJ x2) /* F1 */
{OBJ r;
 ANat_76(x1,x2,r);
 return r;}

extern OBJ _ANameTerm_99(OBJ x1) /* print'99 */
{OBJ r;
 CPPRD(__ANameTerm_98,1);
 r=_ADEBUG_10(__ANameTerm_98);
 return r;}

extern OBJ _ANameTerm_100(OBJ x1) /* `,2'100 */
{OBJ r;
 CPCLS(__ANameTerm_83,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ANameTerm_83,1))(__ANameTerm_83,__ANat_59);
 return r;}

extern OBJ _ANameTerm_102(OBJ x1,OBJ x2,OBJ x3) /* tNTName'102 */
{OBJ r;
 CPPRD(__ANameTerm_101,1);
 {OBJ x4;OBJ x5;OBJ x6;
  x4=_AImpExpEntry_135(x1);
  x5=_AName_34(x2);
  ADenotation_4(__ANameTerm_101,x4,x6);
  ADenotation_4(x5,x6,r);}
 return r;}

extern TUP2 _ANameTerm_103(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTInstE'103 */
{TUP2 r;
 FREE(x4,1);
 r=_ANameTerm_63(x3,x2,x1);
 return r;}
extern OBJ _ANameTerm_103_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTInstE'103 */
{OBJ r;
 {TUP2 t=_ANameTerm_103(x1,x2,x3,x4);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}

extern OBJ _ANameTerm_104(OBJ x1) /* tNTInstE'104 */
{OBJ r;
 FREE(x1,1);
 r=__ANameTerm_39;
 return r;}

extern OBJ _ANameTerm_105(OBJ x1) /* tNTInstE'105 */
{OBJ r;
 FREE(x1,1);
 r=__ANameTerm_39;
 return r;}

extern TUP2 _ANameTerm_106(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTInstE'106 */
{TUP2 r;
 FREE(x4,1);
 r=_ANameTerm_63(x3,x2,x1);
 return r;}
extern OBJ _ANameTerm_106_c(OBJ x1,OBJ x2,OBJ x3,OBJ x4) /* tNTInstE'106 */
{OBJ r;
 {TUP2 t=_ANameTerm_106(x1,x2,x3,x4);
  PRD1(2,r);
  FLD1(r,1)=t.c1;
  FLD1(r,2)=t.c2;}
 return r;}






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

static OBJ _mt_4_0_2(OBJ t,OBJ t1,OBJ t2) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,2);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 return r;}

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

static OBJ _mt_5_0_2(OBJ t,OBJ t1,OBJ t2) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,2);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 return r;}

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

static OBJ _mt_8_0_3(OBJ t,OBJ t1,OBJ t2,OBJ t3) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,3);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 FLDCLS(r,3)=t3;
 return r;}

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

static OBJ _mt_9_0_6(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,6);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 FLDCLS(r,3)=t3;
 FLDCLS(r,4)=t4;
 FLDCLS(r,5)=t5;
 FLDCLS(r,6)=t6;
 return r;}

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

init_ANameTerm()
{
 static int visited=0; if(visited) return; visited=1;
 init_APartName();
 init_ANatConv();
 init_ASeqIndex();
 init_ASeqFilter();
 init_AName();
 init_ASeqOfSeq();
 init_AGlobSig();
 init_ASeqConv();
 init_AObjects();
 init_ASeqCompare();
 init_AOcPos();
 init_ASeqMap();
 init_ANat();
 init_ASeqReduce();
 init_AChar();
 init_ASeqMapEnv();
 init_ASeq();
 init_ASetConv();
 init_AOption();
 init_ADenotation();
 init_ATable();
 init_ADEBUG();
 init_AUniqueTable();
 init_ADecl4SigAna();
 init_ADeclEntry();
 init_AName4SigAna();
 init_APartNameEntry();
 init_AImpDecl4SigAna();
 init_AImpExpEntry();
 init_AMaps4SigAna();
 init_AGlobSigImpl();
 init_AAbsyFun3();
 init_ARep();
 init_AMySeqFun3();
 init_APragma();
 init_AMySeqFun2();
 init_AImpl();
 init_AGlobSigToText();
 init_AGlobPragma();
 init_ACom();
 init_APair();
 init_AVoid();
 init_AMap();
 init_ARelCmp();
 init_ASet();
 init_AInt();
 init_AFct();
 init_AReal();
 init_ABitset();
 init_ASetByBST();
 init_APatterns();
 init_ABSTree();
 init_AAttributes();
 init_ATree();
 init_ADArray();
 init_ADArrayReduce();
 init_ANatMap();
 init_ALexem();
 init_AString();
 init_AArray();
 DEN("[",__ANameTerm_95);
 CLS(1,_ANameTerm_31,__ANameTerm_31);
 CLS(3,_ANameTerm_63_c,__ANameTerm_63);
 DEN("SORT",__ANameTerm_94);
 CLS(1,_ANameTerm_30,__ANameTerm_30);
 CLS(3,_ANameTerm_62_c,__ANameTerm_62);
 DEN("\'",__ANameTerm_93);
 CLS(1,_ANameTerm_29,__ANameTerm_29);
 DEN("Term ERROR\n",__ANameTerm_92);
 CLS(4,_ANameTerm_28,__ANameTerm_28);
 CLS(2,_ANameTerm_60,__ANameTerm_60);
 DEN("\n",__ANameTerm_91);
 CLS(1,_ANameTerm_27,__ANameTerm_27);
 DEN("\?",__ANameTerm_90);
 CLS(1,_ANameTerm_26,__ANameTerm_26);
 CLS(1,_ANameTerm_25,__ANameTerm_25);
 CLS(2,_ANameTerm_89,__ANameTerm_89);
 CLS(2,_ANameTerm_24,__ANameTerm_24);
 CLS(4,_ANameTerm_88,__ANameTerm_88);
 CLS(2,_ANameTerm_87,__ANameTerm_87);
 CLS(3,_ANameTerm_86_c,__ANameTerm_86);
 CLS(1,_ANameTerm_22,__ANameTerm_22);
 CLS(2,_ANameTerm_85,__ANameTerm_85);
 CLS(1,_ANameTerm_21,__ANameTerm_21);
 CLS(3,_ANameTerm_53,__ANameTerm_53);
 CLS(4,_ANameTerm_84,__ANameTerm_84);
 CLS(1,_ANameTerm_20,__ANameTerm_20);
 CLS(2,_ANameTerm_52,__ANameTerm_52);
 CLS(2,_ANameTerm_83,__ANameTerm_83);
 CLS(2,_ANameTerm_19,__ANameTerm_19);
 CLS(1,_ANameTerm_51,__ANameTerm_51);
 CLS(1,_ANameTerm_50,__ANameTerm_50);
 LCLS(3,_ANameTerm_81,__ANameTerm_81);
 CLS(1,_ANameTerm_17,__ANameTerm_17);
 CLS(1,_ANameTerm_49,__ANameTerm_49);
 LCLS(2,_ANameTerm_80,__ANameTerm_80);
 CLS(1,_ANameTerm_16,__ANameTerm_16);
 CLS(1,_ANameTerm_48,__ANameTerm_48);
 DEN("-ztoNameTermInst",__ANameTerm_111);
 CLS(9,_ANameTerm_79_c,__ANameTerm_79);
 CLS(1,_ANameTerm_15,__ANameTerm_15);
 CLS(1,_ANameTerm_47,__ANameTerm_47);
 DEN("-ztoNameTermName",__ANameTerm_110);
 CLS(2,_ANameTerm_14,__ANameTerm_14);
 DEN(" and ",__ANameTerm_109);
 CLS(5,_ANameTerm_45,__ANameTerm_45);
 CLS(6,_ANameTerm_77_c,__ANameTerm_77);
 DEN("eqInst - ENDE",__ANameTerm_108);
 CLS(2,_ANameTerm_12,__ANameTerm_12);
 CLS(5,_ANameTerm_76_c,__ANameTerm_76);
 DEN("eqInst - START",__ANameTerm_107);
 CLS(2,_ANameTerm_11_c,__ANameTerm_11);
 CLS(8,_ANameTerm_75_c,__ANameTerm_75);
 CLS(4,_ANameTerm_106_c,__ANameTerm_106);
 CLS(5,_ANameTerm_74_c,__ANameTerm_74);
 CLS(1,_ANameTerm_10,__ANameTerm_10);
 CLS(1,_ANameTerm_42,__ANameTerm_42);
 CLS(1,_ANameTerm_105,__ANameTerm_105);
 CLS(4,_ANameTerm_73_c,__ANameTerm_73);
 CLS(1,_ANameTerm_9,__ANameTerm_9);
 CLS(2,_ANameTerm_41,__ANameTerm_41);
 CLS(1,_ANameTerm_104,__ANameTerm_104);
 CLS(4,_ANameTerm_72_c,__ANameTerm_72);
 CLS(1,_ANameTerm_8,__ANameTerm_8);
 CLS(1,_ANameTerm_40,__ANameTerm_40);
 CLS(4,_ANameTerm_103_c,__ANameTerm_103);
 CLS(1,_ANameTerm_7,__ANameTerm_7);
 LCLS(3,_ANameTerm_102,__ANameTerm_102);
 CLS(1,_ANameTerm_6,__ANameTerm_6);
 CLS(2,_ANameTerm_70_c,__ANameTerm_70);
 DEN("  Kontext: ",__ANameTerm_101);
 CLS(1,_ANameTerm_5,__ANameTerm_5);
 LCLS(1,_ANameTerm_100,__ANameTerm_100);
 CLS(4,_ANameTerm_4_c,__ANameTerm_4);
 LCLS(1,_ANameTerm_99,__ANameTerm_99);
 CLS(2,_ANameTerm_67,__ANameTerm_67);
 CLS(2,_ANameTerm_3_c,__ANameTerm_3);
 CLS(1,_ANameTerm_35,__ANameTerm_35);
 DEN("-ztoNameTermTerm",__ANameTerm_98);
 CLS(1,_ANameTerm_66,__ANameTerm_66);
 CLS(2,_ANameTerm_2,__ANameTerm_2);
 CLS(3,_ANameTerm_34,__ANameTerm_34);
 DEN(":",__ANameTerm_97);
 CLS(1,_ANameTerm_33,__ANameTerm_33);
 CLS(3,_ANameTerm_65_c,__ANameTerm_65);
 DEN("]",__ANameTerm_96);
 CLS(1,_ANameTerm_32,__ANameTerm_32);
 CLS(3,_ANameTerm_64_c,__ANameTerm_64);
 MTH(1,0,2,_mt_1_0_2);LZYMTH(1,0,2,_mt_1_0_2);
 MTH(4,0,2,_mt_4_0_2);LZYMTH(4,0,2,_mt_4_0_2);
 MTH(4,2,2,_mt_4_2_2);LZYMTH(4,2,2,_mt_4_2_2);
 MTH(5,0,2,_mt_5_0_2);LZYMTH(5,0,2,_mt_5_0_2);
 MTH(5,2,3,_mt_5_2_3);LZYMTH(5,2,3,_mt_5_2_3);
 MTH(8,0,3,_mt_8_0_3);LZYMTH(8,0,3,_mt_8_0_3);
 MTH(8,3,5,_mt_8_3_5);LZYMTH(8,3,5,_mt_8_3_5);
 MTH(9,0,6,_mt_9_0_6);LZYMTH(9,0,6,_mt_9_0_6);
 MTH(9,6,3,_mt_9_6_3);LZYMTH(9,6,3,_mt_9_6_3);
 PRM1(__ANameTerm_39);
 PRD1F(2,__ANameTerm_54);FLD1(__ANameTerm_54,1)=__AObjects_29;FLD1(__ANameTerm_54,2)=__AObjects_30;
 PRDF(5,0,__ANameTerm_61);FLD(__ANameTerm_61,1)=__ASeq_6;FLD(__ANameTerm_61,2)=__ASeq_6;FLD(__ANameTerm_61,3)=__ASeq_6;FLD(__ANameTerm_61,4)=__ASeq_6;FLD(__ANameTerm_61,5)=__ANameTerm_39;
 CPPRD(__ANameTerm_110,1);
 __ANameTerm_71=_ADEBUG_10(__ANameTerm_110);
 CPPRD(__ANameTerm_111,1);
 __ANameTerm_78=_ADEBUG_10(__ANameTerm_111);}

