

#include "BUILTIN.h"
extern OBJ _ASeqZip_4(OBJ,OBJ,OBJ);extern OBJ __ASeqZip_4;

#include "Array.h"
extern OBJ _AOcOptions_7(OBJ);extern OBJ __AOcOptions_7;
extern OBJ _AOcOptions_8(OBJ);extern OBJ __AOcOptions_8;
extern OBJ _AOcOptions_9(OBJ);extern OBJ __AOcOptions_9;
extern OBJ _AOcOptions_10(OBJ);extern OBJ __AOcOptions_10;
extern OBJ _AOcOptions_14(OBJ,OBJ);extern OBJ __AOcOptions_14;
extern OBJ _AOcOptions_18(OBJ);extern OBJ __AOcOptions_18;
extern OBJ _AOcOptions_19(OBJ);extern OBJ __AOcOptions_19;
extern OBJ _AOcOptions_20(OBJ);extern OBJ __AOcOptions_20;
extern OBJ _AOcOptions_29(OBJ,OBJ);extern OBJ __AOcOptions_29;
extern OBJ _AOcOptions_30(OBJ,OBJ);extern OBJ __AOcOptions_30;
extern TUP2 _ADeclPrep_1(OBJ,OBJ);extern OBJ __ADeclPrep_1;
extern OBJ __ASeq_6;
extern OBJ _ASeq_14(OBJ,OBJ);extern OBJ __ASeq_14;
extern OBJ _ASeq_15(OBJ,OBJ,OBJ);extern OBJ __ASeq_15;
extern OBJ _ASeq_26(OBJ,OBJ);extern OBJ __ASeq_26;
extern OBJ _ASeq_52(OBJ,OBJ);extern OBJ __ASeq_52;
extern OBJ _AStructOwn_1(OBJ,OBJ,OBJ,OBJ,OBJ);extern OBJ __AStructOwn_1;
extern TUP2 _APair_8(OBJ);extern OBJ __APair_8;
extern OBJ _AGlobSigInitPass_1(OBJ,OBJ,OBJ,OBJ);extern OBJ __AGlobSigInitPass_1;
extern TUP2 _AGlobSigInitPass_2(OBJ,OBJ,OBJ);extern OBJ __AGlobSigInitPass_2;
extern OBJ _AGlobSigInitPass_3(OBJ,OBJ,OBJ);extern OBJ __AGlobSigInitPass_3;
extern OBJ _AGlobSigInitPass_4(OBJ,OBJ,OBJ);extern OBJ __AGlobSigInitPass_4;
extern OBJ _ACom_23(OBJ);extern OBJ __ACom_23;
extern OBJ _ACom_47(OBJ,OBJ);extern OBJ __ACom_47;

#include "Denotation.h"
extern OBJ __AGlobSig4SigAna_1;
extern OBJ _AGlobSig4SigAna_2(OBJ,OBJ,OBJ,OBJ,OBJ);extern OBJ __AGlobSig4SigAna_2;
extern OBJ _AGlobSig4SigAna_3(OBJ,OBJ);extern OBJ __AGlobSig4SigAna_3;
extern OBJ _AGlobSig4SigAna_4(OBJ,OBJ,OBJ,OBJ,OBJ);extern OBJ __AGlobSig4SigAna_4;
extern OBJ _AMap_16(OBJ,OBJ,OBJ);extern OBJ __AMap_16;
extern OBJ _AMap_31(OBJ,OBJ,OBJ,OBJ);extern OBJ __AMap_31;
extern OBJ __AOcExit_1;
extern OBJ __AOcExit_2;
extern OBJ _ARep_2(OBJ,OBJ);extern OBJ __ARep_2;
extern OBJ _ARep_24(OBJ,OBJ);extern OBJ __ARep_24;
extern OBJ _ARep_27(OBJ,OBJ);extern OBJ __ARep_27;
extern TUP2 _ARep_138(OBJ,OBJ,OBJ);extern OBJ __ARep_138;
extern OBJ _ABSTree_57(OBJ,OBJ,OBJ);extern OBJ __ABSTree_57;
extern OBJ _AName4SigAna_58(OBJ);extern OBJ __AName4SigAna_58;

#include "Nat.h"
extern OBJ __ATree_7;
extern TUP2 _APartNamePrep_3(OBJ,OBJ,OBJ);extern OBJ __APartNamePrep_3;

#include "Char.h"
extern OBJ __AInterOpal_27;
extern OBJ __AInterOpal_57;
extern OBJ __AInterOpal_298;
extern OBJ __AInterOpal_302;
extern OBJ _AInterOpal_314(OBJ,OBJ);extern OBJ __AInterOpal_314;
extern OBJ __AInterOpal_316;
extern OBJ __AOption_5;
extern OBJ _ABSTreeConv_7(OBJ,OBJ);extern OBJ __ABSTreeConv_7;
extern OBJ _AInterOpalAccess_14(OBJ);extern OBJ __AInterOpalAccess_14;
extern OBJ _AInterOpalModifier_2(OBJ);extern OBJ __AInterOpalModifier_2;
extern OBJ _AInterOpalModifier_5(OBJ);extern OBJ __AInterOpalModifier_5;
extern OBJ _AInterOpalModifier_6(OBJ);extern OBJ __AInterOpalModifier_6;
extern OBJ _AGlobSigToText_1(OBJ,OBJ);extern OBJ __AGlobSigToText_1;
extern OBJ __ASigAnaTexts_12;
extern OBJ __ASigAnaTexts_13;
extern OBJ __ASigAnaTexts_14;
extern OBJ __ASigAnaTexts_15;

#include "Real.h"
extern OBJ _ADEBUG_2(OBJ,OBJ,OBJ);extern OBJ __ADEBUG_2;
extern OBJ _AComCompose_5(OBJ,OBJ);extern OBJ __AComCompose_5;

#include "Int.h"
extern OBJ _AOcBinStream_4(OBJ,OBJ,OBJ);extern OBJ __AOcBinStream_4;
extern OBJ _AOcPos_20(OBJ);extern OBJ __AOcPos_20;
extern OBJ _AOcPos_21(OBJ);extern OBJ __AOcPos_21;
extern OBJ _AOcPos_24(OBJ);extern OBJ __AOcPos_24;
extern OBJ _AOcPos_25(OBJ);extern OBJ __AOcPos_25;
extern OBJ __AOcPos_35;
extern OBJ __AOcError_8;
extern OBJ __AOcError_10;
extern OBJ __AOcError_12;
extern OBJ __AOcError_15;
extern OBJ _AOcError_17(OBJ,OBJ,OBJ,OBJ);extern OBJ __AOcError_17;
extern OBJ _AOcError_21(OBJ,OBJ);extern OBJ __AOcError_21;
extern OBJ _AOcError_25(OBJ,OBJ);extern OBJ __AOcError_25;

#include "Bitset.h"
extern OBJ _ASeqMap_3(OBJ,OBJ);extern OBJ __ASeqMap_3;
extern TUP2 _ASeqMapEnv_4(OBJ,OBJ,OBJ);extern OBJ __ASeqMapEnv_4;
extern OBJ _ASeqReduce_4(OBJ,OBJ,OBJ);extern OBJ __ASeqReduce_4;
extern OBJ _AGlobSigInit_1(OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_1; /* globSigInit */
extern OBJ _AGlobSigInit_2(OBJ,OBJ);OBJ __AGlobSigInit_2; /* less */
extern OBJ _AGlobSigInit_3(OBJ,OBJ);OBJ __AGlobSigInit_3; /* insert */
extern OBJ _AGlobSigInit_5(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_5; /* globSigInit3 */
extern OBJ _AGlobSigInit_6(OBJ);OBJ __AGlobSigInit_6; /* toPos */
extern TUP5 _AGlobSigInit_7(OBJ);OBJ __AGlobSigInit_7; /* getPreDefReps */
extern OBJ _AGlobSigInit_8(OBJ,OBJ);OBJ __AGlobSigInit_8; /* defStructHead */
extern OBJ _AGlobSigInit_9(OBJ,OBJ);OBJ __AGlobSigInit_9; /* extStructHead */
extern OBJ _AGlobSigInit_10(OBJ,OBJ);OBJ __AGlobSigInit_10; /* +++ */
extern OBJ _AGlobSigInit_11(OBJ,OBJ,OBJ);OBJ __AGlobSigInit_11; /* PRINT */
extern OBJ _AGlobSigInit_12(OBJ);OBJ __AGlobSigInit_12; /* readOwnImport */
extern OBJ _AGlobSigInit_13(OBJ,OBJ,OBJ);OBJ __AGlobSigInit_13; /* readImportList */
extern OBJ _AGlobSigInit_14(OBJ,OBJ);OBJ __AGlobSigInit_14; /* mergeImportList */
extern OBJ _AGlobSigInit_15(OBJ,OBJ);OBJ __AGlobSigInit_15; /* checkDirectCyclicImports */
extern OBJ _AGlobSigInit_16(OBJ,OBJ,OBJ);OBJ __AGlobSigInit_16; /* readImports */
extern OBJ _AGlobSigInit_17(OBJ,OBJ);OBJ __AGlobSigInit_17; /* setPos */
extern OBJ _AGlobSigInit_18(OBJ,OBJ);OBJ __AGlobSigInit_18; /* setPos,1 */
extern OBJ _AGlobSigInit_19(OBJ,OBJ);OBJ __AGlobSigInit_19; /* setPos,2 */
extern OBJ _AGlobSigInit_20(OBJ);OBJ __AGlobSigInit_20; /* @ */
extern OBJ _AGlobSigInit_21(OBJ,OBJ);OBJ __AGlobSigInit_21; /* checkInstantiation */
extern OBJ _AGlobSigInit_22(OBJ,OBJ,OBJ);OBJ __AGlobSigInit_22; /* checkSingleInstantiation */
OBJ __AGlobSigInit_23; /* nofile */
extern OBJ _AGlobSigInit_24(OBJ,OBJ);OBJ __AGlobSigInit_24; /* checkFormImplParams */
extern OBJ _AGlobSigInit_25(OBJ);OBJ __AGlobSigInit_25; /* defStructHead'25 */
extern OBJ _AGlobSigInit_26(OBJ);OBJ __AGlobSigInit_26; /* extStructHead'26 */
OBJ __AGlobSigInit_27; /* checkSingleInstantiation'27 */
OBJ __AGlobSigInit_28; /* checkSingleInstantiation'28 */
OBJ __AGlobSigInit_29; /* checkSingleInstantiation'29 */
OBJ __AGlobSigInit_30; /* globSigInit3'30 */
extern OBJ _AGlobSigInit_31(OBJ);OBJ __AGlobSigInit_31; /* globSigInit3'31 */
OBJ __AGlobSigInit_32; /* globSigInit3'32 */
extern OBJ _AGlobSigInit_33(OBJ,OBJ,OBJ);OBJ __AGlobSigInit_33; /* globSigInit3'33 */
extern OBJ _AGlobSigInit_34(OBJ,OBJ);OBJ __AGlobSigInit_34; /* globSigInit3'34 */
OBJ __AGlobSigInit_35; /* globSigInit3'35 */
OBJ __AGlobSigInit_36; /* globSigInit3'36 */
OBJ __AGlobSigInit_37; /* globSigInit3'37 */
OBJ __AGlobSigInit_38; /* globSigInit3'38 */
OBJ __AGlobSigInit_39; /* globSigInit3'39 */
OBJ __AGlobSigInit_40; /* globSigInit3'40 */
extern OBJ _AGlobSigInit_41(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_41; /* globSigInit3'41 */
extern OBJ _AGlobSigInit_42(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_42; /* readImportList'42 */
OBJ __AGlobSigInit_43; /* readOwnImport'43 */
OBJ __AGlobSigInit_44; /* readOwnImport'44 */
extern OBJ _AGlobSigInit_45(OBJ);OBJ __AGlobSigInit_45; /* readOwnImport'45 */
extern OBJ _AGlobSigInit_46(OBJ,OBJ);OBJ __AGlobSigInit_46; /* readOwnImport'46 */
OBJ __AGlobSigInit_47; /* readOwnImport'47 */
extern OBJ _AGlobSigInit_48(OBJ);OBJ __AGlobSigInit_48; /* readOwnImport'48 */
extern OBJ _AGlobSigInit_49(OBJ,OBJ);OBJ __AGlobSigInit_49; /* readOwnImport'49 */
OBJ __AGlobSigInit_50; /* checkDirectCyclicImports'50 */
OBJ __AGlobSigInit_51; /* readImports'51 */
OBJ __AGlobSigInit_52; /* readImports'52 */
extern OBJ _AGlobSigInit_53(OBJ);OBJ __AGlobSigInit_53; /* readImports'53 */
extern OBJ _AGlobSigInit_54(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_54; /* readImports'54 */
extern OBJ _AGlobSigInit_55(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_55; /* readImports'55 */
OBJ __AGlobSigInit_56; /* checkFormImplParams'56 */
OBJ __AGlobSigInit_57; /* globSigInit'57 */
extern OBJ _AGlobSigInit_58(OBJ);OBJ __AGlobSigInit_58; /* globSigInit'58 */
extern OBJ _AGlobSigInit_59(OBJ);OBJ __AGlobSigInit_59; /* globSigInit'59 */
OBJ __AGlobSigInit_60; /* globSigInit'60 */
extern OBJ _AGlobSigInit_61(OBJ);OBJ __AGlobSigInit_61; /* globSigInit'61 */
OBJ __AGlobSigInit_62; /* globSigInit'62 */
extern OBJ _AGlobSigInit_63(OBJ);OBJ __AGlobSigInit_63; /* globSigInit'63 */
extern OBJ _AGlobSigInit_64(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_64; /* globSigInit'64 */
extern OBJ _AGlobSigInit_65(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_65; /* globSigInit'65 */
extern OBJ _AGlobSigInit_66(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_66; /* globSigInit'66 */
extern OBJ _AGlobSigInit_67(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_67; /* globSigInit'67 */
extern OBJ _AGlobSigInit_68(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_68; /* globSigInit'68 */
extern OBJ _AGlobSigInit_69(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ);OBJ __AGlobSigInit_69; /* globSigInit'69 */

extern OBJ _AGlobSigInit_1(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5) /* globSigInit */
{OBJ r;
 CPPRD(x4,1);
 {OBJ x12;
  x12=_AGlobSigInit_12(x4);
  {OBJ x14=FLD1(x5,1);OBJ x15=FLD1(x5,2);
   if(EXPRD(x5,1)){
    DSPRDF(x5);
   }else{
    COPY(x14,1);CPPRD(x15,1);
    FRPRD(x5,1);}
   CPCLS(__AGlobSigInit_69,1);
   {OBJ x16;
    x16=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_69,6))(__AGlobSigInit_69,x1,x2,x3,x4,x14,x15);
    r=_AComCompose_5(x12,x16);}}}
 return r;}

extern OBJ _AGlobSigInit_2(OBJ x1,OBJ x2) /* less */
{OBJ r;
 {OBJ x15=FLD1(x1,1);
  if(EXPRD(x1,1)){
   FREE(FLD1(x1,2),1);DSPRDF(x1);
  }else{
   CPPRD(x15,1);
   FRPRD(x1,1);}
  {OBJ x23=FLD1(x2,1);
   if(EXPRD(x2,1)){
    FREE(FLD1(x2,2),1);DSPRDF(x2);
   }else{
    CPPRD(x23,1);
    FRPRD(x2,1);}
   r=_ARep_27(x15,x23);}}
 return r;}

extern OBJ _AGlobSigInit_3(register OBJ x1,register OBJ x2) /* insert */
{OBJ r;
 for(;;){
  if(ISPRM(x2)){
   r=x1;
  }else{
   {OBJ x23=FLD1(x2,1);OBJ x24=FLD1(x2,2);
    if(EXPRD(x2,1)){
     DSPRDF(x2);
    }else{
     CPPRD(x23,1);COPY(x24,1);
     FRPRD(x2,1);}
    {TUP2 x27;
     x27=_ARep_138(x1,x23,__ABUILTIN_3);
     FRPRD(x27.c2,1);
     x1=x27.c1;x2=x24;continue;}}}
  break;}
 return r;}

extern OBJ _AGlobSigInit_5(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7) /* globSigInit3 */
{OBJ r;
 CPCLS(__AGlobSigInit_41,1);
 CPPRD(x1,2);
 COPY(x7,1);
 {OBJ x8;OBJ x9;OBJ x10;
  x8=_AGlobSigInit_21(x1,x7);
  x9=_AOcError_25(x1,x8);
  x10=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_41,7))(__AGlobSigInit_41,x1,x2,x3,x4,x5,x6,x7);
  r=_AComCompose_5(x9,x10);}
 return r;}

extern OBJ _AGlobSigInit_6(OBJ x1) /* toPos */
{OBJ r;
 {OBJ x4;
  if(ISPRM(x1)){
   HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");
  }else{
   {OBJ x2=FLD1(x1,1);
    if(EXPRD(x1,1)){
     x4=x2;
     FREE(FLD1(x1,2),1);DSPRDF(x1);
    }else{
     CPPRD(x2,1);
     x4=x2;
     FRPRD(x1,1);}}}
  {OBJ x16=FLD1(x4,1);
   if(EXPRD(x4,1)){
    DSPRDF(x4);
   }else{
    CPPRD(x16,1);
    FRPRD(x4,1);}
   {OBJ x21;
    {OBJ x18=FLD(x16,1);
     if(EXPRD(x16,1)){
      x21=x18;
      FLD(x16,1)=NIL;DSPRD(x16);
     }else{
      COPY(x18,1);
      x21=x18;
      FRPRD(x16,1);}}
    if(ISPRM(x21)){
     HLT("Struct at <unknown> : undefined selection pos\'Struct:origin->pos");
    }else{
     {OBJ x23=FLD1(x21,2);
      if(EXPRD(x21,1)){
       r=x23;
       FLD1(x21,2)=NIL;DSPRD(x21);
      }else{
       COPY(x23,1);
       r=x23;
       FRPRD(x21,1);}}}}}}
 return r;}

extern TUP5 _AGlobSigInit_7(OBJ x1) /* getPreDefReps */
{TUP5 r;
 CPPRD(__ASigAnaTexts_12,1);
 CPPRD(__ASigAnaTexts_13,1);
 CPPRD(__ASigAnaTexts_14,1);
 CPPRD(__ASigAnaTexts_15,1);
 {TUP2 x3;TUP2 x6;TUP2 x9;
  x3=_ARep_138(x1,__ASigAnaTexts_12,__ABUILTIN_3);r.c1=x3.c2;
  x6=_ARep_138(x3.c1,__ASigAnaTexts_13,__ABUILTIN_3);r.c2=x6.c2;
  x9=_ARep_138(x6.c1,__ASigAnaTexts_14,__ABUILTIN_3);r.c3=x9.c2;
  {TUP2 t=_ARep_138(x9.c1,__ASigAnaTexts_15,__ABUILTIN_3);
   r.c5=t.c1;
   r.c4=t.c2;}}
 return r;}
extern OBJ _AGlobSigInit_7_c(OBJ x1) /* getPreDefReps */
{OBJ r;
 {TUP5 t=_AGlobSigInit_7(x1);
  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 _AGlobSigInit_8(OBJ x1,OBJ x2) /* defStructHead */
{OBJ r;
 CPCLS(__AGlobSigInit_25,1);
 {OBJ x3;OBJ x23;OBJ x18;OBJ x13;OBJ x8;OBJ x25;OBJ x26;OBJ x27;
  x3=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_25,1))(__AGlobSigInit_25,__ABUILTIN_20);
  if(ISPRM(x2)){
   HLT("Struct at <unknown> : undefined selection pragma\'Struct:origin->pragma");
  }else{
   {OBJ x32=FLD1(x2,1);OBJ x33=FLD1(x2,2);OBJ x34=FLD1(x2,3);OBJ x35=FLD1(x2,4);
    if(EXPRD(x2,1)){
     x13=x32;x18=x33;x8=x34;x23=x35;
     DSPRDF(x2);
    }else{
     CPPRD(x32,1);COPY(x33,1);COPY(x34,1);COPY(x35,1);
     x13=x32;x18=x33;x8=x34;x23=x35;
     FRPRD(x2,1);}
    CPCLS(__AGlobSigInit_10,1);}}
  COPY(x8,1);
  {TUP2 t=_ASeqMapEnv_4(x3,x1,x8);
   x25=t.c1;
   x26=t.c2;}
  x27=_ASeqZip_4(__AGlobSigInit_10,x26,x8);
  r=_AGlobSig4SigAna_2(x25,x13,x18,x23,x27);}
 return r;}

extern OBJ _AGlobSigInit_9(OBJ x1,OBJ x2) /* extStructHead */
{OBJ r;
 {OBJ x8;OBJ x3;OBJ x10;OBJ x11;OBJ x12;
  if(ISPRM(x2)){
   HLT("Struct at <unknown> : undefined selection paramS\'Struct:origin->seq");
  }else{
   {OBJ x6=FLD1(x2,3);
    if(EXPRD(x2,1)){
     x8=x6;
     FLD1(x2,3)=NIL;DSPRD(x2);
    }else{
     COPY(x6,1);
     x8=x6;
     FRPRD(x2,1);}
    CPCLS(__AGlobSigInit_10,1);
    CPCLS(__AGlobSigInit_26,1);}}
  COPY(x8,1);
  x3=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_26,1))(__AGlobSigInit_26,__ABUILTIN_20);
  {TUP2 t=_ASeqMapEnv_4(x3,x1,x8);
   x10=t.c1;
   x11=t.c2;}
  x12=_ASeqZip_4(__AGlobSigInit_10,x11,x8);
  r=_AGlobSig4SigAna_3(x10,x12);}
 return r;}

extern OBJ _AGlobSigInit_10(OBJ x1,OBJ x2) /* +++ */
{OBJ r;
 {OBJ x11;OBJ x3;OBJ x12;
  if(ISPRM(x2)){
   HLT("PartName at <unknown> : undefined selection pragma\'PartName:partName->pragma");
  }else{
   {OBJ x9=FLD1(x2,6);
    COPY(x9,1);
    x11=x9;}}
  x3=_AName4SigAna_58(x2);
  PRD1(2,x12);FLD1(x12,1)=x1;FLD1(x12,2)=x3;
  PRD1(2,r);FLD1(r,1)=x12;FLD1(r,2)=x11;}
 return r;}

extern OBJ _AGlobSigInit_11(OBJ x1,OBJ x2,OBJ x3) /* PRINT */
{OBJ r;
 CPCLS(__AGlobSigToText_1,1);
 COPY(x3,1);
 {OBJ x4;OBJ x5;
  x4=_AOcOptions_14(x2,x1);
  x5=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigToText_1,1))(__AGlobSigToText_1,x3);
  r=_ADEBUG_2(x4,x5,x3);}
 return r;}

extern OBJ _AGlobSigInit_12(OBJ x1) /* readOwnImport */
{OBJ r;
 CPPRD(x1,1);
 {OBJ x2;
  x2=_AOcOptions_7(x1);
  if(ISTGPRM(x2,1)){
   FRPRD(x1,1);
   CPCLS(__AGlobSigInit_45,1);
   {OBJ x3;
    x3=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_45,1))(__AGlobSigInit_45,__ABUILTIN_20);
    PRD(2,0,r);FLD(r,1)=x3;FLD(r,2)=__ASeq_6;}
  }else{
   CPPRD(x1,1);
   {OBJ x4;OBJ x5;
    x4=_AOcOptions_8(x1);
    if(ISTGPRM(x4,1)){
     x5=__ABUILTIN_5;
    }else{
     CPPRD(x1,1);
     x5=_AOcOptions_9(x1);}
    if(ISTGPRM(x5,1)){
     CPPRD(x1,1);
     CPCLS(__AGlobSigInit_46,1);
     CPPRD(__AInterOpal_316,1);
     {OBJ x6;OBJ x7;OBJ x8;
      x6=_AOcOptions_18(x1);
      CPPRD(x6,1);
      x7=_AOcBinStream_4(x1,x6,__AInterOpal_316);
      x8=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_46,1))(__AGlobSigInit_46,x6);
      r=_AComCompose_5(x7,x8);}
    }else{
     CPPRD(x1,1);
     {OBJ x9;
      x9=_AOcOptions_10(x1);
      if(ISTGPRM(x9,1)){
       CPPRD(x1,2);
       CPCLS(__AGlobSigInit_49,1);
       CPPRD(__AInterOpal_316,1);
       {OBJ x10;OBJ x11;OBJ x12;
	x10=_AOcOptions_20(x1);
	x11=_AOcBinStream_4(x1,x10,__AInterOpal_316);
	x12=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_49,1))(__AGlobSigInit_49,x1);
	r=_AComCompose_5(x11,x12);}
      }else{
       HLT("GlobSigInit at <281,7-290,70> : missing else in readOwnImport\'GlobSigInit:options->com");}}}}}}
 return r;}

extern OBJ _AGlobSigInit_13(OBJ x1,OBJ x2,OBJ x3) /* readImportList */
{OBJ r;
 if(ISPRM(x2)){
  FRPRD(x1,1);
  CPCLS(__ACom_47,1);
  {OBJ x41;OBJ x42;
   PRD(1,0,x41);FLD(x41,1)=x3;
   x42=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x41);
   PRD(2,0,r);FLD(r,1)=x42;FLD(r,2)=__ASeq_6;}
 }else{
  {OBJ x43=FLD1(x2,1);OBJ x44=FLD1(x2,2);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    CPPRD(x43,1);COPY(x44,1);
    FRPRD(x2,1);}
   {OBJ x45=FLD1(x3,1);OBJ x46=FLD1(x3,2);
    if(EXPRD(x3,1)){
     DSPRDF(x3);
    }else{
     CPPRD(x45,1);COPY(x46,1);
     FRPRD(x3,1);}
    CPPRD(x1,1);
    CPPRD(x43,1);
    CPCLS(__AGlobSigInit_42,1);
    CPPRD(__AInterOpal_316,1);
    {OBJ x48;OBJ x49;
     x48=_AOcBinStream_4(x1,x43,__AInterOpal_316);
     x49=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_42,5))(__AGlobSigInit_42,x1,x43,x44,x45,x46);
     r=_AComCompose_5(x48,x49);}}}}
 return r;}

extern OBJ _AGlobSigInit_14(OBJ x1,OBJ x2) /* mergeImportList */
{OBJ r;
 FRPRD(x1,1);
 {OBJ x19=FLD1(x2,1);OBJ x20=FLD1(x2,2);FLAG x_x2=EXPRD(x2,1);
  if(x_x2){
   COPY(x20,1);
  }else{
   CPPRD(x19,1);COPY(x20,2);}
  {OBJ x21;OBJ x22;
   x21=_ASeq_52(x20,__ANat_5);
   ANat_76(x21,__ANat_10,x22);
   if(ISTGPRM(x22,1)){
    FRPRD(x19,1);
    {OBJ x25;OBJ x26;OBJ x27;
     if(ISPRM(x20)){
      HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");
     }else{
      {OBJ x23=FLD1(x20,1);
       if(EXPRD(x20,1)){
	x25=x23;
	FREE(FLD1(x20,2),1);DSPRDF(x20);
       }else{
	CPPRD(x23,1);
	x25=x23;
	FRPRD(x20,1);}
       CPPRD(__AOcError_15,1);}}
     PRD1(1,x26);FLD1(x26,1)=x25;
     if(x_x2){
      RSOME(x2,x27);FLD1(x27,1)=__AOcError_15;FLD1(x27,2)=x26;
     }else{
      FRPRD(x2,1);PRD1(2,x27);FLD1(x27,1)=__AOcError_15;FLD1(x27,2)=x26;}
     r=_ACom_23(x27);}
   }else{
    FREE(x20,1);
    CPCLS(__ACom_47,1);
    {OBJ x28;OBJ x29;OBJ x30;
     if(x_x2){
      RSOME(x2,x28);FLD1(x28,2)=__AOption_5;
     }else{
      FRPRD(x2,1);PRD1(2,x28);FLD1(x28,1)=x19;FLD1(x28,2)=__AOption_5;}
     PRD(1,0,x29);FLD(x29,1)=x28;
     x30=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x29);
     PRD(2,0,r);FLD(r,1)=x30;FLD(r,2)=__ASeq_6;}}}}
 return r;}

extern OBJ _AGlobSigInit_15(OBJ x1,OBJ x2) /* checkDirectCyclicImports */
{OBJ r;
 if(ISPRM(x2)){
  FRPRD(x1,1);
  CPPRD(__AOcError_15,1);
  r=__AOcError_15;
 }else{
  {OBJ x84=FLD1(x2,1);OBJ x85=FLD1(x2,2);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    COPY(x84,1);COPY(x85,1);
    FRPRD(x2,1);}
   {OBJ x90;OBJ x87;
    if(ISPRM(x84)){
     HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");
    }else{
     {OBJ x88=FLD1(x84,1);
      if(EXPRD(x84,1)){
       x90=x88;
       FREE(FLD1(x84,2),1);DSPRDF(x84);
      }else{
       CPPRD(x88,1);
       x90=x88;
       FRPRD(x84,1);}
      CPPRD(x1,1);}}
    x87=_AGlobSigInit_15(x1,x85);
    {OBJ x91=FLD1(x90,1);
     if(EXPRD(x90,1)){
      DSPRDF(x90);
     }else{
      CPPRD(x91,1);
      FRPRD(x90,1);}
     {OBJ x96;
      {OBJ x93=FLD(x91,1);
       if(EXPRD(x91,1)){
	x96=x93;
	FLD(x91,1)=NIL;DSPRD(x91);
       }else{
	COPY(x93,1);
	x96=x93;
	FRPRD(x91,1);}}
      if(ISPRM(x96)){
       HLT("Struct at <unknown> : undefined selection structIde\'Struct:origin->rep");
      }else{
       {OBJ x97=FLD1(x96,1);OBJ x98=FLD1(x96,2);
	if(EXPRD(x96,1)){
	 FLD1(x96,1)=NIL;FLD1(x96,2)=NIL;DSPRD(x96);
	}else{
	 CPPRD(x97,1);COPY(x98,1);
	 FRPRD(x96,1);}
	CPPRD(x1,1);
	{OBJ x102;OBJ x106;
	 x102=_ARep_24(x97,x1);
	 if(ISTGPRM(x102,1)){
	  {OBJ x104=FLD1(x1,2);
	   if(EXPRD(x1,1)){
	    DSPRDF(x1);
	   }else{
	    CPPRD(x104,1);
	    FRPRD(x1,1);}
	   CPPRD(__AGlobSigInit_50,1);
	   x106=_AOcError_17(__AOcError_12,__AGlobSigInit_50,x104,x98);}
	 }else{
	  FRPRD(x1,1);
	  FREE(x98,1);
	  CPPRD(__AOcError_15,1);
	  x106=__AOcError_15;}
	 r=_AOcError_21(x106,x87);}}}}}}}}
 return r;}

extern OBJ _AGlobSigInit_16(register OBJ x1,register OBJ x2,register OBJ x3) /* readImports */
{OBJ r;
 for(;;){
  if(ISPRM(x2)){
   FRPRD(x1,1);
   CPCLS(__ACom_47,1);
   {OBJ x129;OBJ x130;
    PRD(1,0,x129);FLD(x129,1)=x3;
    x130=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x129);
    PRD(2,0,r);FLD(r,1)=x130;FLD(r,2)=__ASeq_6;}
  }else{
   {OBJ x131=FLD1(x2,1);OBJ x132=FLD1(x2,2);
    if(EXPRD(x2,1)){
     DSPRDF(x2);
    }else{
     COPY(x131,1);COPY(x132,1);
     FRPRD(x2,1);}
    CPPRD(x1,1);
    {OBJ x133;
     x133=_AOcOptions_9(x1);
     {OBJ x134=FLD1(x3,1);OBJ x135=FLD1(x3,2);FLAG x_x3=EXPRD(x3,1);
      if(x_x3){
      }else{
       CPPRD(x134,1);COPY(x135,1);}
      {OBJ x137;OBJ x140;
       if(ISTGPRM(x133,1)){
	x137=__ABUILTIN_5;
       }else{
	CPPRD(x1,1);
	x137=_AOcOptions_10(x1);}
       if(ISPRM(x131)){
	HLT("Seq at <unknown> : undefined selection ft\'Seq:seq->data");
       }else{
	{OBJ x138=FLD1(x131,1);
	 CPPRD(x138,1);
	 x140=x138;}}
       {OBJ x141=FLD1(x140,1);
	if(EXPRD(x140,1)){
	 DSPRDF(x140);
	}else{
	 CPPRD(x141,1);
	 FRPRD(x140,1);}
	{OBJ x146;OBJ x151;
	 {OBJ x143=FLD(x141,1);
	  if(EXPRD(x141,1)){
	   x146=x143;
	   FLD(x141,1)=NIL;DSPRD(x141);
	  }else{
	   COPY(x143,1);
	   x146=x143;
	   FRPRD(x141,1);}}
	 if(ISPRM(x146)){
	  HLT("Struct at <unknown> : undefined selection structIde\'Struct:origin->rep");
	 }else{
	  {OBJ x147=FLD1(x146,1);
	   CPPRD(x147,1);
	   x151=x147;}}
	 {OBJ x153=FLD1(x151,2);
	  if(EXPRD(x151,1)){
	   DSPRDF(x151);
	  }else{
	   CPPRD(x153,1);
	   FRPRD(x151,1);}
	  {OBJ x155;OBJ x156;OBJ x157;
	   if(ISTGPRM(x137,1)){
	    CPPRD(x1,1);
	    CPPRD(x153,1);
	    x155=_AOcOptions_30(x153,x1);
	   }else{
	    CPPRD(x1,1);
	    CPPRD(x153,1);
	    x155=_AOcOptions_29(x153,x1);}
	   CPPRD(x155,1);
	   ADenotation_15(x155,x156);
	   ANat_6(x156,x157);
	   if(ISTGPRM(x157,1)){
	    FREE(x131,1);
	    FRPRD(x155,1);
	    {OBJ x162;OBJ x163;OBJ x164;OBJ x165;
	     if(ISPRM(x146)){
	      HLT("Struct at <unknown> : undefined selection pos\'Struct:origin->pos");
	     }else{
	      {OBJ x159=FLD1(x146,2);
	       if(EXPRD(x146,1)){
		x162=x159;
		FLD1(x146,2)=NIL;DSPRD(x146);
	       }else{
		COPY(x159,1);
		x162=x159;
		FRPRD(x146,1);}
	       CPPRD(__AGlobSigInit_51,1);}}
	     x163=_AOcError_17(__AOcError_12,__AGlobSigInit_51,x153,x162);
	     x164=_AOcError_21(x134,x163);
	     if(x_x3){
	      RSOME(x3,x165);FLD1(x165,1)=x164;
	     }else{
	      FRPRD(x3,1);PRD1(2,x165);FLD1(x165,1)=x164;FLD1(x165,2)=x135;}
	     x2=x132;x3=x165;continue;}
	   }else{
	    if(x_x3){
	     DSPRDF(x3);
	    }else{
	     FRPRD(x3,1);}
	    CPPRD(x1,1);
	    CPPRD(x155,1);
	    CPCLS(__AGlobSigInit_55,1);
	    CPPRD(__AInterOpal_316,1);
	    {OBJ x166;OBJ x167;
	     x166=_AOcBinStream_4(x1,x155,__AInterOpal_316);
	     x167=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_55,9))(__AGlobSigInit_55,x1,x131,x132,x134,x135,x146,x153,x137,x155);
	     r=_AComCompose_5(x166,x167);}}}}}}}}}}}
  break;}
 return r;}

extern OBJ _AGlobSigInit_17(OBJ x1,OBJ x2) /* setPos */
{OBJ r;
 if(ISPRM(x2)){
  FREE(x1,1);
  r=__AOption_5;
 }else{
  {OBJ x10=FLD1(x2,1);
   if(EXPRD(x2,1)){
    {
     RSOME(x2,r);
     FLD1(r,1)=_AGlobSigInit_18(x1,x10);}
   }else{
    CPPRD(x10,1);
    {
     FRPRD(x2,1);PRD1(1,r);
     FLD1(r,1)=_AGlobSigInit_18(x1,x10);}}}}
 return r;}

extern OBJ _AGlobSigInit_18(OBJ x1,OBJ x2) /* setPos,1 */
{OBJ r;
 {OBJ x9;
  x9=_AGlobSigInit_20(x1);
  {OBJ x13;OBJ x14=FLD1(x2,2);
   if(EXPRD(x2,1)){
    COPY(x14,1);
    CPCLS(__AInterOpal_314,2);
    {OBJ x15;OBJ x16;
     x15=_AMap_16(__AInterOpal_314,x14,__AInterOpal_27);
     x16=_AGlobSigInit_19(x9,x15);
     RSOME(x2,r);
     FLD1(r,2)=_AMap_31(__AInterOpal_314,__AInterOpal_27,x16,x14);}
   }else{
    x13=FLD1(x2,1);COPY(x14,2);
    CPCLS(__AInterOpal_314,2);
    {OBJ x15;OBJ x16;
     x15=_AMap_16(__AInterOpal_314,x14,__AInterOpal_27);
     x16=_AGlobSigInit_19(x9,x15);
     FRPRD(x2,1);PRD1(2,r);FLD1(r,1)=x13;
     FLD1(r,2)=_AMap_31(__AInterOpal_314,__AInterOpal_27,x16,x14);}}}}
 return r;}

extern OBJ _AGlobSigInit_19(OBJ x1,OBJ x2) /* setPos,2 */
{OBJ r;
 {OBJ x75;
  PRD1(2,x75);FLD1(x75,1)=x1;FLD1(x75,2)=__ASeq_6;
  {OBJ x77;OBJ x78;OBJ x79;OBJ x80;OBJ x81;OBJ x82;OBJ x83;
   if(EXPRD(x2,1)){
    RSOME(x2,r);FREE(FLD1(r,1),1);FLD1(r,1)=x75;
   }else{
    x77=FLD1(x2,2);x78=FLD1(x2,3);x79=FLD1(x2,4);x80=FLD1(x2,5);x81=FLD1(x2,6);x82=FLD1(x2,7);x83=FLD1(x2,8);COPY(x77,1);CPPRD(x78,1);COPY(x79,1);COPY(x80,1);COPY(x81,1);COPY(x82,1);COPY(x83,1);
    FRPRD(x2,1);PRD1(8,r);FLD1(r,1)=x75;FLD1(r,2)=x77;FLD1(r,3)=x78;FLD1(r,4)=x79;FLD1(r,5)=x80;FLD1(r,6)=x81;FLD1(r,7)=x82;FLD1(r,8)=x83;}}}
 return r;}

extern OBJ _AGlobSigInit_20(OBJ x1) /* @ */
{OBJ r;
 if(ISPRM(x1)){
  r=__AInterOpal_57;
 }else{
  {OBJ x42;OBJ x31;OBJ x32;OBJ x33;OBJ x44;
   if(ISTGPRD(x1,2)){
    CPPRD(x1,3);
    x42=__ABUILTIN_5;
   }else{
    CPPRD(x1,3);
    x42=__ABUILTIN_3;}
   x31=_AOcPos_21(x1);
   x32=_AOcPos_20(x1);
   x33=_AOcPos_24(x1);
   if(ISTGPRM(x33,1)){
    x44=__AInterOpal_302;
   }else{
    COPY(x1,1);
    {OBJ x43;
     x43=_AOcPos_25(x1);
     if(ISTGPRM(x43,1)){
      x44=__AInterOpal_298;
     }else{
      x44=__AInterOpal_302;}}}
   if(ISTGPRM(x42,1)){
    if(ISTGPRD(x1,2)){
     {OBJ x48;OBJ x49;
      if(EXPRD(x1,1)){
       RPRDF(x1,r);CHGTG(r,3);FLD(r,1)=x44;FLD(r,2)=x32;FLD(r,3)=x31;
      }else{
       x48=FLD(x1,4);x49=FLD(x1,5);
       FRPRD(x1,1);PRDF(5,3,r);FLD(r,1)=x44;FLD(r,2)=x32;FLD(r,3)=x31;FLD(r,4)=x48;FLD(r,5)=x49;}}
    }else{
     HLT("OcPos at <unknown> : undefined selection eLin\'OcPos:pos->nat");}
   }else{
    FREE(x1,1);
    PRDF(3,2,r);FLD(r,1)=x44;FLD(r,2)=x32;FLD(r,3)=x31;}}}
 return r;}

extern OBJ _AGlobSigInit_21(OBJ x1,OBJ x2) /* checkInstantiation */
{OBJ r;
 if(ISPRM(x2)){
  FRPRD(x1,1);
  CPPRD(__AOcError_15,1);
  r=__AOcError_15;
 }else{
  {OBJ x35=FLD1(x2,1);OBJ x36=FLD1(x2,2);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    CPPRD(x35,1);COPY(x36,1);
    FRPRD(x2,1);}
   CPPRD(x1,1);
   {OBJ x38;
    x38=_AGlobSigInit_21(x1,x36);
    {OBJ x39=FLD1(x35,1);OBJ x40=FLD1(x35,2);
     if(EXPRD(x35,1)){
      DSPRDF(x35);
     }else{
      CPPRD(x39,1);COPY(x40,1);
      FRPRD(x35,1);}
     {OBJ x41;OBJ x42;OBJ x43;
      x41=_AInterOpalModifier_2(x39);
      x42=_ASeq_52(x41,__ANat_5);
      x43=_AGlobSigInit_22(x1,x42,x40);
      r=_AOcError_21(x43,x38);}}}}}
 return r;}

extern OBJ _AGlobSigInit_22(OBJ x1,OBJ x2,OBJ x3) /* checkSingleInstantiation */
{OBJ r;
 if(ISPRM(x3)){
  FRPRD(x1,1);
  CPPRD(__AOcError_15,1);
  r=__AOcError_15;
 }else{
  {OBJ x109=FLD1(x3,1);OBJ x110=FLD1(x3,2);
   if(EXPRD(x3,1)){
    DSPRDF(x3);
   }else{
    CPPRD(x109,1);COPY(x110,1);
    FRPRD(x3,1);}
   CPPRD(x1,1);
   {OBJ x112;
    x112=_AGlobSigInit_22(x1,x2,x110);
    {OBJ x113=FLD1(x109,1);
     if(EXPRD(x109,1)){
      DSPRDF(x109);
     }else{
      CPPRD(x113,1);
      FRPRD(x109,1);}
     {OBJ x118;
      {OBJ x115=FLD(x113,1);
       if(EXPRD(x113,1)){
	x118=x115;
	FLD(x113,1)=NIL;DSPRD(x113);
       }else{
	COPY(x115,1);
	x118=x115;
	FRPRD(x113,1);}}
      if(ISPRM(x118)){
       HLT("Struct at <unknown> : undefined selection structIde\'Struct:origin->rep");
      }else{
       {OBJ x119=FLD1(x118,1);OBJ x120=FLD1(x118,2);OBJ x121=FLD1(x118,3);
	if(EXPRD(x118,1)){
	 FREE(FLD1(x118,4),1);DSPRDF(x118);
	}else{
	 CPPRD(x119,1);COPY(x120,1);COPY(x121,1);
	 FRPRD(x118,1);}
	{OBJ x124;
	 x124=_ASeq_52(x121,__ANat_5);
	 {OBJ x126=FLD1(x119,2);
	  if(EXPRD(x119,1)){
	   DSPRDF(x119);
	  }else{
	   CPPRD(x126,1);
	   FRPRD(x119,1);}
	  {OBJ x128;OBJ x134;
	   ANat_76(x2,x124,x128);
	   if(ISTGPRM(x128,1)){
	    FRPRD(x1,1);
	    FREE(x120,1);
	    FRPRD(x126,1);
	    CPPRD(__AOcError_15,1);
	    x134=__AOcError_15;
	   }else{
	    {OBJ x129;
	     ANat_6(x124,x129);
	     if(ISTGPRM(x129,1)){
	      CPPRD(x1,1);
	      {OBJ x130;OBJ x131;
	       x130=_AOcOptions_7(x1);
	       if(ISTGPRM(x130,1)){
		x131=__ABUILTIN_5;
	       }else{
		CPPRD(x1,1);
		x131=_AOcOptions_9(x1);}
	       if(ISTGPRM(x131,1)){
		CPPRD(__AGlobSigInit_27,1);
		{OBJ x132;OBJ x133;
		 x132=_AOcOptions_14(__AGlobSigInit_27,x1);
		 if(ISTGPRM(x132,1)){
		  CPPRD(__AGlobSigInit_28,1);
		  x133=__AOcError_8;
		 }else{
		  CPPRD(__AGlobSigInit_28,1);
		  x133=__AOcError_12;}
		 x134=_AOcError_17(x133,__AGlobSigInit_28,x126,x120);}
	       }else{
		FRPRD(x1,1);
		FREE(x120,1);
		FRPRD(x126,1);
		CPPRD(__AOcError_15,1);
		x134=__AOcError_15;}}
	     }else{
	      FRPRD(x1,1);
	      CPPRD(__AGlobSigInit_29,1);
	      x134=_AOcError_17(__AOcError_12,__AGlobSigInit_29,x126,x120);}}}
	   r=_AOcError_21(x134,x112);}}}}}}}}}}
 return r;}

extern OBJ _AGlobSigInit_24(OBJ x1,OBJ x2) /* checkFormImplParams */
{OBJ r;
 if(ISPRM(x2)){
  FREE(x1,1);
  CPPRD(__AOcError_15,1);
  r=__AOcError_15;
 }else{
  {OBJ x42=FLD1(x2,1);
   if(EXPRD(x2,1)){
    DSPRDF(x2);
   }else{
    CPPRD(x42,1);
    FRPRD(x2,1);}
   {OBJ x47;OBJ x48;OBJ x49;OBJ x52;
    if(ISPRM(x1)){
     HLT("Struct at <unknown> : undefined selection paramS\'Struct:origin->seq");
    }else{
     {OBJ x45=FLD1(x1,3);
      COPY(x45,1);
      x47=x45;}}
    x48=_ASeq_52(x47,__ANat_5);
    ANat_76(x48,__ANat_5,x49);
    if(ISTGPRM(x49,1)){
     FRPRD(x42,1);
     x52=__ABUILTIN_5;
    }else{
     {OBJ x50;OBJ x51;
      x50=_AInterOpalModifier_2(x42);
      x51=_ASeq_52(x50,__ANat_5);
      ANat_76(x48,x51,x52);}}
    if(ISTGPRM(x52,1)){
     FREE(x1,1);
     CPPRD(__AOcError_15,1);
     r=__AOcError_15;
    }else{
     if(ISPRM(x1)){
      HLT("Struct at <unknown> : undefined selection pos\'Struct:origin->pos");
     }else{
      {OBJ x63=FLD1(x1,1);OBJ x64=FLD1(x1,2);
       if(EXPRD(x1,1)){
	FLD1(x1,1)=NIL;FLD1(x1,2)=NIL;DSPRD(x1);
       }else{
	CPPRD(x63,1);COPY(x64,1);
	FRPRD(x1,1);}
       {OBJ x69=FLD1(x63,2);
	if(EXPRD(x63,1)){
	 DSPRDF(x63);
	}else{
	 CPPRD(x69,1);
	 FRPRD(x63,1);}
	CPPRD(__AGlobSigInit_56,1);
	r=_AOcError_17(__AOcError_12,__AGlobSigInit_56,x69,x64);}}}}}}}
 return r;}

extern OBJ _AGlobSigInit_25(OBJ x1) /* defStructHead'25 */
{OBJ r;
 CPCLS(__APartNamePrep_3,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__APartNamePrep_3,1))(__APartNamePrep_3,__ABUILTIN_3);
 return r;}

extern OBJ _AGlobSigInit_26(OBJ x1) /* extStructHead'26 */
{OBJ r;
 CPCLS(__APartNamePrep_3,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__APartNamePrep_3,1))(__APartNamePrep_3,__ABUILTIN_3);
 return r;}

extern OBJ _AGlobSigInit_31(OBJ x1) /* globSigInit3'31 */
{OBJ r;
 CPPRD(__AGlobSigInit_30,1);
 CPCLS(__ACom_47,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,__AGlobSigInit_30);
 return r;}

extern OBJ _AGlobSigInit_33(OBJ x1,OBJ x2,OBJ x3) /* globSigInit3'33 */
{OBJ r;
 CPPRD(x2,1);
 {OBJ x7;
  x7=_AInterOpalModifier_6(x2);
  {OBJ x25=FLD1(x3,1);OBJ x26=FLD1(x3,2);FLAG x_x3=EXPRD(x3,1);
   if(x_x3){
   }else{
    COPY(x25,1);CPPRD(x26,1);}
   {OBJ x29=FLD1(x2,3);
    if(EXPRD(x2,1)){
     FLD1(x2,3)=NIL;DSPRD(x2);
    }else{
     CPPRD(x29,1);
     FRPRD(x2,1);}
    CPCLS(__AGlobSigInit_2,1);
    {OBJ x35;OBJ x36;OBJ x37;OBJ x38;OBJ x39;
     x35=x29;
     x36=_AGlobSigInit_6(x1);
     x37=_AGlobSigInit_3(x26,x7);
     CPPRD(x37,1);
     x38=_ARep_2(x37,x35);
     if(x_x3){
      RSOME(x3,x39);FLD1(x39,1)=x38;FLD1(x39,2)=x36;
     }else{
      FRPRD(x3,1);PRD1(2,x39);FLD1(x39,1)=x38;FLD1(x39,2)=x36;}
     PRD1(2,r);FLD1(r,2)=x37;
     FLD1(r,1)=_ABSTree_57(__AGlobSigInit_2,x39,x25);}}}}
 return r;}

extern OBJ _AGlobSigInit_34(OBJ x1,OBJ x2) /* globSigInit3'34 */
{OBJ r;
 {OBJ x11=FLD1(x1,1);OBJ x12=FLD1(x1,2);
  if(EXPRD(x1,1)){
   DSPRDF(x1);
  }else{
   CPPRD(x11,1);COPY(x12,1);
   FRPRD(x1,1);}
  CPCLS(__AGlobSigInit_33,1);
  {OBJ x13;OBJ x14;
   x13=_AInterOpalAccess_14(x11);
   x14=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_33,1))(__AGlobSigInit_33,x12);
   r=_ASeqReduce_4(x14,x2,x13);}}
 return r;}

extern OBJ _AGlobSigInit_41(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8) /* globSigInit3'41 */
{OBJ r;
 if(ISTGPRM(x8,1)){
  {OBJ x58;OBJ x56;OBJ x61;OBJ x62;OBJ x63;OBJ x64;OBJ x66;OBJ x67;OBJ x68;OBJ x69;OBJ x70;OBJ x74;OBJ x76;OBJ x77;OBJ x78;OBJ x80;OBJ x81;OBJ x82;OBJ x83;OBJ x84;OBJ x92;OBJ x93;OBJ x94;OBJ x95;OBJ x96;OBJ x97;
   if(ISPRM(x6)){
    CPPRD(x1,1);
    CPPRD(__AGlobSigInit_32,1);
    x58=__ABUILTIN_3;
   }else{
    CPPRD(x1,1);
    CPPRD(__AGlobSigInit_32,1);
    x58=__ABUILTIN_5;}
   x56=_AGlobSigInit_11(x1,__AGlobSigInit_32,x5);
   if(ISTGPRM(x58,1)){
    {OBJ x60;
     if(ISPRM(x6)){
      HLT("Option at <unknown> : undefined selection cont\'Option:option->data");
     }else{
      {OBJ x59=FLD1(x6,1);
       CPPRD(x59,1);
       x60=x59;
       CPPRD(x1,1);
       CPPRD(x6,1);
       COPY(x7,1);
       CPCLS(__AGlobSigInit_2,1);
       CPCLS(__AGlobSigInit_34,1);
       CPPRD(__AGlobSigInit_35,1);}}
     x61=_AInterOpalModifier_5(x60);}
   }else{
    CPPRD(x1,1);
    COPY(x6,1);
    COPY(x7,1);
    CPCLS(__AGlobSigInit_2,1);
    CPCLS(__AGlobSigInit_34,1);
    CPPRD(__AGlobSigInit_35,1);
    x61=__ASeq_6;}
   x62=_AGlobSigInit_3(x4,x61);
   PRD1(2,x63);FLD1(x63,1)=__ATree_7;FLD1(x63,2)=x62;
   x64=_ASeqReduce_4(__AGlobSigInit_34,x63,x7);
   {TUP2 t=_APair_8(x64);
    x66=t.c1;
    x67=t.c2;}
   CPPRD(x67,1);
   x68=_ABSTreeConv_7(__AGlobSigInit_2,x66);
   x69=_AGlobSigInitPass_1(x67,x56,x6,x68);
   x70=_AGlobSigInit_11(x1,__AGlobSigInit_35,x69);
   if(ISTGPRM(x58,1)){
    {OBJ x73;OBJ x71;
     if(ISPRM(x6)){
      HLT("Option at <unknown> : undefined selection cont\'Option:option->data");
     }else{
      {OBJ x72=FLD1(x6,1);
       if(EXPRD(x6,1)){
	x73=x72;
	DSPRDF(x6);
       }else{
	CPPRD(x72,1);
	x73=x72;
	FRPRD(x6,1);}
       CPPRD(x1,5);
       CPPRD(x67,2);
       CPPRD(__AGlobSigInit_36,1);
       CPPRD(__AGlobSigInit_37,1);
       CPPRD(__AGlobSigInit_38,1);
       CPCLS(__ADeclPrep_1,1);}}
     x71=_AOcOptions_8(x1);
     x74=_AStructOwn_1(x1,x67,x70,x73,x71);}
   }else{
    x74=x70;
    FREE(x6,1);
    CPPRD(x1,3);
    CPPRD(x67,1);
    CPPRD(__AGlobSigInit_36,1);
    CPPRD(__AGlobSigInit_37,1);
    CPPRD(__AGlobSigInit_38,1);
    CPCLS(__ADeclPrep_1,1);}
   {TUP2 t=_ASeqMapEnv_4(__ADeclPrep_1,x74,x3);
    x76=t.c1;
    x77=t.c2;}
   x78=_AGlobSigInit_11(x1,__AGlobSigInit_36,x76);
   {TUP2 t=_AGlobSigInitPass_2(x67,x78,x7);
    x80=t.c1;
    x81=t.c2;}
   COPY(x81,1);
   x82=_AGlobSigInit_11(x1,__AGlobSigInit_37,x80);
   x83=_AGlobSigInitPass_3(x67,x82,x81);
   x84=_AGlobSigInit_11(x1,__AGlobSigInit_38,x83);
   if(ISTGPRM(x58,1)){
    {OBJ x89;
     if(ISPRM(x2)){
      HLT("Struct at <unknown> : undefined selection paramS\'Struct:origin->seq");
     }else{
      {OBJ x87=FLD1(x2,3);
       COPY(x87,1);
       x89=x87;}}
     if(ISPRM(x89)){
      x92=x84;
      FREE(x2,1);
      CPPRD(x1,1);
      CPPRD(__AGlobSigInit_39,1);
      CPPRD(__AGlobSigInit_40,1);
      CPCLS(__ACom_47,1);
     }else{
      if(EXPRD(x89,1)){
       DSPRD(x89);
      }else{
       DCPRD(x89,1);}
      CPPRD(x1,1);
      CPPRD(__AGlobSigInit_39,1);
      CPPRD(__AGlobSigInit_40,1);
      CPCLS(__ACom_47,1);
      x92=_AGlobSigInit_9(x84,x2);}}
   }else{
    CPPRD(x1,1);
    CPPRD(__AGlobSigInit_39,1);
    CPPRD(__AGlobSigInit_40,1);
    CPCLS(__ACom_47,1);
    x92=_AGlobSigInit_8(x84,x2);}
   x93=_AGlobSigInitPass_4(x92,x77,x81);
   x94=_AGlobSigInit_11(x1,__AGlobSigInit_39,x93);
   x95=_AGlobSigInit_11(x1,__AGlobSigInit_40,x94);
   PRD(1,0,x96);FLD(x96,1)=x95;
   x97=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x96);
   PRD(2,0,r);FLD(r,1)=x97;FLD(r,2)=__ASeq_6;}
 }else{
  FRPRD(x1,1);
  FREE(x2,1);
  FREE(x3,1);
  FRPRD(x4,1);
  FREE(x5,1);
  FREE(x6,1);
  FREE(x7,1);
  CPCLS(__AGlobSigInit_31,1);
  {OBJ x98;
   x98=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_31,1))(__AGlobSigInit_31,__ABUILTIN_20);
   PRD(2,0,r);FLD(r,1)=x98;FLD(r,2)=__ASeq_6;}}
 return r;}

extern OBJ _AGlobSigInit_42(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6) /* readImportList'42 */
{OBJ r;
 {OBJ x10;OBJ x8;OBJ x16;
  if(ISPRM(x6)){
   x10=__ABUILTIN_5;x8=__ABUILTIN_3;
  }else{
   x10=__ABUILTIN_3;x8=__ABUILTIN_5;}
  if(ISTGPRM(x8,1)){
   FRPRD(x2,1);
   {OBJ x12;OBJ x13;
    if(ISPRM(x6)){
     HLT("Option at <unknown> : undefined selection cont\'Option:option->data");
    }else{
     {OBJ x11=FLD1(x6,1);
      if(EXPRD(x6,1)){
       x12=x11;
       DSPRDF(x6);
      }else{
       CPPRD(x11,1);
       x12=x11;
       FRPRD(x6,1);}}}
    PRD1(2,x13);FLD1(x13,1)=x12;FLD1(x13,2)=x5;
    PRD1(2,x16);FLD1(x16,1)=x4;FLD1(x16,2)=x13;}
  }else{
   FREE(x6,1);
   if(ISTGPRM(x10,1)){
    CPPRD(__AGlobSigInit_23,1);
    COPY(__AOcPos_35,1);
    {OBJ x14;OBJ x15;
     x14=_AOcError_17(__AOcError_12,__AGlobSigInit_23,x2,__AOcPos_35);
     x15=_AOcError_21(x4,x14);
     PRD1(2,x16);FLD1(x16,1)=x15;FLD1(x16,2)=x5;}
   }else{
    HLT("GlobSigInit at <310,13-312,57> : missing else in readImportList\'GlobSigInit:options**seq->pair->com");}}
  r=_AGlobSigInit_13(x1,x3,x16);}
 return r;}

extern OBJ _AGlobSigInit_45(OBJ x1) /* readOwnImport'45 */
{OBJ r;
 CPPRD(__AGlobSigInit_44,1);
 CPCLS(__ACom_47,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,__AGlobSigInit_44);
 return r;}

extern OBJ _AGlobSigInit_46(OBJ x1,OBJ x2) /* readOwnImport'46 */
{OBJ r;
 if(ISPRM(x2)){
  CPPRD(__AGlobSigInit_23,1);
  CPCLS(__ACom_47,1);
  COPY(__AOcPos_35,1);
  {OBJ x18;OBJ x19;OBJ x20;OBJ x21;
   x18=_AOcError_17(__AOcError_12,__AGlobSigInit_23,x1,__AOcPos_35);
   PRD1(2,x19);FLD1(x19,1)=x18;FLD1(x19,2)=__AOption_5;
   PRD(1,0,x20);FLD(x20,1)=x19;
   x21=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x20);
   PRD(2,0,r);FLD(r,1)=x21;FLD(r,2)=__ASeq_6;}
 }else{
  FRPRD(x1,1);
  CPCLS(__ACom_47,1);
  CPPRD(__AOcError_15,1);
  {OBJ x15;OBJ x16;OBJ x17;
   PRD1(2,x15);FLD1(x15,1)=__AOcError_15;FLD1(x15,2)=x2;
   PRD(1,0,x16);FLD(x16,1)=x15;
   x17=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x16);
   PRD(2,0,r);FLD(r,1)=x17;FLD(r,2)=__ASeq_6;}}
 return r;}

extern OBJ _AGlobSigInit_48(OBJ x1) /* readOwnImport'48 */
{OBJ r;
 CPPRD(__AGlobSigInit_23,1);
 CPPRD(__AGlobSigInit_47,1);
 ADenotation_4(__AGlobSigInit_23,__AGlobSigInit_47,r);
 return r;}

extern OBJ _AGlobSigInit_49(OBJ x1,OBJ x2) /* readOwnImport'49 */
{OBJ r;
 {OBJ x5;OBJ x3;OBJ x6;OBJ x7;OBJ x17;
  if(ISPRM(x2)){
   CPPRD(x1,3);
   CPCLS(__AGlobSigInit_14,1);
   x5=__ABUILTIN_3;
  }else{
   CPPRD(x1,3);
   CPCLS(__AGlobSigInit_14,1);
   x5=__ABUILTIN_5;}
  x3=_AOcOptions_18(x1);
  x6=_AOcOptions_19(x1);
  x7=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_14,1))(__AGlobSigInit_14,x1);
  if(ISTGPRM(x5,1)){
   {OBJ x9;OBJ x10;OBJ x11;OBJ x12;
    if(ISPRM(x2)){
     HLT("Option at <unknown> : undefined selection cont\'Option:option->data");
    }else{
     {OBJ x8=FLD1(x2,1);
      if(EXPRD(x2,1)){
       x9=x8;
       DSPRDF(x2);
      }else{
       CPPRD(x8,1);
       x9=x8;
       FRPRD(x2,1);}
      CPPRD(__AOcError_15,1);}}
    x10=_ASeq_14(x6,x3);
    PRD1(2,x11);FLD1(x11,1)=x9;FLD1(x11,2)=__ASeq_6;
    PRD1(2,x12);FLD1(x12,1)=__AOcError_15;FLD1(x12,2)=x11;
    x17=_AGlobSigInit_13(x1,x10,x12);}
  }else{
   FREE(x2,1);
   CPPRD(x3,2);
   CPCLS(__AGlobSigInit_48,1);
   COPY(__AOcPos_35,1);
   {OBJ x13;OBJ x14;OBJ x15;OBJ x16;
    x13=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_48,1))(__AGlobSigInit_48,__ABUILTIN_20);
    x14=_ASeq_15(x3,x6,x3);
    x15=_AOcError_17(__AOcError_10,x13,x3,__AOcPos_35);
    PRD1(2,x16);FLD1(x16,1)=x15;FLD1(x16,2)=__ASeq_6;
    x17=_AGlobSigInit_13(x1,x14,x16);}}
  r=_AComCompose_5(x17,x7);}
 return r;}

extern OBJ _AGlobSigInit_53(OBJ x1) /* readImports'53 */
{OBJ r;
 CPPRD(__AGlobSigInit_23,1);
 CPPRD(__AGlobSigInit_52,1);
 ADenotation_4(__AGlobSigInit_23,__AGlobSigInit_52,r);
 return r;}

extern OBJ _AGlobSigInit_54(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9) /* readImports'54 */
{OBJ r;
 COPY(x7,1);
 {OBJ x10;OBJ x14;OBJ x12;OBJ x24;
  x10=_AGlobSigInit_17(x7,x9);
  if(ISPRM(x10)){
   x14=__ABUILTIN_5;x12=__ABUILTIN_3;
  }else{
   if(EXPRD(x10,1)){
    FRPRD(FLD1(x10,1),1);DSPRDF(x10);
   }else{
    DCPRD(x10,1);}
   x14=__ABUILTIN_3;x12=__ABUILTIN_5;}
  if(ISTGPRM(x12,1)){
   CPCLS(__AGlobSigInit_53,1);
   {OBJ x15;OBJ x17;OBJ x18;OBJ x19;OBJ x20;OBJ x21;
    x15=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_53,1))(__AGlobSigInit_53,__ABUILTIN_20);
    if(ISPRM(x8)){
     HLT("Option at <unknown> : undefined selection cont\'Option:option->data");
    }else{
     {OBJ x16=FLD1(x8,1);
      if(EXPRD(x8,1)){
       x17=x16;
       DSPRDF(x8);
      }else{
       CPPRD(x16,1);
       x17=x16;
       FRPRD(x8,1);}}}
    PRD1(2,x18);FLD1(x18,1)=x17;FLD1(x18,2)=x2;
    PRD1(2,x19);FLD1(x19,1)=x18;FLD1(x19,2)=x5;
    x20=_AOcError_17(__AOcError_10,x15,x6,x7);
    x21=_AOcError_21(x4,x20);
    PRD1(2,x24);FLD1(x24,1)=x21;FLD1(x24,2)=x19;}
  }else{
   FREE(x2,1);
   FREE(x8,1);
   if(ISTGPRM(x14,1)){
    CPPRD(__AGlobSigInit_23,1);
    {OBJ x22;OBJ x23;
     x22=_AOcError_17(__AOcError_12,__AGlobSigInit_23,x6,x7);
     x23=_AOcError_21(x4,x22);
     PRD1(2,x24);FLD1(x24,1)=x23;FLD1(x24,2)=x5;}
   }else{
    HLT("GlobSigInit at <383,25-32> : missing else in readImports\'GlobSigInit:options**seq->pair->com");}}
  r=_AGlobSigInit_16(x1,x3,x24);}
 return r;}

extern OBJ _AGlobSigInit_55(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10) /* readImports'55 */
{OBJ r;
 {OBJ x15;OBJ x16;
  if(ISPRM(x6)){
   HLT("Struct at <unknown> : undefined selection pos\'Struct:origin->pos");
  }else{
   {OBJ x12=FLD1(x6,2);
    if(EXPRD(x6,1)){
     x15=x12;
     FLD1(x6,2)=NIL;DSPRD(x6);
    }else{
     COPY(x12,1);
     x15=x12;
     FRPRD(x6,1);}}}
  COPY(x15,1);
  x16=_AGlobSigInit_17(x15,x10);
  if(ISPRM(x16)){
   if(ISTGPRM(x8,1)){
    CPPRD(x1,2);
    CPCLS(__AGlobSigInit_54,1);
    CPPRD(__AInterOpal_316,1);
    {OBJ x36;OBJ x37;OBJ x38;
     x36=_AOcOptions_29(x7,x1);
     x37=_AOcBinStream_4(x1,x36,__AInterOpal_316);
     x38=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_54,8))(__AGlobSigInit_54,x1,x2,x3,x4,x5,x9,x15,x16);
     r=_AComCompose_5(x37,x38);}
   }else{
    FREE(x2,1);
    FRPRD(x7,1);
    CPPRD(__AGlobSigInit_23,1);
    {OBJ x39;OBJ x40;OBJ x41;
     x39=_AOcError_17(__AOcError_12,__AGlobSigInit_23,x9,x15);
     x40=_AOcError_21(x4,x39);
     PRD1(2,x41);FLD1(x41,1)=x40;FLD1(x41,2)=x5;
     r=_AGlobSigInit_16(x1,x3,x41);}}
  }else{
   {OBJ x32=FLD1(x16,1);
    if(EXPRD(x16,1)){
     DSPRDF(x16);
    }else{
     CPPRD(x32,1);
     FRPRD(x16,1);}
    FRPRD(x7,1);
    FRPRD(x9,1);
    FREE(x15,1);
    {OBJ x33;OBJ x34;OBJ x35;
     PRD1(2,x33);FLD1(x33,1)=x32;FLD1(x33,2)=x2;
     PRD1(2,x34);FLD1(x34,1)=x33;FLD1(x34,2)=x5;
     PRD1(2,x35);FLD1(x35,1)=x4;FLD1(x35,2)=x34;
     r=_AGlobSigInit_16(x1,x3,x35);}}}}
 return r;}

extern OBJ _AGlobSigInit_58(OBJ x1) /* globSigInit'58 */
{OBJ r;
 PRD1(2,r);FLD1(r,1)=x1;FLD1(r,2)=__AOption_5;
 return r;}

extern OBJ _AGlobSigInit_59(OBJ x1) /* globSigInit'59 */
{OBJ r;
 {OBJ x13=FLD1(x1,1);OBJ x14=FLD1(x1,2);FLAG x_x1=EXPRD(x1,1);
  if(x_x1){
  }else{
   COPY(x13,1);CPPRD(x14,1);}
  {OBJ x15=FLD1(x14,1);
   if(EXPRD(x14,1)){
    FLD1(x14,1)=NIL;DSPRD(x14);
   }else{
    CPPRD(x15,1);
    FRPRD(x14,1);}
   {OBJ x18;
    PRD1(1,x18);FLD1(x18,1)=x15;
    if(x_x1){
     RSOME(x1,r);FLD1(r,2)=x18;
    }else{
     FRPRD(x1,1);PRD1(2,r);FLD1(r,1)=x13;FLD1(r,2)=x18;}}}}
 return r;}

extern OBJ _AGlobSigInit_61(OBJ x1) /* globSigInit'61 */
{OBJ r;
 CPPRD(__AGlobSigInit_60,1);
 CPCLS(__ACom_47,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,__AGlobSigInit_60);
 return r;}

extern OBJ _AGlobSigInit_63(OBJ x1) /* globSigInit'63 */
{OBJ r;
 CPPRD(__AGlobSigInit_62,1);
 CPCLS(__ACom_47,1);
 r=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,__AGlobSigInit_62);
 return r;}

extern OBJ _AGlobSigInit_64(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10,OBJ x11,OBJ x12) /* globSigInit'64 */
{OBJ r;
 CPCLS(__AGlobSigInit_58,1);
 CPCLS(__AGlobSigInit_59,1);
 {OBJ x13;OBJ x14;OBJ x15;OBJ x27;OBJ x28;
  x13=_ASeqMap_3(__AGlobSigInit_58,x2);
  x14=_ASeqMap_3(__AGlobSigInit_59,x3);
  x15=_ASeq_26(x13,x14);
  if(ISTGPRM(x9,1)){
   if(ISTGPRM(x12,1)){
    {OBJ x17;OBJ x16;
     if(ISTGPRM(x10,1)){
      COPY(x11,1);
      x17=__ABUILTIN_3;x16=x11;
     }else{
      x17=__ABUILTIN_5;x16=__ABUILTIN_3;}
     if(ISTGPRM(x16,1)){
      FREE(x11,1);
      CPCLS(__AGlobSigInit_5,1);
      CPCLS(__ACom_47,1);
      {OBJ x18;OBJ x19;
       PRD(1,0,x18);FLD(x18,1)=x8;
       x19=(*(OBJ(*)(OBJ,OBJ))METHOD(__ACom_47,1))(__ACom_47,x18);
       PRD(2,0,x27);FLD(x27,1)=x19;FLD(x27,2)=__ASeq_6;}
     }else{
      FREE(x8,1);
      if(ISTGPRM(x17,1)){
       FREE(x11,1);
       CPCLS(__AGlobSigInit_5,1);
       CPCLS(__AGlobSigInit_61,1);
       {OBJ x20;
	x20=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_61,1))(__AGlobSigInit_61,__ABUILTIN_20);
	PRD(2,0,x27);FLD(x27,1)=x20;FLD(x27,2)=__ASeq_6;}
      }else{
       if(ISPRM(x11)&&(ISTGPRM(x11,0))){
	CPCLS(__AGlobSigInit_5,1);
	CPCLS(__AGlobSigInit_63,1);
	{OBJ x23;
	 x23=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_63,1))(__AGlobSigInit_63,__ABUILTIN_20);
	 PRD(2,0,x27);FLD(x27,1)=x23;FLD(x27,2)=__ASeq_6;}
       }else{
	HLT("GlobSigInit at <126,15-129,53> : missing else in globSigInit\'GlobSigInit:origin**seq**seq**options->pair->com");}}}}
   }else{
    FREE(x8,1);
    FREE(x10,1);
    FREE(x11,1);
    CPCLS(__AGlobSigInit_5,1);
    CPCLS(__AGlobSigInit_61,1);
    {OBJ x25;
     x25=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_61,1))(__AGlobSigInit_61,__ABUILTIN_20);
     PRD(2,0,x27);FLD(x27,1)=x25;FLD(x27,2)=__ASeq_6;}}
  }else{
   FREE(x8,1);
   FREE(x10,1);
   FREE(x11,1);
   CPCLS(__AGlobSigInit_5,1);
   CPCLS(__AGlobSigInit_63,1);
   {OBJ x26;
    x26=(*(OBJ(*)(OBJ,OBJ))METHOD(__AGlobSigInit_63,1))(__AGlobSigInit_63,__ABUILTIN_20);
    PRD(2,0,x27);FLD(x27,1)=x26;FLD(x27,2)=__ASeq_6;}}
  x28=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_5,6))(__AGlobSigInit_5,x4,x1,x15,x5,x6,x7);
  r=_AComCompose_5(x27,x28);}
 return r;}

extern OBJ _AGlobSigInit_65(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10,OBJ x11,OBJ x12) /* globSigInit'65 */
{OBJ r;
 CPCLS(__AGlobSigInit_64,1);
 CPPRD(x4,1);
 {OBJ x13;OBJ x14;
  x13=_AOcError_25(x4,x11);
  x14=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_64,11))(__AGlobSigInit_64,x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x12);
  r=_AComCompose_5(x13,x14);}
 return r;}

extern OBJ _AGlobSigInit_66(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10,OBJ x11,OBJ x12) /* globSigInit'66 */
{OBJ r;
 CPCLS(__AGlobSigInit_65,1);
 CPPRD(x4,1);
 {OBJ x13;OBJ x14;
  x13=_AOcError_25(x4,x8);
  x14=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_65,11))(__AGlobSigInit_65,x1,x2,x3,x4,x5,x6,x7,x9,x10,x12,x11);
  r=_AComCompose_5(x13,x14);}
 return r;}

extern OBJ _AGlobSigInit_67(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10,OBJ x11,OBJ x12) /* globSigInit'67 */
{OBJ r;
 CPCLS(__AGlobSigInit_66,1);
 CPPRD(x4,1);
 {OBJ x13;OBJ x14;
  x13=_AOcError_25(x4,x7);
  x14=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_66,11))(__AGlobSigInit_66,x1,x2,x3,x4,x5,x6,x8,x9,x10,x12,x11);
  r=_AComCompose_5(x13,x14);}
 return r;}

extern OBJ _AGlobSigInit_68(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7,OBJ x8,OBJ x9,OBJ x10,OBJ x11) /* globSigInit'68 */
{OBJ r;
 {OBJ x20=FLD1(x11,1);OBJ x21=FLD1(x11,2);
  if(EXPRD(x11,1)){
   DSPRDF(x11);
  }else{
   CPPRD(x20,1);COPY(x21,1);
   FRPRD(x11,1);}
  CPPRD(x4,1);
  CPCLS(__AGlobSigInit_67,1);
  {OBJ x22;OBJ x23;
   x22=_AOcError_25(x4,x5);
   x23=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_67,11))(__AGlobSigInit_67,x1,x2,x3,x4,x6,x7,x8,x9,x10,x21,x20);
   r=_AComCompose_5(x22,x23);}}
 return r;}

extern OBJ _AGlobSigInit_69(OBJ x1,OBJ x2,OBJ x3,OBJ x4,OBJ x5,OBJ x6,OBJ x7) /* globSigInit'69 */
{OBJ r;
 {OBJ x30=FLD1(x7,1);OBJ x31=FLD1(x7,2);
  if(EXPRD(x7,1)){
   DSPRDF(x7);
  }else{
   CPPRD(x30,1);COPY(x31,1);
   FRPRD(x7,1);}
  {OBJ x36;OBJ x37;OBJ x38;OBJ x40;OBJ x41;OBJ x42;OBJ x43;OBJ x44;OBJ x45;OBJ x46;OBJ x47;
   if(ISPRM(x1)){
    HLT("Struct at <unknown> : undefined selection structIde\'Struct:origin->rep");
   }else{
    {OBJ x32=FLD1(x1,1);
     CPPRD(x32,1);
     x36=x32;
     CPPRD(x1,1);
     CPPRD(x4,1);
     COPY(x5,1);
     COPY(x31,1);
     CPPRD(__AGlobSigInit_57,1);
     CPCLS(__AGlobSigInit_68,1);
     COPY(__AGlobSig4SigAna_1,1);}}
   x37=_AGlobSigInit_16(x4,x5,__AGlobSigInit_57);
   x38=_AGlobSigInit_24(x1,x31);
   x40=_AGlobSigInit_15(x36,x5);
   {TUP5 t=_AGlobSigInit_7(x6);
    x41=t.c1;
    x42=t.c2;
    x43=t.c3;
    x44=t.c4;
    x45=t.c5;}
   x46=_AGlobSig4SigAna_4(__AGlobSig4SigAna_1,x41,x42,x43,x44);
   x47=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))METHOD(__AGlobSigInit_68,10))(__AGlobSigInit_68,x1,x2,x3,x4,x40,x45,x46,x30,x31,x38);
   r=_AComCompose_5(x37,x47);}}
 return r;}







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

static OBJ _mt_7_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_7_6_1(OBJ t,OBJ t1) 
{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))ENTRY(t))(FLDCLS(t,1),FLDCLS(t,2),FLDCLS(t,3),FLDCLS(t,4),FLDCLS(t,5),FLDCLS(t,6),t1);
 return r;}
static OBJ _mt_7_6_1_l(OBJ t,OBJ t1) 
{OBJ r;
 r=(*(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);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

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

static OBJ _mt_8_7_1(OBJ t,OBJ t1) 
{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);
  COPY(FLDCLS(t,7),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),FLDCLS(t,4),FLDCLS(t,5),FLDCLS(t,6),FLDCLS(t,7),t1);
 return r;}
static OBJ _mt_8_7_1_l(OBJ t,OBJ t1) 
{OBJ r;
 r=(*(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),FLDCLS(t,7),t1);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;FLDCLS(t,7)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

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

static OBJ _mt_9_8_1(OBJ t,OBJ t1) 
{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);
  COPY(FLDCLS(t,7),1);
  COPY(FLDCLS(t,8),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),FLDCLS(t,7),FLDCLS(t,8),t1);
 return r;}
static OBJ _mt_9_8_1_l(OBJ t,OBJ t1) 
{OBJ r;
 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),FLDCLS(t,7),FLDCLS(t,8),t1);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;FLDCLS(t,7)=NIL;FLDCLS(t,8)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

static OBJ _mt_10_0_9(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6,OBJ t7,OBJ t8,OBJ t9) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,9);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 FLDCLS(r,3)=t3;
 FLDCLS(r,4)=t4;
 FLDCLS(r,5)=t5;
 FLDCLS(r,6)=t6;
 FLDCLS(r,7)=t7;
 FLDCLS(r,8)=t8;
 FLDCLS(r,9)=t9;
 return r;}

static OBJ _mt_10_0_10(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6,OBJ t7,OBJ t8,OBJ t9,OBJ t10) 
{OBJ r;
 DCCLS(t,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))ENTRY(t))(t1,t2,t3,t4,t5,t6,t7,t8,t9,t10);
 return r;}

static OBJ _mt_10_9_1(OBJ t,OBJ t1) 
{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);
  COPY(FLDCLS(t,7),1);
  COPY(FLDCLS(t,8),1);
  COPY(FLDCLS(t,9),1);
  DCCLS(t,1);}
 r=(*(OBJ(*)(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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),t1);
 return r;}
static OBJ _mt_10_9_1_l(OBJ t,OBJ t1) 
{OBJ r;
 r=(*(OBJ(*)(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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),t1);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;FLDCLS(t,7)=NIL;FLDCLS(t,8)=NIL;FLDCLS(t,9)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

static OBJ _mt_11_0_10(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6,OBJ t7,OBJ t8,OBJ t9,OBJ t10) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,10);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 FLDCLS(r,3)=t3;
 FLDCLS(r,4)=t4;
 FLDCLS(r,5)=t5;
 FLDCLS(r,6)=t6;
 FLDCLS(r,7)=t7;
 FLDCLS(r,8)=t8;
 FLDCLS(r,9)=t9;
 FLDCLS(r,10)=t10;
 return r;}

static OBJ _mt_11_10_1(OBJ t,OBJ t1) 
{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);
  COPY(FLDCLS(t,7),1);
  COPY(FLDCLS(t,8),1);
  COPY(FLDCLS(t,9),1);
  COPY(FLDCLS(t,10),1);
  DCCLS(t,1);}
 r=(*(OBJ(*)(OBJ,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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),FLDCLS(t,10),t1);
 return r;}
static OBJ _mt_11_10_1_l(OBJ t,OBJ t1) 
{OBJ r;
 r=(*(OBJ(*)(OBJ,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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),FLDCLS(t,10),t1);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;FLDCLS(t,7)=NIL;FLDCLS(t,8)=NIL;FLDCLS(t,9)=NIL;FLDCLS(t,10)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

static OBJ _mt_12_0_11(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6,OBJ t7,OBJ t8,OBJ t9,OBJ t10,OBJ t11) 
{OBJ r;
 DPCLS(t,r);
 INCCLS(r,0,11);
 FLDCLS(r,1)=t1;
 FLDCLS(r,2)=t2;
 FLDCLS(r,3)=t3;
 FLDCLS(r,4)=t4;
 FLDCLS(r,5)=t5;
 FLDCLS(r,6)=t6;
 FLDCLS(r,7)=t7;
 FLDCLS(r,8)=t8;
 FLDCLS(r,9)=t9;
 FLDCLS(r,10)=t10;
 FLDCLS(r,11)=t11;
 return r;}

static OBJ _mt_12_0_12(OBJ t,OBJ t1,OBJ t2,OBJ t3,OBJ t4,OBJ t5,OBJ t6,OBJ t7,OBJ t8,OBJ t9,OBJ t10,OBJ t11,OBJ t12) 
{OBJ r;
 DCCLS(t,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ,OBJ))ENTRY(t))(t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12);
 return r;}

static OBJ _mt_12_11_1(OBJ t,OBJ t1) 
{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);
  COPY(FLDCLS(t,7),1);
  COPY(FLDCLS(t,8),1);
  COPY(FLDCLS(t,9),1);
  COPY(FLDCLS(t,10),1);
  COPY(FLDCLS(t,11),1);
  DCCLS(t,1);}
 r=(*(OBJ(*)(OBJ,OBJ,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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),FLDCLS(t,10),FLDCLS(t,11),t1);
 return r;}
static OBJ _mt_12_11_1_l(OBJ t,OBJ t1) 
{OBJ r;
 r=(*(OBJ(*)(OBJ,OBJ,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),FLDCLS(t,7),FLDCLS(t,8),FLDCLS(t,9),FLDCLS(t,10),FLDCLS(t,11),t1);
 if(EXCLS(t)){
  DSCLSF(t);
 }else{
  DCCLS(t,1);
  FLDCLS(t,1)=NIL;FLDCLS(t,2)=NIL;FLDCLS(t,3)=NIL;FLDCLS(t,4)=NIL;FLDCLS(t,5)=NIL;FLDCLS(t,6)=NIL;FLDCLS(t,7)=NIL;FLDCLS(t,8)=NIL;FLDCLS(t,9)=NIL;FLDCLS(t,10)=NIL;FLDCLS(t,11)=NIL;
  COPY(r,1);LZYCLS(t,r);}
 return r;}

init_AGlobSigInit()
{
 static int visited=0; if(visited) return; visited=1;
 init_ASeqZip();
 init_AImpExpEntry();
 init_ASetByBST();
 init_AObjects();
 init_AName();
 init_ASetByBSTConv();
 init_AGlobSigImpl();
 init_AGlobSig();
 init_AMySeqFun1();
 init_APatterns();
 init_AStruct();
 init_AMySeqFun2();
 init_AAttributes();
 init_AImpl();
 init_AMySeqFun3();
 init_ADArray();
 init_APartName();
 init_AAbsyFun2();
 init_ANatMap();
 init_ARepTab();
 init_AAbsyFun3();
 init_AArray();
 init_AOcOptions();
 init_AOptionMap();
 init_ADeclPrep();
 init_ASeq();
 init_ATriple();
 init_AStructOwn();
 init_APair();
 init_AQuadruple();
 init_AGlobSigInitPass();
 init_ACom();
 init_ADenotation();
 init_AGlobSig4SigAna();
 init_AMap();
 init_AOcExit();
 init_AMaps4SigAna();
 init_ARep();
 init_ABSTree();
 init_AName4SigAna();
 init_ANat();
 init_ATree();
 init_APartNamePrep();
 init_AChar();
 init_ADyn();
 init_AInterOpal();
 init_AOption();
 init_ABSTreeConv();
 init_AInterOpalAccess();
 init_ASet();
 init_ADArrayReduce();
 init_AInterOpalModifier();
 init_AVoid();
 init_ASeqConv();
 init_AGlobSigToText();
 init_AStream();
 init_ALexem();
 init_ASigAnaTexts();
 init_AString();
 init_AReal();
 init_ADEBUG();
 init_AFile();
 init_AComCompose();
 init_AInt();
 init_AOcBinStream();
 init_AFct();
 init_AOcVerbose();
 init_AOcPos();
 init_AOcError();
 init_APragma();
 init_ACompose();
 init_ABitset();
 init_AMapReduce();
 init_AGlobPragma();
 init_ASeqMap();
 init_ATable();
 init_ASeqMapEnv();
 init_AUniqueTable();
 init_ASeqOfSeq();
 init_ADeclEntry();
 init_ASeqReduce();
 init_APartNameEntry();
 LCLS(1,_AGlobSigInit_63,__AGlobSigInit_63);
 LCLS(1,_AGlobSigInit_31,__AGlobSigInit_31);
 LCLS(1,_AGlobSigInit_61,__AGlobSigInit_61);
 DEN("wrong number of parameters in instantiated import of \'%s\'",__AGlobSigInit_29);
 DEN("uninstantiated import of \'%s\'",__AGlobSigInit_28);
 CLS(1,_AGlobSigInit_59,__AGlobSigInit_59);
 DEN("UninstImport",__AGlobSigInit_27);
 CLS(1,_AGlobSigInit_58,__AGlobSigInit_58);
 LCLS(1,_AGlobSigInit_26,__AGlobSigInit_26);
 LCLS(1,_AGlobSigInit_25,__AGlobSigInit_25);
 DEN("wrong number of parameters inherited from own signature \'%s\'",__AGlobSigInit_56);
 CLS(2,_AGlobSigInit_24,__AGlobSigInit_24);
 CLS(10,_AGlobSigInit_55,__AGlobSigInit_55);
 DEN("imported file \'%s\' not found",__AGlobSigInit_23);
 CLS(9,_AGlobSigInit_54,__AGlobSigInit_54);
 CLS(3,_AGlobSigInit_22,__AGlobSigInit_22);
 LCLS(1,_AGlobSigInit_53,__AGlobSigInit_53);
 CLS(2,_AGlobSigInit_21,__AGlobSigInit_21);
 DEN(": only \'signature export\' imported",__AGlobSigInit_52);
 CLS(1,_AGlobSigInit_20,__AGlobSigInit_20);
 DEN("imported structure \'%s\' not in command line",__AGlobSigInit_51);
 CLS(2,_AGlobSigInit_19,__AGlobSigInit_19);
 DEN("illegal direct cyclic import of \'%s\'",__AGlobSigInit_50);
 CLS(2,_AGlobSigInit_18,__AGlobSigInit_18);
 CLS(2,_AGlobSigInit_49,__AGlobSigInit_49);
 CLS(2,_AGlobSigInit_17,__AGlobSigInit_17);
 LCLS(1,_AGlobSigInit_48,__AGlobSigInit_48);
 CLS(3,_AGlobSigInit_16,__AGlobSigInit_16);
 DEN(": no \'external properties\' included",__AGlobSigInit_47);
 CLS(2,_AGlobSigInit_15,__AGlobSigInit_15);
 CLS(2,_AGlobSigInit_46,__AGlobSigInit_46);
 CLS(2,_AGlobSigInit_14,__AGlobSigInit_14);
 LCLS(1,_AGlobSigInit_45,__AGlobSigInit_45);
 CLS(3,_AGlobSigInit_13,__AGlobSigInit_13);
 CLS(1,_AGlobSigInit_12,__AGlobSigInit_12);
 CLS(3,_AGlobSigInit_11,__AGlobSigInit_11);
 CLS(6,_AGlobSigInit_42,__AGlobSigInit_42);
 CLS(2,_AGlobSigInit_10,__AGlobSigInit_10);
 CLS(8,_AGlobSigInit_41,__AGlobSigInit_41);
 CLS(2,_AGlobSigInit_9,__AGlobSigInit_9);
 DEN("printGsInit",__AGlobSigInit_40);
 CLS(2,_AGlobSigInit_8,__AGlobSigInit_8);
 DEN("printGsInitPass4",__AGlobSigInit_39);
 CLS(1,_AGlobSigInit_7_c,__AGlobSigInit_7);
 DEN("printGsInitPass3",__AGlobSigInit_38);
 CLS(1,_AGlobSigInit_6,__AGlobSigInit_6);
 CLS(7,_AGlobSigInit_69,__AGlobSigInit_69);
 CLS(7,_AGlobSigInit_5,__AGlobSigInit_5);
 DEN("printGsInitPass2",__AGlobSigInit_37);
 CLS(11,_AGlobSigInit_68,__AGlobSigInit_68);
 DEN("printGsInitOwnSign",__AGlobSigInit_36);
 CLS(12,_AGlobSigInit_67,__AGlobSigInit_67);
 CLS(2,_AGlobSigInit_3,__AGlobSigInit_3);
 DEN("printGsInitPass1",__AGlobSigInit_35);
 CLS(12,_AGlobSigInit_66,__AGlobSigInit_66);
 CLS(2,_AGlobSigInit_2,__AGlobSigInit_2);
 CLS(2,_AGlobSigInit_34,__AGlobSigInit_34);
 CLS(12,_AGlobSigInit_65,__AGlobSigInit_65);
 CLS(5,_AGlobSigInit_1,__AGlobSigInit_1);
 CLS(3,_AGlobSigInit_33,__AGlobSigInit_33);
 CLS(12,_AGlobSigInit_64,__AGlobSigInit_64);
 DEN("printGsPrep",__AGlobSigInit_32);
 MTH(1,0,3,_mt_1_0_3);LZYMTH(1,0,3,_mt_1_0_3);
 MTH(7,0,6,_mt_7_0_6);LZYMTH(7,0,6,_mt_7_0_6);
 MTH(7,6,1,_mt_7_6_1);LZYMTH(7,6,1,_mt_7_6_1_l);
 MTH(8,0,7,_mt_8_0_7);LZYMTH(8,0,7,_mt_8_0_7);
 MTH(8,7,1,_mt_8_7_1);LZYMTH(8,7,1,_mt_8_7_1_l);
 MTH(9,0,8,_mt_9_0_8);LZYMTH(9,0,8,_mt_9_0_8);
 MTH(9,8,1,_mt_9_8_1);LZYMTH(9,8,1,_mt_9_8_1_l);
 MTH(10,0,9,_mt_10_0_9);LZYMTH(10,0,9,_mt_10_0_9);
 MTH(10,0,10,_mt_10_0_10);LZYMTH(10,0,10,_mt_10_0_10);
 MTH(10,9,1,_mt_10_9_1);LZYMTH(10,9,1,_mt_10_9_1_l);
 MTH(11,0,10,_mt_11_0_10);LZYMTH(11,0,10,_mt_11_0_10);
 MTH(11,10,1,_mt_11_10_1);LZYMTH(11,10,1,_mt_11_10_1_l);
 MTH(12,0,11,_mt_12_0_11);LZYMTH(12,0,11,_mt_12_0_11);
 MTH(12,0,12,_mt_12_0_12);LZYMTH(12,0,12,_mt_12_0_12);
 MTH(12,11,1,_mt_12_11_1);LZYMTH(12,11,1,_mt_12_11_1_l);
 CPPRD(__AOcExit_1,1);
 PRD(1,1,__AGlobSigInit_30);FLD(__AGlobSigInit_30,1)=__AOcExit_1;
 CPPRD(__AOcError_15,1);
 PRD1(2,__AGlobSigInit_43);FLD1(__AGlobSigInit_43,1)=__AOcError_15;FLD1(__AGlobSigInit_43,2)=__AOption_5;
 CPPRD(__AGlobSigInit_43,1);
 PRD(1,0,__AGlobSigInit_44);FLD(__AGlobSigInit_44,1)=__AGlobSigInit_43;
 CPPRD(__AOcError_15,1);
 PRD1(2,__AGlobSigInit_57);FLD1(__AGlobSigInit_57,1)=__AOcError_15;FLD1(__AGlobSigInit_57,2)=__ASeq_6;
 CPPRD(__AOcExit_2,1);
 PRD(1,1,__AGlobSigInit_60);FLD(__AGlobSigInit_60,1)=__AOcExit_2;
 CPPRD(__AOcExit_1,1);
 PRD(1,1,__AGlobSigInit_62);FLD(__AGlobSigInit_62,1)=__AOcExit_1;}

